CPC-RC0514N.P

• Rotina utilizada para permitir a operadora alterar/consultar o status do lote em importação.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.
• Glosar movimentos quando a Guia, Carteira, Procedimento ou insumo forem inválidos.
• Rotina utilizada para permitir a alteração de dados da tabela temporária de documentos antes de sua consistência via API.
• Rotina que permite a verificação dos valores de movimentos.

Localização

• Dentro do programa rc0514n.p, quando da consistência do status do lote em importação.

Ponto de Utilização

• "STATUS-LOTE"
• "GLOSA-IMPORT"
• "ANTES-API"
• "ANT-PROCESSAR"
• "COMB-NAO-PERMIT"
• "APOS-IMP-DADOS"
• "FINAL-IMPORT"

Include das definições das tabelas temporárias

• CPC-RC0514N.I

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0514n-entrada

def temp-table tmp-cpc-rc0514n-entrada no-undo

field in-evento-programa              as char format "x(06)"
field nm-ponto-chamada-cpc        as char format "x(15)"
field cd-unidade                            like loteimp.cd-unidade
field cd-prestador                          like loteimp.cd-prestador
field nr-lote                                    like loteimp.nr-lote
field nr-sequencia                         like loteimp.nr-sequencia
field in-status-lote                          like loteimp.in-status-lote
field cd-unidade-prestadora           like preserv.cd-unidade
field cd-transacao                         like docrecon.cd-transacao
field nr-serie-doc-original               like docrecon.nr-serie-doc-original
field nr-doc-original                        like docrecon.nr-doc-original
field in-tipo-tabela                          as int
field nr-seq-interno                        like docretmp.nr-seq-interno
field cd-tipo-insumo                      like insumo.cd-tipo-insumo
field cd-insumo                             like mov-itmp.cd-insumo
field nr-processo                           like moviptmp.nr-processo
field nr-seq-digitacao                    like moviptmp.nr-seq-digitacao

field cd-unidade-principal             as int
field cd-prestador-principal          as int
field cd-unidade-carteira              like docretmp.cd-unidade-carteira
field cd-carteira-usuario               like docretmp.cd-carteira-usuario.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-rc0514n.p.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
• cd-unidade – Código da Unidade do Prestador;
• cd-prestador – Código do Prestador;
• nr-lote – Número do Lote em importação;
• nr-sequencia – Número da Seqüência do Lote;
• in-status-lote – Indicador do status do lote em importação. 
• cd-unidade-prestadora – Código da Unidade Prestadora;
• cd-transacao – Código da Transação;
• nr-serie-doc-original – Número da Série do documento;
• nr-doc-original – Número do documento;
• in-tipo-tabela –
• nr-seq-interno –
• cd-tipo-insumo – Código do Tipo de Insumo;
• cd-insumo – Código do Insumo;
• nr-processo – Número do processo do movimento;
• nr-seq-digitacao – Número da sequência de digitação do movimento;
• cd-unidade-principal – Código da Unidade do prestador principal;
• cd-prestador-principal – Código do prestador Principal;
• cd-unidade-carteira – Código da Unidade do beneficiário
• cd-carteira-usuario – Número do documento de identificação do beneficiário.

Tabela de saída tmp-cpc-rc0514n-saida

def temp-table tmp-cpc-rc0514n-saida no-undo

                                  field lg-erro                              as log
                                  field ds-mensagem                  as char format "x(80)"
                                  field lg-continua                      as log
                                  field cd-prestador-principal     as int
                                  field ds-prestador-principal     as char
                                  field in-tipo-mensagem           like mensiste.in-tipo-mensagem.

Definição campo a campo da tabela de saída

• lg-erro – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.
• ds-mensagem – Mensagem de aviso ou de erro.
• lg-continua – Variável que controla se o processo de importação do lote deve ou não continuar. Quando o valor deste parâmetro for NÃO, então deverá ter conteúdo válido (Diferente de brancos) no campo ds-mensagem.
• cd-prestador-principal - Código do prestador principal.
• ds-prestador-principal - Informação sobre o prestador principal.
• in-tipo-mensagem - Tipo de mensagem de saída.