Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
...
Punto de entrada: CT010TOK - Valida
...
confirmación de
...
calendario
...
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:
...
Punto de entrada permite incluir validaciones adicionales al confirmar Registro de calendario.
Programa
...
fuente
CTBA010.PRW
...
Sintaxis
CT010TOK - Valida
...
confirmación de
...
calendario ( < nOpc> ) --> lRet
...
Parámetros:
...
Nombre | Tipo |
...
Descripción |
...
Estándar |
...
Obligatorio |
...
Referencia | ||||
nOpc | Numérico |
...
Operación 3= |
...
Inclusión4= |
...
Modificación5= |
...
Borrado | X |
...
Devolución
lRet (lógico)
...
.t. -
...
continúa grabando normalmente..f. -
...
interrumpe.
...
Ejemplos
#include "Protheus.ch"User Function CT010TOK()Local nOpc := ParamIXB[1]Local lRet := .F.If nOpc > 2
...
If RetCodUsr() == "000000"
...
If MsgYesNo("Evidencia
...
del
...
punto de
...
entrada CT010TOK -
...
¿ Datos
...
están
...
correctos ?")
...
lRet := .T.
...
EndIf Else Alert("Evidencia
...
del
...
punto de
...
entrada CT010TOK - Solamente
...
el Administrador
...
puede incluir
...
calendarios. ")
...
EndIfEndIfReturn lRet