AF035VAL() - Manipulate asset posting values

The entry point AF035VAL() allows the values added to the Asset Postings routine (ATFA035) to be manipulated.

User Function AF030VAL()

Local nVlVend := 0

Local aBxAtivo := {}

Alert("Entry Point AF035VAL() run.")

AADD( aBxAtivo, { "N3_CBASE" , SN1->N1_CBASE } )

AADD( aBxAtivo, { "CNOTA" , SN4->N4_NOTA } )

AADD( aBxAtivo, { "CITEM" , SN1->N1_ITEM } )

AADD( aBxAtivo, { "N3_TIPO" , SN3->N3_TIPO } )

AADD( aBxAtivo, { "CSERIE" , SN4->N4_SERIE } )

AADD( aBxAtivo, { "VLRBAIXA", SN3->N3_VORIG1 } )

AADD( aBxAtivo, { "NQUANT" , SN1->N1_QUANTD } )

AADD( aBxAtivo, { "AUTPERCBX" , 100 } )

AADD( aBxAtivo, { "NVLVEND" , SN4->N4_VENDA } )

nVlVend := aBxAtivo[9][2]

Return nVlVend

Portuguese(Brazil)

Previous_Versions

All

All

nVlVend

Posting an asset in the ATFA035 routine.

ATFA035.PRW