Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Punto de entrada: ANCTB103GR - Ejecuta la grabación de los 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. ejecuta la grabación de los asientos

Eventos

Se ejecuta dentro de la función de grabación de asientos contables

Programa fuente

CTBA103.PRW

Sintaxis

ANCTB103GR - Ejecuta la grabación de los asientos ( [ nOpc ], [ dDataLanc ], [ cLote ], [ cSubLote ], [ cDoc ] )

Parámetros:


Nombre



Tipo



Descripción



Estándar



Obligatorio



Referencia



nOpc



Numérico



Numero de la opción seleccionada












dDataLanc



fecha



Fecha del asiento












cLote



carácter



Código del lote












cSubLote



carácter



Código del sublote












cDoc



carácter



Código del documento











Devolución
Nil (Nulo)

Ejemplos

        If lOk .And. (!l103Visual)                 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  EndifEndIf