Salve salve....
Ponto de entrada TMALTBAS- ( Calcula o total do frete baseado na tabela de frete)
TMSXFUNB-TMALTBAS-Permitir alterar a base de calculo de um determinado componente
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} TMALTBAS
Permitir alterar a base de calculo de um determinado componente
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function TMALTBAS()
Local nValMer := ParamIXB[01]
Local nPeso := ParamIXB[02]
Local nPesoM3 := ParamIXB[03]
Local nPesoCob := ParamIXB[04]
Local nQtdVol := ParamIXB[05]
Local nSeguro := ParamIXB[06]
Local nMetro3 := ParamIXB[07]
Local nQtdUni := ParamIXB[08]
Local nValDpc := ParamIXB[09]
Local cCliDev := ParamIXB[10]
Local cLojDev := ParamIXB[11]
Local cLotNfc := ParamIXB[12]
Local cTabFre := ParamIXB[13]
Local cTipTab := ParamIXB[14]
Local nKm := ParamIXB[15]
Local aNfCTRC := ParamIXB[16]
Local nPesoVge := ParamIXB[17]
Local nPesoM3Vge := ParamIXB[18]
Local nMetro3Vge := ParamIXB[19]
Local nValMerVge := ParamIXB[20]
Local nQtdVolVge := ParamIXB[21]
Local nDiaArm := ParamIXB[22]
Local cCdrOri := ParamIXB[23]
Local cFilDoc := ParamIXB[24]
Local cDoc := ParamIXB[25]
Local cSerie := ParamIXB[26]
Local cFilOri := ParamIXB[27]
Local cViagem := ParamIXB[28]
Local aTipVei := ParamIXB[29]
Local aTmAltBs := {}
Return( aTmAltBs )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima