Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
...
| Pagetitle | ||
|---|---|---|
|
...
|
...
|
Punto de entrada: CTB103EXC - Valida
...
ejecución de grabación de asientos
Alcances: | Microsiga Protheus 10, Microsiga Protheus 11 |
...
Versiones: | Microsiga Protheus 10, Microsiga Protheus 11 |
...
Compatible países: | Todos |
Sistemas |
...
operativos: | Todos |
...
Compatible con las bases de datos: |
...
Todas |
Idiomas: |
...
Portugués (Brasil) , |
...
Portugués (Portugal) , |
...
Español , |
...
Inglés |
...
Descripción:
...
Este P.E
...
. ocurre antes de hacer efectiva la grabación de los asientos validando su ejecución
Eventos
Se ejecuta en la función que graba los asientos contables
Programa fuente
Eventos
É executada na função que grava os lançamentos contabeis
...
CTBA103.PRW
...
...
Sintaxis
CTB103EXC - Valida
...
ejecución de grabación de los asientos ( ) --> lOk
...
Devolución
...
lOk(logico)
Indicador
...
de validación de grabación de los asientos
Observaciones
Si este P.E
...
. devuelve falso, el proceso de grabación se anulará
Ejemplos
If l103Exclui
...
.And.
...
ExistBlock("CTB103EXC")
...
lOk
...
:=
...
ExecBlock("CTB103EXC",.F.,.F.)
...
EndIf If lOk If ExistBlock("ANCTB103GR")
...
ExecBlock("ANCTB103GR",.F.,.F.,{
...
nOpc,dDataLanc,cLote,cSubLote,cDoc
...
}
...
) Endif CTBGrava(nOpc,dDataLanc,cLote,cSubLote,cDoc,.F.,"",__lCusto,__lItem,__lCLVL,nTotInf,'CTBA103',,,cEmpAnt,cFilAnt,,,,,,,cSeqCorr)
...
If ExistBlock("DPCTB103GR")
...
ExecBlock("DPCTB103GR",.F.,.F.,{
...
nOpc,dDatalanc,cLote,cSubLote,cDoc
...
}
...
) Endif EndIf
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas