Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Línea de producto:

Microsiga Protheus

Segmento:

Servicios

Módulo:

Contabilidad de gestión

Rutina:

Rutina

Nombre técnico

CTBA105.PRW

Asientos contables de integración

Punto de entrada:

CT105REV

Base(s) de datos:

Todas

Sistema(s) operativo(s):

Todos



Descripción:

El Punto de entrada CT105REV permite validar la reversión de un asiento contable. Este devuelve un valor lógico para que se realice la personalización de la validación de reversión de un asiento contable.

Programa fuente:

CTBA105.PRW

Parámetros:

Nombre

Tipo

Descripción

Obligatorio

 


dDataLanc = Fecha de los asientos 
cLote = Lote de los asientos 
cSubLote = Sublote de los asientos  
cDoc = Número del documento de los asientos


Eventos de activación del Punto de entrada

If lCt105Rev 
lRet := ExecBlock("CT105REV",.f.,.f.,{dDataLanc,cLote,cSubLote,cDoc }) 
EndIf


Variables

Local lCt105Rev := ExistBlock("CT105REV")


Devolución:

lRet == .T. - Permite el proseguimiento de la reversión 
lRet == .F. - No permite el proseguimiento de la reversión

 

Ejemplo:

User Function CT105REV() 

Local lRet:= .F. 

If MsgYesNo ("¿Desea proseguir con la reversión?","Reversión") 
lRet:= .T. 
Else 
lRet:= .F. 
Alert ("¡Reversión no permitida!") 
EndIf 

Return lRet