Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Logística |
Módulo: | SIGATMS - Gestão de Transportes |
02. DESCRIÇÃO
Ponto de entrada que permite calcular o frete a pagar em viagens sem documentos.
03. EXEMPLO DE UTILIZAÇÃO
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | |||||||||||
nVlrFec | Number | Valor do Frete Fechado. | ||||||||||||||
aDesconto | Array of Record | Array com os Descontos dos Componentes | ||||||||||||||
nDsc | Number | Faixa de Desconto Selecionada |
Retorno:
aRet
- (Array)
Retorno terá será um array, onde a primeira posição é o valor a ser abatido do frete informado, e a segunda posição é um vetor com os componentes que foram expurgados da proporcionalização.
Variáveis:
Nome | Tipo | Escopo | Pode Alterar | Descrição | |||||||||
Array of Record | Local | Sim |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
Programa Fonte TMSA040.PRW Sintaxe TM040VFC - Permite alterar a proporcionalização dos componentes ( [ nVlrFec,Aclone(aDesconto),nDsc ] ) --> aRet #Include "Protheus.ch" User Function TM040VFC() Local nVlrFec := ParamIXB[1] Local aVetCmp := ParamIXB[2] Local nFxDesc := ParamIXB[3] Local nVlrRet := 0 Local aVetRet := {} Local nCntFor1 := 0 For nCntFor1 := 1 To Len(aVetCmp) If aVetCmp[nCntFor1,11] == "31" //-- Componente que não poderá ser proporcionalizado Aadd(aVetRet,aVetCmp[nCntFor1,11]) nVlrRet += aVetCmp[nCntFor1,nFxDesc + 2] EndIf Next nCntFor1 Return {nVlrRet,Aclone(aVetRet)} |
04. DEMAIS INFORMAÇÕES
Não há.
05. ASSUNTOS RELACIONADOS
Não há.
Templatedocumentos |
---|
HTML |
---|
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } </style> |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas