A rotina de Contrato de Carreteiro (TMSA250) é uma rotina de processamento de dados, não se trata de uma rotina de cadastro para input de dados.
Portanto não será disponibilizado ExecAuto. Entretanto, é possível realizar o processamento da rotina sem execução de tela.
Realizar processamento da rotina de Contrato de Carreteiro (TMSA250) de forma Rotina Automática, através da chamada da função TMSA250Prc.
ExpC1 - Alias do Arquivo - DTQ
ExpN1 - Opcao Selecionada (3-Por Viagem / 4-Por Período)
ExpC2 - Filial de Origem - DTQ->DTQ_FILORI
ExpC3 - Viagem - DTQ->DTQ_VIAGEM
ExpL1 - Gera Contrato de Premio p/ Motorista. Esta variável passada pelo programa de Pagto de Premio (TMSA740)
ExpN2 - Valor do Premio do Motorista calculado pelo TMSA740
ExpA1 - Array contendo as mensagens de erro
ExpN3 - Informa para qual(is) do(s) veículo(s) deve gerar contrato. 1=Veiculo; 2=Reboque; 3=Ambos. Isto para quando os fornecedores sejam diferentes.
ExpC4 - Tipo do Contrato a ser gerado: 1=Por Viagem;/2=Por Periodo;/3=Por Premio;/4=Adiantamento;/5=Complemento;/6=Carga;/7=Redespacho)
ExpC5 - Codigo do Fornecedor
Expc6 - Loja do Fornecedor
ExpL2 - Informa se a viagem é Express
ExpL3 - Informa se será exibido o preview do frete a pagar
ExpC7 - Informa o tipo do título a ser gerado no Financeiro.
Function TMSA250EA()
Local lRet := .F.
Local aVisErr := {}
DTQ->(DbGoTo(46))
Pergunte("TMA250",.F.)
Processa({|lEnd| lRet := TMSA250Prc("DTQ", 3, DTQ->DTQ_FILORI, DTQ->DTQ_VIAGEM, .F., , aVisErr)},"Contrato de Carreteiro", "Gerando os Contratos de Carreteiros ...",.F.)
Return lRet
<!-- esconder o menu -->
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style> |