Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Valdemar Roberto

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Valdemar Roberto

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.



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
languagejava
themeMidnight
titleTMSSEMDOC 
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>