Descrição | GFEXFB04 – Indicar quais os componentes adicionais por emitente podem ser utilizados no cálculo do frete |
---|---|
Observações | O desenvolvimento da rotina customizada deve ser realizado utilizando a tabela GUC (Componente Tarifa x Emitente) e a tabela temporária de Cálculo de Frete (cTRBTCF), as quais estarão posicionadas no momento da execução. |
Idioma | Português(Brasil) |
Versões | 11.80 |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Parâmetros | Este PE não possui parâmetros |
Retorno | Variável lógica que indica se o componente adicional poderá ser utilizado no cálculo de frete |
Eventos de chamada do Ponto de Entrada | Cálculo de Frete |
Programa Fonte | GFEXFUNB.PRW |
Exemplo:
Exemplo
User Function GFEXFB04() Local aAreaAnt := GetArea() Local lRet := .F. Local cGrpCom := '' //Grupo do emitente no componente tarifa x emitente Local cGrpCli := '' //Grupo ao qual o cliente pertence DbSelectArea('GU3') DbSetOrder(1) DbSeek(xFilial('GU3')+GUC->GUC_EMICOM) cGrpCom := GU3->GU3_CDGREM DbSeek(xFilial('GU3')+(cTRBTCF)->CDEMIT) cGrpCli := GU3->GU3_CDGREM //Se o cliente pertencer ao mesmo grupo que o emitente vinculado ao componente adicional, //este componente será considerado no cálculo de frete If cGrpCom == cGrpCli lRet := .T. EndIf RestArea(aAreaAnt) Return lRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas