Histórico da Página

Este Ponto de Entrada localizado no TMSA350 (Operações), é executado na tela informe da quilometragem.

Permite está localizado na rotina Operações (TMSA350), permite a inclusão de campos na tela de informe Informe de quilometragem Quilometragem na rotina de apontamento das operações Apontamento das Operações.

Executado na tela Informe da Quilometragem.

User Function TM350KMO()

Local aHeader:=Paramixb[1]
Local _lSaida:=Paramixb[2]
Local _aHeader:={}
Local _aAlter :={}


//-- Montagem do __aHeader vetor de retorno
aTam:=TamSX3("DTR_CODVEI") //-- Codigo do Veiculo
Aadd(_aHeader,{RetTitle("DTR_CODVEI"),"DTR_CODVEI" ,PesqPict("DTR","DTR_CODVEI",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})
aTam:=TamSX3("DTR_MODVEI") //-- Descricao do Veiculo
Aadd(_aHeader,{RetTitle("DTR_MODVEI"),"DTR_MODVEI" ,PesqPict("DTR","DTR_MODVEI",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})
aTam:=TamSX3("DTR_CODRB1") //-- Codigo do 1o.Reboque
Aadd(_aHeader,{RetTitle("DTR_CODRB1"),"DTR_CODRB1" ,PesqPict("DTR","DTR_CODRB1",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})
aTam:=TamSX3("DTR_MODRB1") //-- Descricao do 1o.Reboque
Aadd(_aHeader,{RetTitle("DTR_MODRB1"),"DTR_MODRB1" ,PesqPict("DTR","DTR_MODRB1",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})
aTam:=TamSX3("DTR_CODRB2") //-- Codigo do 2o.Reboque
Aadd(_aHeader,{RetTitle("DTR_CODRB2"),"DTR_CODRB2" ,PesqPict("DTR","DTR_CODRB2",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})
aTam:=TamSX3("DTR_MODRB2") //-- Descricao do 2o.Reboque
Aadd(_aHeader,{RetTitle("DTR_MODRB2"),"DTR_MODRB2" ,PesqPict("DTR","DTR_MODRB2",atam[1]),aTam[1],aTam[2],"",USADO, "C" ,"DTR"," "})


Return _aHeader

Português(Brasil)

Versões_Anteriores

Todos

Todas

aHeader - Array contendo os campos do padrão.
lSaida - Se .T., indica uma atividade de saída. Caso contrário uma atividade de chegada.

Array contendo os campos a serem exibidos em tela

TMSA350