Producto: | |
Línea de producto: | Línea Protheus |
Segmento: | Tecnología |
Módulo: | TOTVS Backoffice (Línea Protheus) - Contabilidad de gestión (SIGACTB) |
Función: | CTBA012A |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46829 |
El punto de entrada CT012INTEG se utiliza en la función CTBA012A con el objetivo de cambiar el tipo de saldo durante la integración con el PIMS. Este punto de entrada permite personalizar el tipo de saldo aplicado, esto hace posible adaptaciones según las necesidades específicas del proceso contable o de integración con sistemas externos. Es especialmente útil en casos donde es necesario ajustar el saldo para reflejar categorías distintas o requisitos del sistema de destino, lo que garantiza una integración más alineada con el PIMS.
If ExistBlock ("CT012INTEG")
//La respuesta del array debe contener todas las posiciones informadas, aunque no se modifiquen.
aInteg := ExecBlock("CT012Integ",.F.,.F.,{dDataIni,dDataFim,cContaDe,cContaAte,cCCDe,cCCAte,cMoeda,cSaldo})
If ValType(aInteg) == "A" .and. Len(aInteg) == 8
dDataIni := aInteg[1]
dDataFim := aInteg[2]
cContaDe := aInteg[3]
cContaAte := aInteg[4]
cCCDe := aInteg[5]
cCCAte := aInteg[6]
cMoeda := aInteg[7]
cSaldo := aInteg[8]
EndIf
EndIf |
#Include 'Protheus.ch'
User function CT012Integ()
Local dDataIni := PARAMIXB[1] // Fecha inicial
Local dDataFim := PARAMIXB[2] // Fecha final
Local cContaDe := PARAMIXB[3] // Cuenta contable inicial
Local cContaTe := PARAMIXB[4] // Cuenta contable final
Local cCCDe := PARAMIXB[5] // Centro de costo inicial
Local cCCAte := PARAMIXB[6] // Centro de costo final
Local cMoeda := PARAMIXB[7] // Moneda del registro
Local cSaldo := PARAMIXB[8] // Tipo de saldo
Local aRet := {}
MsgInfo( 'Tipo de saldo original: ' + cSaldo )
cSaldo := '3'
MsgInfo( 'Tipo de saldo modificado: ' + cSaldo )
aRet:={dDataIni,dDataFim,cContaDe,cContaTe,cCCDe,cCCAte,cMoeda,cSaldo}
return aRet |
|