...
Línea de producto |
...
: | Microsiga Protheus |
Segmento: |
Servicios | |
Módulo: | SIGACTB |
Rutina: |
|
|
|
|
|
Parámetros | nOpc |
Punto de |
entrada: | CT020EXC |
País(es): | Brasil |
Base(s) de |
datos: | Todas |
Sistema(s) |
operativo( |
s): | Todos |
...
O objetivo deste ponto El objetivo de este punto de entrada é validar a exclusão da conta contábil. Caso seu retorno seja es validar el borrado de la cuenta contable. Si su devolución fuera .T.(verdadeiroverdadero), a conta contábil será excluída; se o retorno for la cuenta contable se borrará; si la devolución fuera .F.(falso), a conta contábil não será excluídala cuenta contable no se borrará.
...
...
Descripción: |
El punto de entrada CT020EXC |
se utiliza para validar el borrado de la cuenta contable. | |
Eventos: | If lRet .And. lCT020Exc lRet:= ExecBlock("CT020EXC",.F.,.F.,nOpc) Endif |
Programa |
fuente: | CTBA020 |
Devolución: | Lógico |
ExemploEjemplo:
User Function CT020EXC()
Local lRet := .F.
If MsgYesNo ("Confirma Exclusão¿Confirma el borrado?")
lRet:= .T.
MsgAlert("Exclusão ConfirmadaBorrado confirmado")
Else
MsgAlert("Exclusão CanceladaBorrado anulado")
Endif
Return lRet