TM200LOT – Como agrupar as Notas Fiscais da Solicitação de Coleta

⭐ Gostou do tema? Salve este artigo para consultar depois

Este Ponto de Entrada está localizado na rotina Cálculo de Frete (TMSA200) e permite realizar o agrupamento das NF-e’s da Solicitação de Coleta.

#INCLUDE "Protheus.ch" 

User Function TM200LOT() 
Local _aAreas := {DTC->(GetArea()),DT6->(GetArea()),GetArea()} 
Local _cRet := "" 
Local _aDTC := PARAMIXB[1] 

If Valtype(_aDTC) == "A" 
_cRet := _aDTC[ 68 ] //-- 68 Solicitacao de Coleta 
EndIf 

AEval(_aAreas,{|x| RestArea(x) }) 
Return (_cRet)

#INCLUDE "Protheus.ch"

User Function TM200LOT()

Local _aAreas := {DTC->(GetArea()),DT6->(GetArea()),GetArea()}

Local _cRet := ""

Local _aDTC := PARAMIXB[1]

If Valtype(_aDTC) == "A"

_cRet := _aDTC[ 68 ] //-- 68 Solicitacao de Coleta

EndIf

AEval(_aAreas,{|x| RestArea(x) })

Return (_cRet)

O retorno é _cRet que é o número da Solicitação de Coleta

Leave a Reply Cancelar resposta