cpc-rc0310p1

Rotina chamada no programa de processamento de lote guias XML TISS, onde permite efetuar o processamento batch.
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.
Localização
Dentro do programa rc0310p.p. Para o ponto de chamada "SCHEDULE", no início do programa e foi criado com intuito de executar automaticamente os parâmetros de seleção;
Dentro do programa rc0310p.p. Para o ponto de chamada "PREST-NAO-VINC", no tratamento do movimentos. Permitirá a operadora efetuar a troca de prestador executante, tranto de procedimentos quanto de insumos, para os documentos em processamento;
Ponto de Utilização
"SCHEDULE"
"PREST-NAO-VINC"
"OBS-XML-ERRO"
"DIR-XML"
"LOC-ATEN"
Include das definições das tabelas temporárias
cpc-rc0310p.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rc0310p-entrada
def temp-table tmp-cpc-rc0310p-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-unidade like moviptmp.cd-unidade
field cd-unidade-prestadora like moviptmp.cd-unidade-prestadora
field cd-transacao like moviptmp.cd-transacao
field nr-serie-doc-original like moviptmp.nr-serie-doc-original
field nr-doc-original like docrecon.nr-doc-original
field nr-seq-interno like moviptmp.nr-seq-interno
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 rw-movimento as rowid
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field ds-mensagem-obs as char format "x(100)"
field in-status-lote like loteimp.in-status-lote
field nm-diretorio as char format "x(30)"
field lg-imprime-rel as log init no
field cd-local-atendimento like locaaten.cd-local-atendimento
field cd-unidade-imp like docretmp.cd-unidade-imp
field cd-prestador-imp like docretmp.cd-prestador-imp
field tp-atendimento as int format 99
field tp-inter as int format 99.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-rc0310p;
nm-ponto-chamada – Nome do ponto de chamada. Para este programa poderá ser SCHEDULE ou PREST-NAO-VINC;
cd-unidade – Código da Unidade. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
cd-prestadora – Código da Unidade Prestador. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
cd-transacao – Código da Transação. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
nr-serie-doc-original – Código/Número de serie do documento. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
nr-doc-original – Número do documento. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
nr-seq-interno – Sequencia do Documento. Campo que faz parte da chave primaria do documento e também do movimento (procedimento ou insumo);
cd-insumo – Código do Insumo;
nr-processo – Número do processo a qual o movimento está vinculado. Campo que faz parte da chave primaria do movimento (procedimento ou insumo);
nr-seq-digitacao – Número da sequencia do movimento. Campo que faz parte da chave primaria do movimento (procedimento ou insumo);
rw-movimento – Rowid da tabela de movimento (procedimento ou insumo).
Aa-guia-atendiemnto – Ano da guia de atendimento.
Nr-guia-atendiemnto – Numero da guia de atendimento.
Ds-mensagem-obs – Variável com mensagem de observação.
In-status-lote – Status do lote.
Nm-diretorio – Nome do diretório.
LG-imprime-rel – retorna se será ou não impresso o relatório especifico.
Cd-local-atendimento – Código do local do atendimento.
Cd-unidade-imp – Código da unidade.
Cd-prestador-imp – código do prestador.
Tp-atendimento – tipo do atendimento
Tp-inter - tipo da internação.
Tabela de saída tmp-cpc-rc0310p-saida
def temp-table tmp-cpc-rc0310p-saida no-undo
field lg-undo-retry as log
field aa-periodo like perimovi.dt-anoref
field nr-periodo like perimovi.nr-perref
field lg-carga-arq as log
field lg-carga-autorizador as log
field lg-carga-grc as log
field lg-carrega as log
field lg-consiste as log
field lg-importa as log
field in-periodo as int
field lg-modifica-ident-prest as log
field lg-schedulado as log
field ds-mensagem as char format "x(75)"
field ds-mensagem-obs as char format "x(100)"
field ds-xml-erro like paramrc.char-3
field ds-dircarga like paramrc.char-5
field ds-dirresp like paramrc.char-6
field lg-imprime-rel as log init no
field cd-local-atendimento like locaaten.cd-local- atendimento
field tp-internacao as int format 99.
Definição campo a campo da tabela de saída
lg-undo-retry - Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
aa-periodo – Ano do período do movimento;
nr-periodo – Número do período(mês);
lg-carga-arq – Indicador da opção de parâmetros indicando que o arquivo será carregado via diretorio;
lg-carga-autorizador – Indicador da opção de parâmetros indicando que o arquivo será processado via Autorizador;
lg-carga-grc – Indicador da opção de parâmetros indicando que o arquivo será carregado via integração GRC;
lg-carrega – Indicador da opção de parâmetros indicando que o arquivo será somente carregado;
lg-consiste – Indicador da opção de parâmetros indicando que o arquivo será consistido;
lg-importa – Indicador da opção de parâmetros indicando que o arquivo será importado no Revisão de Contas;
in-periodo – Indicador do Período de movimentação de processamento da Conta XML TISS;
lg-modifica-ident-prest – Indicador da opção de parâmetros indicando se a identificacao do prestador será alterada em tempo de processamento;
lg-schedulado – Indica se a chamada para o programa de Processamento de Lotes Guias aconctecera de forma batch;
ds-mensagem – Descrição da mensagem de erro, quando a variável lg-undo-retry estiver ativa.
Ds-mensagem-obs – Variável com mensagem de observação.
Ds-xml-erro – caminho do XML de erro.
Ds-discraga – caminho de carga do XML.
Ds-disresp – caminho de resposta do XML.
LG-imprime-rel – retorna se será ou não impresso o relatório especifico.
Cd-local-atendimento – Código do local de atendimento.
Tp-internacao – Tipo da internação.