Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001VSP - Verificação de saldo em estoque
Descrição: Ponto de Entrada localizado na rotina Orçamento de Peças e Serviços (OFIXX001), executado ao informar a quantidade de peças no orçamento, com a finalidade de verificar se a quantidade informada possui saldo em estoque. Eventos User Function OX001VPP () lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001VSP - Verificação de saldo em estoque ( [ ] ) --> lRet Parâmetros:
Retorno
Observações dbSelectArea("VV1") dbSetOrder(1) dbSeek(xFilial("VV1")+cChassiInt) if VO1->VO1_CHAINT <> cChassiInt if !lOX001Auto MsgStop(STR0111) endif sRestArea(aArea) Return(.f.) endif // // Validação do proprietario. Caso a concessionaria possua regras proprias de validação, executa o PE, // caso contrário realiza a verificação padrão // if ExistBlock("OX001VPP") if !ExecBlock("OX001VPP",.f.,.f.) Return(.f.) Endif else ifVO1->VO1_PROVEI <> VV1->VV1_PROATU .or. ; VO1->VO1_LOJPRO <> VV1->VV1_LJPATU if !lOX001Auto MsgStop(STR0112) endif sRestArea(aArea) Return(.f.) endif endif Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas