Description | The entry point AF040BAD sets the data of the new asset when posting by advance of fixed assets. |
---|---|
Examples | User Function AF040BAD() Local aDadNBem := array(4) aDadNBem:= {"1234567890", "0123", "TEST PE", .T.} Return aDadNBem |
Language | Portuguese(Brazil) |
Versions | Microsiga_Protheus10 and Microsiga_Protheus11 |
Operating Systems Supported | All |
Compatible with the following Databases | All |
Return | It returns an array containing the new asset's information |
Call events of the Entry Point | If ExistBlock("AF040BAD") aDadNBem := ExecBlock("AF040BAD",.F.,.F.) cbase = aDadNBem[1] cItemAtivo = aDadNBem[2] cDescr = aDadNBem[3] lAtBase = aDadNBem[4] Endif |
Source Program | ATFA040.PRX |