AF010LOK - Validate the getdados row

Description

The entry point AF010LOK validates the getdados row when adding the Fixed Asset - ATFA010.

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="073cfca6-1c90-4f83-98c3-ce589a6441c3"><ac:plain-text-body><![CDATA[

Examples

#include "PROTHEUS.CH" #include "rwmake.ch" User Function AF010LOK() Local aColsX := {} Local lRet := .T. aColsx := aCols //Checks if the depreciation account entered is // the same account entered as accrued depreciation// account. If aColsX[1][6] == aColsX[1][10] Alert("Invalid Accounts") lRet := .F. EndIf Return lRet

]]></ac:plain-text-body></ac:structured-macro>

Language

Portuguese(Brazil)

Versions

Microsiga_Protheus10_e_Microsiga_Protheus11

Operating Systems Supported

All

Compatible with the following Databases

All

Parameters

aColsX: Array containing data from GetDados

Return

lRet(Logical): Validation return

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="65ccac33-7574-4288-a945-d8a6ea07144e"><ac:plain-text-body><![CDATA[

Call events of the Entry Point

lRet := ExecBlock("AF010LOK" ,.F.,.F.,aCols[N])

]]></ac:plain-text-body></ac:structured-macro>

Source Program

ATFA010a.PRW - Fixed Asset