| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Logística |
| Módulo: | SIGATMS - Gestão de Transportes |
Ponto de entrada usado para alterar o valor do peso cubado.
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cCliDev | Caracter | PARAMIXB[1] - Cliente devedor do frete. | |||||||||||||||
| cLojDev | Caracter | PARAMIXB[2] - Loja do cliente devedor do frete. | |||||||||||||||
| nPeso | Numérico | PARAMIXB[3] - Peso cubado. | |||||||||||||||
| nPesoR | Numérico | PARAMIXB[4] - Peso real. | |||||||||||||||
| cTipFre | Caracter | PARAMIXB[5] - Tipo do Frete. | |||||||||||||||
| cServic | Numérico | PARAMIXB[6] - Serviço. | |||||||||||||||
| cTipTra | Numérico | PARAMIXB[7] - Tipo Transporte. | |||||||||||||||
| cSerTMS | Numérico | PARAMIXB[8] - Serviço TMS. |
Retorno
nPesoCub
(numerico)
Valor do novo peso cubado.
Programa Fonte
TMSA040.PRW
Sintaxe
User Function TM040CUB()
Local cCliDev := ParamIXB[1]
Local cLojDev := ParamIXB[2]
Local nPeso := ParamIXB[3]
Local nPesoR := ParamIXB[4]
Local cTipFre := ParamIXB[5]
Local cServic := ParamIXB[6]
Local cTipTra := ParamIXB[7]
Local cSerTMS := ParamIXB[8]
nPeso := 0MsgStop('O peso cubado esta sendo alterado para 0, atravez do Ponto TM040CUB' )
Return(nPeso)