Punto de entrada: CT105POS - Valida asiento contable
Alcances: | Microsiga Protheus 10 |
Versiones: | Microsiga Protheus 10 |
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:
Punto de entrada que permite incluir nuevas validaciones de asiento contable. Recibe como parámetro de entrada, la variable lRet que indica si el registro es consistente (.T.) o no.
Programa fuente
CTBA105.PRW
Sintaxis
CT105POS - Valida asiento contable ( [ lRet ] ) --> lRet
Parámetros:
Nombre | Tipo | Descripción | Estándar | Obligatorio | Referencia | ||||||||||||
lRet | Lógico | .T. - Asiento Ok .F. - Asiento inconsistente |
Devolución
lRet(lógico)
.T. - Asiento Ok .F. - Asiento inconsistente
Ejemplos
#include "RwMake.ch"User Function CT105POS()Local lRetorno := ParamIXB[1]If lRetorno If Aviso("Atencao - PE CT105POS", "Confirma el asiento ", { "Sim", "Nao"} ) != 1 MsgInfo("Asiento no confirmado por el usuario") lRetorno := .F. EndIfElse MsgAlert("PE CT105POS --> Asiento inconsistente - Verifique")EndIfReturn( lRetorno )
Variables
Nombre | Tipo | Alcance | Puede modificar | Descripción | ||||||||||
Array of Record | Global | No |