Product Line |
: | Microsiga Protheus | ||||||
SegmentoSegment: | Serviços Services | ||||||
Module: | SIGACTB | ||||||
RotinaRoutine: | Rotina
Cadastro de Plano de Contas
| ||||||
Parameters | ParâmetrosnOpc | ||||||
Entry Point: | CT020EXC | ||||||
País(es)Countries: | Brasil | Banco(s) de DadosBrazil | |||||
Database: | Todas | All | |||||
Operating Systems | Sistema(s) Operacional(is): | TodosAll |
The purpose of this entry point is to validate the deletion of the ledger account. If its return is O objetivo deste ponto de entrada é validar a exclusão da conta contábil. Caso seu retorno seja .T. (verdadeiroTrue), a conta contábil será excluída; se o retorno for the ledger account will be deleted; if the return is .F. (falsoFalse), a conta contábil não será excluída.
the ledger account will not be deleted.
Description: | The entry point CT020EXC is used to validate the deletion of the ledger account. |
Events | |
Descrição: | O ponto de entrada CT020EXC é utilizado para validar a exclusão da conta contábil. |
: | If lRet .And. lCT020Exc |
Programa FonteSource Program: | CTBA020 |
RetornoReturn: | Lógico Logical |
ExemploExample:
User Function CT020EXC()
Local lRet := .F.
If MsgYesNo ("Confirma ExclusãoConfirm Deletion?")
lRet:= .T.
MsgAlert("Exclusão ConfirmadaDeletion Confirm")
Else
MsgAlert("Exclusão CanceladaDeletion Canceled")
Endif
Return lRet