| Í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
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
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 |