Histórico da Página

...

Funcionamento:

O Ponto de Entrada PLSPACOTE permite a personalização da query que retorna os dados da tabela B43-(Aut x Proc x Pacote). O programa sem customização retorna os itens do pacote obrigatórios que são do tipo 0-Procedimentos e 5-Orteses/Próteses. Também é possível aplicar uma regra para distribuição de valores e taxas de cada procedimento em separado, além da quantidade ocorrida. É possível também escolher se o código do pacote será enviado ou não.

Detalhamento do Parâmetro:

cAlias possui os dados da informação da guia para fazer a consulta na tabela B43, onde:

(cAlias)→CODOPE = Código da Operadora
(cAlias)→CODLDP = Local de Digitação
(cAlias)→CODPEG = Código PEG
(cAlias)→NUMERO = Número da Guia
(cAlias)→BD6_ORIMOV = Origem do Movimento
(cAlias)->BD6_SEQUEN= Sequencial do Evento

Detalhamento do Retorno:

Posição 1

aRet aRet[1] - Flag -> é uma Flag, onde 1-Envia Pacote principal | e 2-Não envia Pacote principal.

Na primeira posição do array de retorno aRet, fica a Flag que sinaliza que a exportação do XML deverá ocorrer com ou sem o pacote principal. 

Com a Flag = 1, será enviado o pacote principal como um dos procedimentos, além da sua composição que será retornada de forma personalizada no Ponto de Entrada PLSPACOTE.

Com a Flag = 2, o envio será feito sem o pacote principal, apenas com sua composição que será retornada de forma personalizada no Ponto de Entrada PLSPACOTE.

Retornos possíveis para aRet[1]:

aRet = {1,...} ou aRet = {2,...}

Demais posições

Após a primeira posição, cada posição "nX" é um item do pacote
aRet[nX][1]:Código da Tabela
aRet[nX][2]:Código do Procedimento
aRet[nX][3]:Descrição do Procedimento
aRet[nX][4]:Tipo do Procedimento
aRet[nX][5]:Nível no Pacote
aRet[nX][6]:Id do item
aRet[nX][7]:Sequecial do item
aRet[nX][8]:Recno na Tabela
aRet[nX][9]:Valores
     aRet[nX][9][1] vl_ServCobrado
     aRet[nX][9][2] vl_FilmeCobrado
     aRet[nX][9][3] vl_CO_Cobrado
aRet[nX][10]:Taxas
     aRet[nX][10][1] tx_AdmServico
     aRet[nX][10][2] tx_AdmFilme
     aRet[nX][10][3] tx_AdmCO
aRet[nX][11]:Quantidade

...