Histórico da Página

...

#INCLUDE 'PROTHEUS.CH'

User Function GTTITPOS()
Local aDadosSE1 := ParamIXB[1]
Local cChaveGQM := ParamIXB[2]

GQM->(dbSetOrder(1))

If GQM->(dbSeek(cChaveGQM))
    AADD(aDadosSE1, {'E1_TESTE', GQM->GQM_ESTAB, NIL})
Endif

Return aDadosSE1

• O ponto de entrada GTTITTEF será acionado antes da chamada do ExecAuto da função FINA040, este ponto de entrada irá permitir inserir mais campos customizados  da tabela SE1 na geração do título.
  • Parâmetros do ponto de Entrada GTTITTEF:
    1. ParamIXB[1] → Array com os dados a serem gravados na tabela SE1 pelo ExecAuto da função FINA040.
    2. ParamIXB[2] → conteúdo texto contendo a chave para posicionar a tabela GZP de onde são extraídos os dados para gravação do título, a chave é composta pelos seguintes campos: GZP_FILIAL+GZP_CODIGO+GZP_CODBIL+GZP_ITEM
  • Retorno do ponto de Entrada GTTITTEF:
    • Array contendo todos os dados que serão gravados na tabela SE1 pelo ExecAuto da função FINA040.

#INCLUDE 'PROTHEUS.CH'

User Function GTTITTEF()
Local aDadosSE1 := ParamIXB[1]
Local cChaveGZP := ParamIXB[2]

GZP->(dbSetOrder(1))

If GZP->(dbSeek(cChaveGZP))
    AADD(aDadosSE1, {'E1_TESTE', GZP->GZP_ESTAB, NIL})
Endif

Return aDadosSE1

04. DEMAIS INFORMAÇÕES

05. ASSUNTOS RELACIONADOS

...