Histórico da Página

Description

Entry Point AF321EDT allows editing user fields in GetDados, in routine Third Party Assets Register (ATFA321).

Examples

User Function AF321EDT()

Local alEdtGD := {}

// add user fields for editing
Aadd(alEdtGD, "NP_USRCP1")
Aadd(alEdtGD, "NP_USRCP2")

Alert("Entry point AF321EDT executed")

Return alEdtGD

Language

Portuguese(Brazil)

Versions

Previous_Versions

Operating Systems Supported

All

Compatible with the following Databases

All

Parameters

alEdtGD

Return

alEdtGD

Call events of the Entry Point

If ExistBlock("AF321EDT")
aAuxEdtGD := ExecBlock("AF321EDT",.F.,.F.,{alEdtGD})
If ValType(aAuxEdtGD) == "A"
alEdtGD := Aclone(aAuxEdtGD)
EndIf
EndIf

Source Program

ATFA321.PRW