Histórico da Página
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" User Function GFEXFB16() Local aVlrPed := {} Local nI Local aVlRoteiro := {} Local cSeq := "" If IsInCallStack("GFEWSSIMULATION") If ValType(cVlPedagio) = "C" nSeqTrecho := nSeqTrecho + 1 if cVlPedagio != "" aVlrPed := StrTokArr(cVlPedagio, "\") For nI := 1 to Len( aVlrPed ) If !Empty(aVlrPed[nI]) if nSeqTrecho == nI if val(aVlrPed[nI]) != 0 cSeq := "0" + ltrim(str(nI)) aAdd(aVlRoteiro,{'',cSeq,VAL(aVlrPed[nI]),0,0,.F.}) Endif Endif EndIf next nI Endif Endif Endif Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas