Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

DT_PE_CT192POS_Reprocesamiento_CTBA192

Características del requisito

Línea de producto:

Microsiga Protheus

Segmento:

Servicios

Módulo:

SIGACTB

Rutina:

Rutina

Nombre técnico

CTBA192

Reprocesamiento de saldos por cuenta



Registros iniciales:

Plan de cuentas - CT1

Asientos contables - CT2

Punto de entrada:

CT192POS()

Llamados relacionados

TVQLSU

País(es):

Todos

Base(s) de datos:

Todos

Sistema(s) operativo(s):

Todos

Descripción

El punto de entrada CT192POS permite otros procesamientos después de la finalización de los jobs de reprocesamiento de la rutina CTBA192.


Punto de entrada

Descripción:

Este punto de entrada permite efectuar otros procesamientos después de la finalización de los procesamientos presentes en la rutina

Eventos:

Reprocesamiento de saldos por cuenta

Programa fuente:

CTBA192


Ejemplo:

#Include 'Protheus.ch'

User Function CT192POS()

Local aArea     := GetArea()

Local aCtbMoeda := {}

Local cFilDe    := PARAMIXB[1]

Local cFilAte   := PARAMIXB[2]

Local dDataIni  := PARAMIXB[3]

Local dDataFim  := PARAMIXB[4]

Local lMoedaEsp := PARAMIXB[5]

Local cMoeda    := PARAMIXB[6]

Local cTpSald   := PARAMIXB[7]

SAVEINTER()

// Tratamiento de la moneda específica

If lMoedaEsp                    

    aCtbMoeda := CtbMoeda( cMoeda )

    If Empty( aCtbMoeda[1] )

        Help(" ",1,"NOMOEDA")

        Return Nil

    EndIf

    nMoedaIni := Val( cMoeda )

    nMoedaFim := Val( cMoeda )

Else

    nMoedaIni    := 1

    nMoedaFim    := __nQuantas

EndIf

Conout( "CT192POS: Iniciando el proceso de actualización del LOTE" )

//Reprocessa totais por lote  => actualiza CT6

Ctb190Lote(nMoedaIni,nMoedaFim,cFilDe,cFilAte,cTpSald,dDataIni,dDataFim)

Conout( "CT192POS: Iniciando el proceso de actualización del DOCUMENTO" )

//Reprocesa totales por documento => actualiza CTC

Ctb190Doc(nMoedaIni,nMoedaFim,cFilDe,cFilAte,cTpSald,dDataIni,dDataFim)

Conout( "CT192POS: Iniciando el proceso de actualización del FLAG DE CUENTA PUENTE" )

//Actualiza los flags de cuenta puente.

CtbFlgPon(nMoedaIni,nMoedaFim,cFilDe,cFilAte,cTpSald,dDataIni,dDataFim)

Conout( "CT192POS: ¡PROCESO FINALIZADO!" )

RESTINTER()

RestArea( aArea )

Return Nil