Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OXA012LS - Calculo da margem do lucro de Serviços
Descrição: Ponto de Entrada localizado na rotina Orçamento de Peças e Serviços (OFIXX001), executado na montagem do vetor com valores e descontos no cálculo da margem do lucro de Serviços. Eventos User Function OXA012LS() cNumOrc := ParamIXB[1] MsgInfo(“Ponto de Entrada OXA012LS”,”Atencao”) aRet := {} return aRet Programa Fonte OFIXX001.PRW Sintaxe OXA012LS - Calculo da margem do lucro de Serviços ( [ cNumOrc ] ) --> aRet Parâmetros:
Retorno
Observações // ################################################################# // # PONTO DE ENTRADA PARA CUSTOMIZACAO DA MARGEM DE LUCRO SERVICOS# // ################################################################# if ExistBlock("OXA012LS") aIDesconS := ExecBlock("OXA012LS",.f.,.f.,{cNumOrc}) for nCntFor2 := 1 to Len(aIDesconS) if !aIDesconS[nCntFor2] lProbDesSer := .t. endif next else // Le servicos DBSelectArea("VS4") DBSetOrder(1) DBSeek(xFilial("VS4")+cNumOrc) while !eof() .and. xFilial("VS4")+VS1->VS1_NUMORC == VS4->VS4_FILIAL+VS4->VS4_NUMORC VOK->(dbSetOrder(1)) VOK->(dbSeek(xFilial("VOK")+VS4->VS4_TIPSER)) lRetDes := (VOK->VOK_PERMAX >= VS4->VS4_PERDES) aAdd(aIDesconS,lRetDes) if !lRetDes lProbDesSer := .t. endif DBSelectArea("VS4") DBSkip() enddo endif Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas