| Índice | ||
|---|---|---|
|
Entry Point AF140GRV was developed to handle and make changes to table SN3 in accordance with desired rule in routine ATFA140.
| Informações | ||
|---|---|---|
| ||
| The examples used in this documentation are merely illustrative and have pedagogical purposes. The operation and goal of the Entry Point is of the customer's full responsibility. |
Parameter | Type | Description | Required |
PARAMBIX[1] | Not Applicable. | Not Applicable. | No |
Return | Type | Description | Required |
lRet | Not Applicable | Not Applicable | No |
Example of rule used
user function AF140GRV()
// take a given cost center for changes
Local cCustEsp := GetMV("XX_ATFCC",.F.,'9999')
Local lCCusDep := GetMv("MV_ATFCCDP",.F.,.F.)
If Empty(MV_PAR01)
SN3->N3_CCUSTO := cCCustEsp
If lCCusDep
SN3->N3_CCDESP := cCCustEsp
EndIf
EndIf
Return