Histórico da Página
...
Portuguese | |||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: PMA100EX - Finalizar exclusão de orçamento
Descrição: O ponto de entrada PMA100EX é utilizado ao final da exclusão do orçamento. Programa Fonte PMSA100.PRW Sintaxe PMA100EX - Finalizar exclusão de orçamento ( ) --> SEM RETORNO lRet Retorno lRet (lógico) --> .T. - Exibe a tela de exclusão do orçamento / .F. - Não exibe
User function PMA100EX() Local lRet := .T. If AF1->AF1_FASE == "01" .And. Empty(AF1->AF1_VALID) If MsgYesNo("A data de validade está vazio. Deseja gravar com a data atual antes de excluir?","Data de Validade Vazio") If !MsgYesNo("Deseja validar a exclusão?","Confirmação de Exclusão") EndIf RestArea(aAreaAF1) | |||||||||||||||||||||||||
Portuguese (Brasil) | |||||||||||||||||||||||||
Descrição: O ponto de entrada PMA100EX é utilizado ao final da exclusão do orçamento. Programa Fonte PMSA100.PRW Sintaxe PMA100EX - Finalizar exclusão de orçamento ( ) --> SEM RETORNO Retorno Exemplos User function PMA100EX() Local lRet := .T.Local aAreaAF1 :=
|