Punto de entrada: CTB270TOK - Carga datos a GetDB

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. carga los dados a GetDB                                  

Eventos

Se ejecuta en la función que Carga datos a GetDB                                  

Programa fuente

CTBA270.PRW

Sintaxis

CTB270TOK - Carga datos a GetDB ( [ nOpcX ], [ cCtq_CtOri ], [ cCtq_CCOri ], [ cCtq_ItOri ], [ cCtq_ClOri ], [ cCtq_CtPar ], [ cCtq_CCPar ], [ cCtq_ItPar ], [ cCtq_ClPar ], [ cCtq_E05Ori ], [ cCtq_E06Ori ], [ cCtq_E07Ori ], [ cCtq_E08Ori ], [ cCtq_E09Ori ], [ cCtq_E05Par ], [ cCtq_E06Par ], [ cCtq_E07Par ], [ cCtq_E08Par ], [ cCtq_E09Par ] ) --> lRet

Parámetros:


Nombre



Tipo



Descripción



Estándar



Obligatorio



Referencia



nOpcX



Numérico



Número de la opción












cCtq_CtOri



carácter



Cuenta de origen












cCtq_CCOri



carácter



Centro de costo de origen












cCtq_ItOri



carácter



Ítem de origen












cCtq_ClOri



carácter



Clase de valor de origen












cCtq_CtPar



carácter



Cuenta de partida












cCtq_CCPar



carácter



Centro de costo de partida












cCtq_ItPar



carácter



Ítem de partida












cCtq_ClPar



carácter



Clase de valor de partida












cCtq_E05Ori



carácter



Ente 05 Origen












cCtq_E06Ori



carácter



Ente 06 Origen












cCtq_E07Ori



carácter



Ente 07 Origen












cCtq_E08Ori



carácter



Ente 08 Origen












cCtq_E09Ori



carácter



Ente 09 Origen












cCtq_E05Par



carácter



Ente 05 Partida












cCtq_E06Par



carácter



Ente 06 Partida












cCtq_E07Par



carácter



Ente 07 Partida












cCtq_E08Par



carácter



Ente 08 Partida












cCtq_E09Par



carácter



Ente 09 Partida











Devolución

            lRet(logico)

            Valor de retorno

Ejemplos

If lRet	If lCtb270TOk		lRet :=  ExecBlock("CTB270TOK", .F., .F., {nOpcX,cCtq_CtOri,cCtq_CCOri,cCtq_ItOri,cCtq_ClOri,;                                                   cCtq_CtPar,cCtq_CCPar,cCtq_ItPar,cCtq_ClPar,;                                                   cCtq_E05Ori,cCtq_E06Ori,cCtq_E07Ori,cCtq_E08Ori,cCtq_E09Ori,;                                                   cCtq_E05Par,cCtq_E06Par,cCtq_E07Par,cCtq_E08Par,cCtq_E09Par } )	EndIfEndIfTMP->(MsGoTo(nRecno))Return lRet