Gravação de Guias Dinâmicas no Portal - PE PPLMGCB2
Descrição
Criada estrutura de pontos de entrada (PPLMGCAB e PPLMGCB2) nos fontes relacionados à gravação de dados das guias do Portal para que seja possível ao portal interpretar os campos criados pelo usuário, gravando-os nas tabelas de cabeçalho de guias de SP/SADT.
Neste artigo é abordada a utilização do Ponto de entrada PPLMGCAB, para acessar o artigo principal referente ao ponto de entrada PPLMGCB2 acessar esse link.
Programa Fonte: | PLSXMOV |
Função: | PLSXAUTP |
Parâmetros | Nome | Tipo | Descrição |
---|
cTipGui | Caracter | Tipo de Guia 1 - Consulta 2 - SADT 3 - Internação | aDados | Array | Dados do cabeçalho da Guia | aItens | Array | Dados dos itens da Guia |
|
Retorno: | Nome | Tipo | Descrição | Obrigatório | aGrvCust | Array | Array contendo os dados dos campos customizados a serem gravados. Estrutura: - [1] - Alias
- [2] - Nome do Campo Customizado
- [3] - Dado a ser gravado
| Sim |
|
Exemplo
#Include 'Protheus.ch'
#include "TOPCONN.CH"
User Function PPLMGCB2()
LOCAL cTipGui := paramixb[1]
LOCAL aDadCab := paramixb[2]
Local cCidCus := PLSRETDAD( aDadCab,"BEA_CIDCUS","")
Local aGrvCust := {{},{}}
aadd(aGrvCust[1],{"BEA","BEA_CIDCUS",cCidCus})
Return(aGrvCust)