Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas


Punto de entrada: CTB150TOK - Validación de usuario

Versiones:

Versiones anteriores

Compatible países:

Todos

Sistemas operativos:

Todos

Compatible con las bases de datos:

Todas

Idiomas:

Español , Inglés

Descripción:

El punto de entrada CTB150TOK se utiliza para validación de usuario. 

Programa fuente

CTBA150.PRW 

Sintaxis

IF ExistBlock("Ctb150TOk")
lRet := ExecBlock( "Ctb150TOk", .F. , .F.,{ dData,lInclui,lExclui } )
Endif

Devolución

 No tiene devolución.


Ejemplos

//----------------------////----------------------

User Function Ctb150TOk()

Local dData := PARAMIXB[1]
Local lInclui := PARAMIXB[2]
Local lExclui := PARAMIXB[3]

MsgAlert(dData)

If !lExclui .And. !lIncluiMsgAlert("Contenido de las variables lInclui y lExclui FALSOS")
Else
MsgAlert("Contenido de las variables lInclui y lExclui no son FALSOS")

EndIf

Return