PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  ADVPL
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
Remover aglutinação na geração da cotação
Versão:
12.1.23
Plataforma:
Microsoft
Complemento:
DB:
SQL Server
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário JAMERSON19 JAMERSON19 em 19/06/2020, 14:58 h
Local: PE  Registro: 11/10/2019  Postagens: 3
Como remover aglutinação na geração da cotação, com os pontos de entrada:
MA131QS e MA131KEY. Rotina GERAÇÃO DE COTAÇÃO MATA131

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário JAMERSON19 JAMERSON19 em 19/08/2021, 12:23 h
Local: PE  Registro: 11/10/2019  Postagens: 3
Para conhecimento de todos segue o código dos ponto entradas citados, funcionando corretamente.

#Include ‘Protheus.ch‘

User Function MA131KEY()

     Local cRet := ‘‘
     Local cKey := ParamIXB[1]

     //MSGALERT(‘Ponto de Entrada: MA131KEY‘)

     If ‘C1_OK‘ $ Upper( cKey )
     
         cRet := ‘C1_FILIAL+C1_OK+C1_GRADE+C1_FORNECE+C1_LOJA+C1_PRODUTO+C1_DESCRI+C1_CC+C1_CONTA+C1_ITEMCTA+C1_CLVL+C1_FILENT‘
     
     Else
     
        cRet := ‘C1_FILIAL+C1_GRADE+C1_FORNECE+C1_LOJA+C1_PRODUTO+C1_DESCRI+C1_CC+C1_CONTA+C1_ITEMCTA+C1_CLVL+C1_FILENT‘
     
     EndIf


Return cRet




#Include ‘Protheus.ch‘

User Function MA131QSC()
     
     Local bQuebra := PARAMIXB[1]

     //MSGALERT(‘Ponto de Entrada: MA131QSC‘)

     bQuebra:= { || C1_FILENT+C1_GRADE+C1_FORNECE+C1_LOJA+C1_PRODUTO+C1_OBS}

Return bQuebra

Para postar no Fórum você precisa efetuar o seu login ou se registrar

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal