| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001VPO - Exportação da O.S
Descrição: Ponto de Entrada na rotina Orçamento de Peças e Serviços (OFIXX001) executado na exportação da O.S. para questionar se o usuário deseja continuar ou abortar a operação. Eventos User Function OX001VPO() lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001VPO - Exportação da O.S ( [ ] ) --> lRet Parâmetros:
Retorno
Observações // ########################################################################## // # I N I C I A O P R O C E S S O D E F A T U R A M E N T O # // ########################################################################## if M->VS1_TIPORC == "2" // Dar o tratamento aqui para verificar pendência de O.S. if ExistBlock("OX001VPO") // Antes da Exportacao lRet := ExecBlock("OX001VPO",.f.,.f.) If !lRet Return (lRet) Endif Endif if VS1->VS1_STATUS == "P" MsgStop(STR0185,STR0025) oDlgXX001:end() return .f. endif Variáveis
|
