Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001AEX - Exportação da O.S
Descrição: Este Ponto de Entrada está localizado na rotina Orçamento de Peças e Serviços (OFIXX001), executado antes da Exportação da O.S, com a finalidade de questionar se deseja continuar ou abortar a operação. Eventos User Function OX001AEX() lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001AEX - Exportação da O.S ( [ ] ) --> lRet Parâmetros:
Retorno
Observações if !MsgYesNo(STR0077,STR0025) return .f. endif // if ExistBlock("OX001AEX") // Antes da Exportacao lRet := ExecBlock("OX001AEX",.f.,.f.) If !lRet Return (lRet) Endif Endif // ############################## // # VERIFICA LIMITE DE CREDITO # // ############################## if VS1->VS1_STATUS != "F" .and. VS1->VS1_STATUS != "2" DBSelectArea("VOI") DBSetOrder(1) DBSeek(xFilial("VOI") + VS1->VS1_TIPTEM) if VOI->VOI_SITTPO == "1" cTipPag := VS1->VS1_FORPAG if Empty(GetNewPar("MV_CPNCLC","")) .or. !alltrim(cTipPag) $ GetMv("MV_CPNCLC") .or. Empty(cTipPag) If "I" $ GetMv("MV_CHKCRE") DBSelectArea("SA1") DBSetOrder(1) if GetMv("MV_CREDCLI") == "C" if !DBSeek(xFilial("SA1")+VS1->VS1_CLIFAT + "01") DBSeek(xFilial("SA1")+VS1->VS1_CLIFAT + VS1->VS1_LOJA) endif else DBSeek(xFilial("SA1")+VS1->VS1_CLIFAT + VS1->VS1_LOJA) endif If !MaAvalCred(SA1->A1_COD, SA1->A1_LOJA, FG_AVALCRED(SA1->A1_COD, SA1->A1_LOJA) ,1,.T.) if !lOX001Auto MsgInfo(STR0078,STR0025) endif OI001ATU(VS1->VS1_NUMORC,"3") return .f. EndIf EndIf Endif endif // endif Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas