Hello Martin,

The thing about screen BPC4 is that it has a grid  in block 1 (with all fields but field BPAADD set to hidden) which holds all the information on the right hand of the screen, every time you click on a line in the grid it refreshing things like the Company Name, work days, misc. tax rule, ect in the remaining blocks on the screen.

So you will need to add two fields in theory to the screen:

1. First one on the grid (set as hidden) in block 1

2. Second field will be the custom field in block 2.

You will need two field actions on the fields you have added:

1. First field action (Before line) will be on the field NBDLV (the grid line indicator) which copies the field value from the grid to the custom field in the right.

2. The other field action (After modification) will be on the second new field you added (not the one on the grid, which populates the value in the grid.

It is not very difficult to do, but that is how you would go about it.

Hope it helps.

Hello Martin,

Agree with @Regard Hulsbos, with some additional information

1. Instead of adding Before Line on NBDLV to copy value from Grid to Custom Field, you can use Entry point $REMP_ADRBPA from TRTBPA

If dim([M]XFIELD)>0
[M]XXFIELD = [M]XFIELD(NOL)
Endif

Both solution seems correct.

2. In the After Modificacion field action to populate value from XXFIELD to XFIELD(on grid), you will also need to call 

[M]FLMOD([M]XNUMLIG) = 1
Gosub INIT_FLMODFONC From SUBBPA

Based on standard field action.

Regards,

Thanks a million Guys!

Hello!  I am also trying to add a custom field to BPC4 (and table BPDLVCUST).  I do not have a strong X3 coding skill set so I need a little help.  Currently my new field will not "save" data.  No errors - just not writing to the table.  I think the issue is I do not understand the comment Julien made in point #2 - "you will also need to call".  So I think my question is - what exactly do I need to do with:

"[M]FLMOD([M]XNUMLIG) = 1
Gosub INIT_FLMODFONC From SUBBPA"

I tried using both the entry point $REMP_ADRBPA from TRTBPA and the before line action on NBDLV, neither would populate the field when first displayed.  I ended up using the Initialization action on the field along with the Before line action on NBDLV.   

Subprog D_XXFIELD(VALEUR)
Variable Char VALEUR()
  [M:BPC4]XXFIELD = [M:BPC4]XFIELD([M]XNUMLIG) : Affzo [M:BPC4]XXFIELD
End