Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001CAN - Cancelamento do Orçamento
Descrição: Estte Ponto de Entrada está localizado na rotina Orçamento de Peças e Serviços (OFIXX001), executado antes do cancelamento do orçamento, com a finalidade de questionar se deseja continuar ou abortar a operação. Eventos User Function OX001CAN() lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001CAN - Cancelamento do Orçamento ( [ ] ) --> lRet Parâmetros:
Retorno
Observações BEGIN TRANSACTION // if ExistBlock("OX001CAN") if !ExecBlock("OX001CAN",.f.,.f.) Return(.f.) Endif Endif If !lOX001Auto If VS1->(FieldPos("VS1_MOTIVO")) > 0 //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ ¿ //³ Motivo do Cancelamento do Orcamento ³ //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ Ù While !lOk lOk := PERGUNTE("OFI151",.t.) EndDo cMotCancel := MV_PAR01 EndIf EndIf Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas