Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001CPC - Customização da Consulta de Peças
Descrição: Este Ponto de Entrada está localizado na rotina Orçamento de Peças e Serviços (OFIXX001), permitindo customizar a consulta de Peças . Eventos User Function OX001CPC() lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001CPC - Customização da Consulta de Peças ( [ ] ) --> lRet Parâmetros:
Retorno
Observações Function OX001KEYF4() Local lRetorno := .f. Local cTmpGrupo, cTmpCodite // if readvar() $ "M->VS3_GRUITE,M->VS3_CODITE" cTmpGrupo := oGetPecas:aCols[oGetPecas:nAt,FG_POSVAR("VS3_GRUITE","aHeaderP")] cTmpCodite := M->VS3_CODITE DBSelectArea("SB1") DBSetOrder(7) if DBSeek(xFilial("SB1")+cTmpGrupo+cTmpCodite) If ExistBlock("OX001CPC") lRetorno := ExecBlock("OX001CPC",.f.,.f.,{SB1->B1_COD}) else lRetorno := OFIXC001(SB1->B1_COD) endif else If ExistBlock("OX001CPC") lRetorno := ExecBlock("OX001CPC",.f.,.f.,{cTmpCodite}) else lRetorno := OFIXC001(cTmpCodite) endif endif if lRetorno M->VS3_GRUITE := SB1->B1_GRUPO M->VS3_CODITE := SB1->B1_CODITE OX001PREPEC() else M->VS3_GRUITE := cTmpGrupo M->VS3_CODITE := cTmpCodite endif oGetPecas:aCols[oGetPecas:nAt,FG_POSVAR("VS3_GRUITE","aHeaderP")] := M->VS3_GRUITE oGetPecas:aCols[oGetPecas:nAt,FG_POSVAR("VS3_CODITE","aHeaderP")] := M->VS3_CODITE endif Return Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas