TM340OPE

Utilizado somente na integração com a operadora REPOM, para autorizar o encerramento da viagem depois que o contrato foi quitado na operadora de frota. 
Isto acontece porque o carreteiro pode quitar o contrato no Posto e não na Transportadora.

.PRW

TM340OPE ( [ cCodOpe ], [ cFilOri ], [ cViagem ], [ aMsgErr ], [ lFrota ], [ nOpcx ], [ lContinua ] ) --> lRet

lRet( )
• T ou F

Se o Retorno for True, a viagem poderá ser encerrada mesmo com o contrato quitado.

Caso contrário segue o padrão da rotina.

User Function TM340OPE()Local lRet      := .F.Local cCodOpe   := ParamIXB[1]  // codigo da operadora de frotaLocal cFilOri   := ParamIXB[2]  // filial da viagemLocal cViagem   := ParamIXB[3]  // viagemLocal aMsgErr   := ParamIXB[4]  // array com mensagem de erroLocal lFrota    := ParamIXB[5]  // frota Propria ou NaoLocal nOpcx     := ParamIXB[6]  // opcaoLocal lContinua := ParamIXB[7]  // se a validacao da operadora de frota foi validado com sucesso.If nOpcx == 3        // Encerramento da viagem   lRet := .T.ElseIf nOpcx == 4    // Estorno do encerramento da viagem   lRet := .T.EndIfReturn lRet