Histórico da Página
Descrição | O ponto de entrada ATFA036L realiza a validação total do formulário de baixa de ativo em lote (Form + grid ). |
---|---|
Observações | Substitui o ponto de entrada AF030VLBX da rotina ATFA030 e o ponto de entrada AF035BLBX da rotina ATFA035. |
Exemplos | #Include 'Protheus.ch' |
...
/*/{Protheus.doc} |
---|
...
ATFA036L |
---|
...
|
---|
...
1.0 |
---|
...
|
---|
...
|
---|
...
Function |
---|
...
ATFA036L |
---|
...
|
---|
...
aParam |
---|
...
:= |
---|
...
PARAMIXB |
---|
...
// |
---|
...
Vetor |
---|
...
com |
---|
...
os |
---|
...
parâmetros |
---|
...
recebidos |
---|
...
pelos |
---|
...
pontos |
---|
...
de |
---|
...
entrada |
---|
...
da |
---|
...
rotina |
---|
...
de |
---|
...
baixa |
---|
...
de |
---|
...
ativo |
---|
...
em |
---|
...
lote. |
---|
...
|
---|
...
lRet |
---|
...
:= |
---|
...
.T. |
---|
...
// |
---|
...
Variável |
---|
...
de |
---|
...
retorno |
---|
...
dos |
---|
...
pontos |
---|
...
de |
---|
...
entrada |
---|
...
da |
---|
...
rotina |
---|
...
de |
---|
...
baixa |
---|
...
de |
---|
...
ativos |
---|
...
em |
---|
...
lote. |
---|
...
|
---|
...
oObj |
---|
...
:= |
---|
...
aParam[1] |
---|
...
// |
---|
...
Objeto |
---|
...
do |
---|
...
Modelo |
---|
...
de |
---|
...
Dados |
---|
...
da |
---|
...
rotina |
---|
...
de |
---|
...
baixa |
---|
...
de |
---|
...
ativos |
---|
...
em |
---|
...
lote. |
---|
...
|
---|
...
cIdPonto |
---|
...
:= |
---|
...
aParam[2] |
---|
...
// |
---|
...
Identificador |
---|
...
do |
---|
...
ponto |
---|
...
de |
---|
...
entrada |
---|
...
que |
---|
...
será |
---|
...
chamado |
---|
...
através |
---|
...
da |
---|
...
função |
---|
...
ATFA036L |
---|
...
da |
---|
...
rotina |
---|
...
de |
---|
...
baixa |
---|
...
de |
---|
...
ativos. |
---|
...
|
---|
...
cIdModel |
---|
...
:= |
---|
...
IIf( |
---|
...
oObj<> |
---|
...
NIL, |
---|
...
oObj:GetId(), |
---|
...
aParam[3] |
---|
...
) |
---|
...
// |
---|
...
Identificador |
---|
...
do |
---|
...
Modelo |
---|
...
de |
---|
...
Dados |
---|
...
da |
---|
...
rotina |
---|
...
de |
---|
...
baixa |
---|
...
do |
---|
...
Ativo |
---|
...
em |
---|
...
lote. |
---|
...
(ATFA036L) |
---|
...
|
---|
...
cClasse |
---|
...
:= |
---|
...
IIf( |
---|
...
oObj<> |
---|
...
NIL, |
---|
...
oObj:ClassName(), |
---|
...
'' |
---|
...
) |
---|
...
// |
---|
...
Nome |
---|
...
da |
---|
...
classe |
---|
...
utilizada |
---|
...
na |
---|
...
rotina |
---|
...
(FWFORMFIELD |
---|
...
- |
---|
...
Formulário, |
---|
...
FWFORMGRID |
---|
...
- |
---|
...
Grid) |
---|
...
|
---|
...
nOperation |
---|
...
:= |
---|
...
0 |
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
|
---|
...
| |
---|---|
Idioma | Português(Brasil) |
...
Versões | Microsiga_Protheus12 |
---|
...
Sistemas |
---|
...
Operacionais |
---|
...
Suportados |
---|
...
Todos | |
---|---|
Compatível com as Bases de Dados | TOTVSDBAccess |
Retorno | Retorno Lógico (lRet := (.T./.F.) |
...
) | |
---|---|
Programa Fonte | ATFA036L.PRW |