Histórico da Página

Informações Gerais

   Legenda: 1 – Inovação 2 – Manutenção (Os demais campos devem ser preenchidos para ambos os processos). 

Objetivo

 Desenvolver a estrutura  e os componentes que possibilitem adotar, para o processo de aprovação de documentos de fretes e faturas de fretes, um sistema de aprovações por nível de alçada, com possibilidade de integração com o módulo MLA do ERP Datasul.

Definição da Regra de Negócio

Atualmente o processo de aprovação de documentos de fretes faturas de fretes no SIGAGFE é realizado diretamente pelo programa de auditoria Auditoria de fretesFretes, sem a possibilidade de adoção de um sistema de hirarquiashierarquias, sequenciamento de aprovação ou por nível de alçada considerando os valores envolvidos.

 A partir deste desenvolvimento , será disponibilizado um novo processo aos clientes do SIGAGFE que utilizam o ERP Totvs TOTVS 12 / Datasul, para permitir a aprovação destes processos em nível de alçadas, com a integração ao módulo  MLA módulo MLA - Módulo Logístico de Aprovação (http://tdn.totvs.com/pages/releaseview.action?pageId=73077953).Aprovação de Processos Logísticos.

 Este sistema de aprovação terá como tem como função principal permitir a definição de  hierarquias de aprovação sobre os processos de frete (com nível de alçada), levando sempre para o MLA documento que passou pela conferência de fretes.    Assim, serão integrados os documentos de frete que foram bloqueados pelo  SIGAGFE SIGAGFE devido a divergência com o valor previsto ou com os dados de carga. As faturas de fretes serão enviadas após serem aprovadas pelo sistema, para que no MLA seja liberada a permissão de pagamento (integração com o módulo financeiroFinanceiro).

As faturas que forem bloqueadas por divergências com os valores de pré-faturas precisarão ser aprovadas primeiramente no SIGAGFE e então serão enviadas para o MLA para o processo de liberação de pagamento.(para os clientes que optarem por utilizar a pré-fatura) gerará o registro de pendência de aprovação no MLA no momento do seu bloqueio no GFE. Neste caso, a aprovação da divergência entre Fatura de frete x Pré-fatura já libera para a integração com o Financeiro, não necessitando aprovação dupla da fatura no MLA.

A integração com o módulo MLA deve ser ativada no programa de Parâmetros do Módulo - GFEX000, no qual, além da definição da integração da  A integração com o módulo MLA deverá ser ativada no programa de parâmetros do módulo, GFEX000, onde, além da definição da integração da aprovação dos processos com o MLA, também será definido se o valor a ser considerado para definição da alçada de aprovação será o valor total do documento ou a diferença entre previsto e realizado.

GFEXWSFUN:

• Na Function GFEWSGETDATA:

Incluir o tratamento para envio das informações ao Web Service: 

Case cTabela == "GW3" .AND. cCodInt == '6'

// Doc Frete e Cod integração seja Recebimento
cQuery += " AND (TAB.GW3_SITMLA = '2' OR TAB.GW3_SITMLA = '5' OR TAB.GW3_SITMLA = '8') "

Case cTabela == "GW6" .AND. cCodInt == '6'
// Fatura e Cod integração seja

Financeiro 
cQuery += " AND (TAB.GW6_SITMLA = '2' OR TAB.GW6_SITMLA = '5' OR TAB.GW3_SITMLA = '8') "

Criar bloco de envio de informações da tabela de fretes do GFE para o Datasul: 

tabela = GW3

operação = 6

As informações do Documento de frete enviados para o

WebServices serão:

 #GW3|GW3_FILIAL|GW3_CDESP|GW3_EMISDF|GW3_SERDF|GW3_NRDF|GW3_DTEMIS|GW3_TPDF|GW3_DTENT|GW3_CFOP|GW3_SIT|GW3_USUIMP|GW3_CDREM|GW3_CDDEST|GW3_VLDF|GW3_TAXAS|GW3_FRPESO|GW3_FRVAL|GW3_PEDAG|GW3_QTDCS|GW3_QTVOL|GW3_VOLUM|GW3_PESOR|GW3_PESOC|GW3_VLCARG|GW3_TPIMP|GW3_TRBIMP|GW3_BASIMP|GW3_PCIMP|GW3_VLIMP|GW3_CTE|GW3_MOTBLQ|GW3_DTBLQ|GW3_USUBLQ|GW3_ORIGEM|GW3_TPCTE|GW3_SITMLA|

• • Tratar o campo de valor do documento de frete (GW3_VLDF) para que seja enviada a diferença entre previsto e realizado, se o parâmetro MV_

• • VLDFMLA == 2.

A mensagem será complementada com

a descrição do resultado da conferência de frete

(Campo Observação) para apresentação

na consulta do MLA.

tabela = GW6

operação = 6

As informações da Fatura de frete enviados para o Web-Services serão:

#GW6|GW6_FILIAL|GW6_EMIFAT|GW6_SERFAT|GW6_NRFAT|GW6_DTEMIS|GW6_VLFATU|GW6_VLDESC|GW6_VLICMS|GW6_VLICRE|GW6_VLISS|GW6_VLISRE|GW6_VLJURO|GW6_DTCRIA|GW6_DTVENC|GW6_ORIGEM|GW6_SITAPR|GW6_DTBLOQ|GW6_HRBLOQ|GW6_USUBLO|GW6_MOTBLO|GW6_

OBS|GW6_SITMLA|

• • Tratar o campo de valor do documento de frete (GW6_VLFATU) para que seja enviada a diferença entre previsto e realizado, se o parâmetro MV_VLFTMLA == 2.

• Na Function  GFEWSSETDATA: 

Criar o tratamento do retorno do MLA do Datasul para o GFE.

Alterar, conforme a string de retorno  os campos:

Case cTabela == "GW3"

If cCodInt == '6'

GW3->GW3_SITMLA :=  aDados[7]  /*Situação da integração*/

GW3->GW3_MOTMLA := aDados[8] /* Motivo aprovação rejeição */

Se o campo GW3_SITMLA ficar com o valor ' 4=Atualizado ' então Executar o processo de aprovação (auditoria) de documentos de fretes através da execução da função GFEA066OK (.T.), passando os dados de aprovação como parâmetros:

GFEA066OK (.T., aDados[11] , aDados[10] , aDados[9] )

Se ficar com o valor '3=Rejeitado' ou '7=Enviado/Aguardando' então manter o documento como bloqueado, sem alterações.     

Case cTabela == "GW6"

If cCodInt == '6'

GW6->GW6_SITMLA :=  aDados[6]  /*Situação da integração*/

GW6->GW6_MOTMLA := aDados[7] /* Motivo aprovação rejeição */

Se o campo GW6_SITMLA ficar com o valor ' 4=Atualizado ' então

Executar o processo de aprovação (auditoria) de documentos de fretes através da execução da função GFEA071OK, passando os dados de aprovação como parâmetros:

GFEA071OK(aDados[11], aDados[10] ,  aDados[8], aDados[9] )

 Se ficar com o valor '3=Rejeitado'

 ou '7=Enviado/Aguardando' então manter a fatura como bloqueada, sem alterações.   

Atualizar

os

campos de usuário, data e hora de aprovação ou rejeição no MLA:

GW6->GW6_

DTAPR:=  aDados[8]

GW6->GW6_

USUAPR :=  aDados[9]

GW6->GW6_

HRAPR :=  aDados[10]

GFEX000:

• Na pasta Integrações Datasul,

•  seção Opções de Integração

• , incluir os parâmetros:
   - 
  • • MV_DFMLA - Aprovação de Doc. frete via MLA
  .
  • • - opções: 1=Não integra / 2=Integra com valor doc./ 3=Integra valor diferença prev./realizado.
   - 
  • • MV_FTMLA - Aprovação de faturas via MLA
  .
  • • -opções: 1=Não integra / 2=Integra com valor doc./ 3=Integra
  Obs.: Quando
  • • valor diferença prev./realizado.

  GFEA066:

  • Bloquear o programa para o uso quando o parâmetro MV_
  FTMLA estiver ativado, deve ser verificado se o parâmetro de integração automática de faturas com o financeiro está desativado. Caso contrário, deve ser apresentada mensagem ao usuário solicitando a desativação da integração automática e mantendo o parâmetro MV_FTMLA = 1.

  GFEA066:

  Bloquear o programa para o uso quando o parâmetro MV_DFMLA estiver ativado
  • DFMLA estiver ativo (diferente de 1). Ao acessar o programa, o usuário deve receber a mensagem informando que a aprovação de documentos será
  através da
  • pela integração com o MLA e não permitir o acesso:
  • "Sistema parametrizado para realizar a aprovação de documentos de fretes através do módulo MLA".
  • Na função GFEA066OK:
    • Tratar os dados de aprovação vindos do MLA. Atualmente, como a função não é acessada externamente, o programa utiliza variáveis privadas para atribuir os valores aos campos de data e usuário de aprovação.
    • Criar novos parâmetros de entrada da função com atribuição do motivo, usuário e data de aprovação. Definir os valores de padrão dos mesmos para os casos em que a função for chamada sem informação destes parâmetros:
  • •  

   Function GFEA066OK(lMotivo, cMotAprov, cUserAprov, dtAprov, hrAprov)

  Default cMotAprov := cMemo

  Default  cUserAprov := cUserAprov

  Default dtAprov := DDATABASE

  ...

  RecLock("GW3",.F.)

  GW3->GW3_MOTAPR := cMotAprov
  GW3->GW3_USUAPR :=  cUserAprov 
  GW3->GW3_SIT := "4"
  GW3->GW3_DTAPR := dtAprov

  GW3-> GW3_HRAPR :=hrAprov

  MsUnLock("GW3")

  Na Function GFEA071RA:

  No bloco onde a fatura é aprovada pelo sistema (GW6->GW6_SITAPR := "3"), atribuir ao campo GW6_SITMLA := 2 (Pendente) ou 6 (Não se aplica) considerando, verificando

  GFEA071:

  • Bloquear o programa para o uso quando o parâmetro MV_FTMLA estiver ativado. Ao acessar o programa, o usuário deve receber a mensagem informando que a aprovação de faturas de fretes será pela integração com o MLA e não permitir o acesso:  "Sistema parametrizado para realizar a aprovação de faturas de fretes através do módulo MLA".
  • Na função GFEA071OK:
    • Alterar a função para passar a gravar os valores, nos campos de aprovação da tabela GW6, enviados pela aprovação via MLA:
      

  Function GFEA071OK( cMemo, cUserAprov, dDataAprov, cHRAprov )

  Default cUserAprovMLA := cUserName

          Default dDataAprovMLA := dDataBase

          Default cHRAprovMLA := Time()

  -- 

  RecLock("GW6", .F.)

   

  GW6->GW6_MOTDES := cMemo

  GW6->GW6_SITAPR := "4"

  GW6->GW6_DTAPR := dDataAprov
  GW6->GW6_HRAPR :=  cHRAprov
  GW6->GW6_USUAPR := cUserAprov

  Endif 

  GW6->( MsUnlock() )

  ***O campo cMemo não precisa ser atribuído por uma variável diferente pois na chamada da função atual já é passada como parâmetro.

  • Na Function GFEA071RA:
    • Incluir a alteração do campo GW6_SITMLA para "2-Pendente", verificando os parâmetros de ERP Integrado ( 1=Datasul ) e Aprovação via MLA ( 1=Sim ).
   If  MV_ERPGFE == "1" .AND. MV_DFMLA  

   RecLock("GW6",.F.) 

   

           If lAprovMLA 

      

              If GW6->GW6_SITMLA :=="27" 

                  GW6->GW6_MOTMLA SITMLA:="8" 

               

   Else 

    GW6->GW6_MOTMLA:="" 

               Else 

                   

  GW6->GW6_SITMLA:="6"
  GW6->GW6_MOTMLA := " "

   

  2" 

       

  EndIf 

  GFEA070:

  Se o MLA estiver ativado para faturas e o ERP de integração for o Datasul. então desabilitar a ação relacionada "Atualizar Financeiro ERP" e  habilitar a "Desatualizar Financeiro ERP" somente quando estiver aprovado no MLA (GW6_SITMLA = 4).

   

  GFEA065:

  Alterar programa para que na validação do documento de fretes o campo de situação no MLA seja atualizado.

  Na Function GFEA065VP:

  Incluir o campo GW3_SITMLA := 2 e GW3_MOTMLA := " " na conferência de fretes, quando o documento não for aprovado.

  Quando aprovado, gravar o campo com o valor '6=Não se aplica': 

  Se o registro estiver aguardando aprovação no MLA (GW3_SITMLA == "7" ) e houve atualização no registro que alterou a situação para aprovado via Sistema, então deve ser enviada solicitação de desatualização do registro no MLA.

   

  lAprovar := GFEA065CO(oModel)

   If !lAprovar .AND. MV_ERPGFE == "1" .AND. MV_DFMLA  

                   oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","2")  /*Pendente Atualização */

                   oModel:LoadValue("GFEA065_GW3" ,"GW3_MOTMLA",")

           f  GW3->GW3_SITMLA == "7"

  Atualizar o documento no MLA com novo valor.

           Else       

          If 

             GW6->GW6_MOTMLA:="" 

               EndIf 

        Else 

              GW6->GW6_SITMLA:="6"// Não se aplica - sem integração com MLA. 

              GW6->GW6_MOTMLA:="" 

        EndIf 

        GW6->(MsUnlock())

  GFEA070:

  • Quando for solicitada a exclusão da fatura no SIGAGFE, atualizar o campo GW6_SITMLA para 9-Excluir, se a situação no MLA for 3=Rejeitado, 4=Atualizado ou 7-Enviado/aguardando.

  GFEA065:

  • Alterar programa para que na validação do documento de fretes o campo de situação no MLA seja atualizado.
  • Na Function GFEA065VP:
  • Incluir o campo GW3_SITMLA := 2 e GW3_MOTMLA := " " na conferência de fretes, quando o documento for ou não aprovado ( quando MV_ERPGFE == "1" .AND. MV_DFMLA  ). Caso contrário, gravar o campo com o valor 6=Não se aplica.
  • Se o registro estiver aguardando aprovação no MLA (GW3_SITMLA == "7" ) e houve atualização no registro que alterou a situação para aprovado via Sistema, então, deve ser enviada solicitação de desatualização do registro no MLA. 

  lAprovar := GFEA065CO(oModel)

   If !lAprovar .AND. MV_ERPGFE == "1" .AND. MV_DFMLA

   

    

           

  if  GW3->GW3_SITMLA == "7"

       

  oModel

   oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","

  5

  2")  /*

  pendente desatualização. Quer dizer que o documento foi alterado após ser enviado para o MLA */ 

  Pendente Atualização */

                   oModel:LoadValue("GFEA065_GW3" ,"GW3_MOTMLA",")

           If  GW3->GW3_SITMLA == "7"

  Else  ********

                 

   oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","

  2

  8")

   

    /*

  Pendente atualização.

  Atualizar registro de pendencia no MLA*/

   

   

                 

  oModel

   oModel:LoadValue("GFEA065_GW3" ,"GW3_MOTMLA",

  "Aprovado Via Sistema

  ")

  Endif

  endif

           Else       Else

         

    oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","6")  /* Não se aplica */

  If MV_ERPGFE == "1" .AND. MV_DFMLA 

    if  GW3->GW3_SITMLA == "7"

   

   

   

                 

     oModel:LoadValue("GFEA065_GW3" ,"GW3_

  MOTMLA

  SITMLA","

  ")EndIF

  5")  /* pendente desatualização. Quer dizer que o documento foi alterado após ser enviado para o MLA */ 

         

  EndIf 

  EndIf 

   

  GFEA065C:

  • Na  Function Conferencia():
    • Incluir o campo GW3_SITMLA := 2 e GW3_MOTMLA := " " na conferência de fretes, quando o documento for ou não
  for
  • • aprovado
  . Quando aprovado, gravar
  • • (considerar os parâmetros do módulo). Gravar o campo com o valor
  '
  • • 6=Não se aplica
  ': 
  • • quando não ativada a integração com o MLA de documentos de frete:

  lAprovado := GFEA065CO(oModelGW3)
  RecLock("GW3", .F.)

  If !lAprovado .AND.  MV_ERPGFE == "1" .AND.

   MV_DFMLA  

   MV_DFMLA  

     

             

   oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","2")  /*Pendente Atualização */

       oModel:LoadValue("GFEA065_GW3" 

       

  ,"GW3_MOTMLA",")

       if  GW3->GW3_SITMLA == "7"

          oModel:LoadValue("GFEA065_GW3" ,"GW3_

  MOTMLA

  SITMLA","8")

           Else             ***Aplicar as atualizações da função anterior ***** 

  if  GW3

   /* Atualizar registro no mla */ 

       endif

  Else

    If MV_ERPGFE == "1" .AND. MV_DFMLA 

        if  GW3->GW3_SITMLA == "7"

       

  oModel

       oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","5")  /* pendente desatualização. Quer dizer que o documento foi alterado após ser enviado para o MLA */ 

  Else

       Endif 

  else 

             oModel:LoadValue("GFEA065_GW3" ,"GW3_SITMLA","6")  /* Não se aplica. */ 

                   

   oModel

   oModel:LoadValue("GFEA065_GW3" ,"GW3_MOTMLA",") EndIf

  endif

        

      EndIf         MsUnlock

   MsUnlock()

  Tabelas Utilizadas

  • GW3 - Documento de fretes

  • GW6 – Fatura de fretes

  cHRAprov 

Protótipo de Tela

Não se aplica. 

Fluxo do Processo

 Não se aplica.

Dicionário de

Grupo de Perguntas

Não se aplica. 

Consulta Padrão

Não se aplica. 

Estrutura de Menu

Não se aplica. 

Cadastro de Papéis

Não se aplica.