Tempo aproximado para leitura: 00:04:31 min
Dúvida
Como solucionar o erro Prov. Receita: 2917 - Vl ZERADO apresentado na geração do Demonstrativo de Provisão de Receita?
Ambiente
Saúde - Planos Linha Datasul - Faturamento - Todas as versões
Solução
No processo de Provisionamento da Receita, os dados utilizados para validação das informações são do histórico do procedimento (tabela histor-movimen-proced).
- Quando o campo histor-movimen-proced.lg-anestesista estiver como SIM (campo Anest: da mensagem de erro):
O provisionamento irá buscar a quantidade de honorários médicos diretamente da tabela portproc (rc0110s), tendo como chave de busca a tabela de preço (histor-movimen-proced.cd-tab-preco-proc-cob), o porte anestésico (histor-movimen-proced.cd-porte-anestesico-cob) e a data limite (histor-movimen-proced.dt-base-valor).
Sendo assim, é necessário verificar qual o porte anestésico cadastrado na histor-movimen-proced que está acusando erro, e então buscar o registro da tabela portproc correspondente, onde a quantidade de honorários médicos cadastrada deverá ser diferente de zero.
Para saber os dados corretos a serem localizados no programa RC0110S, utilize o script abaixo, executando o mesmo em Editor Progress conectado aos bancos de dados em que está sendo realizado o processo, informando os dados da chave do movimento que consta na mensagem de erro, e então será apresentada uma mensagem em tela com os dados da tabela de histórico que devem ser consultados no RC0110S para ajustar a quantidade de honorários médicos:
find first histor-movimen-proced
where histor-movimen-proced.cd-unidade = /*informe a unidade*/
and histor-movimen-proced.cd-unidade-prestadora = /*informe a unidade prestadora*/
and histor-movimen-proced.cd-transacao = /*informe a transacao*/
and histor-movimen-proced.nr-serie-doc-original = /*informe a serie*/
and histor-movimen-proced.nr-doc-original = /*informe o documento original*/
and histor-movimen-proced.nr-doc-sistema = /*informe o documento sistema*/
and histor-movimen-proced.nr-processo = /*informe o processo*/
and histor-movimen-proced.nr-seq-digitacao = /*informe a seq de digitacao*/
no-lock no-error.
if avail histor-movimen-proced then
MESSAGE "Tabela: " histor-movimen-proced.cd-tab-preco-proc-cob skip
"Porte: " histor-movimen-proced.cd-porte-anestesico-cob skip
"Data: " histor-movimen-proced.dt-base-valor
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
- Quando o campo histor-movimen-proced.lg-anestesista estiver como NÃO (campo Anest: da mensagem de erro):
O provisionamento irá buscar a quantidade de honorários médicos diretamente da tabela taprampr (pr0110k), tendo como chave de busca a tabela de preço (histor-movimen-proced.cd-tab-preco-proc-cob), o código do procedimento e a data limite (histor-movimen-proced.dt-base-valor).
Sendo assim, é necessário verificar qual a tabela de preço cadastrado na histor-movimen-proced que está acusando erro, e então buscar o registro da tabela taprampr correspondente, onde a quantidade de honorários, operacional ou filme cadastrada deverá ser diferente de zero.
Para saber os dados corretos a serem localizados no programa PR0110K, utilize o script abaixo, executando o mesmo em Editor Progress conectado aos bancos de dados em que está sendo realizado o processo, informando os dados da chave do movimento que consta na mensagem de erro, e então será apresentada uma mensagem em tela com os dados da tabela de histórico que devem ser consultados no PR0110K para ajuste, lembrando que o código do procedimento consta na mensagem de erro:
find first histor-movimen-proced
where histor-movimen-proced.cd-unidade = /*informe a unidade*/
and histor-movimen-proced.cd-unidade-prestadora = /*informe a unidade prestadora*/
and histor-movimen-proced.cd-transacao = /*informe a transacao*/
and histor-movimen-proced.nr-serie-doc-original = /*informe a serie*/
and histor-movimen-proced.nr-doc-original = /*informe o documento original*/
and histor-movimen-proced.nr-doc-sistema = /*informe o documento sistema*/
and histor-movimen-proced.nr-processo = /*informe o processo*/
and histor-movimen-proced.nr-seq-digitacao = /*informe a seq de digitacao*/
no-lock no-error.
if avail histor-movimen-proced then
MESSAGE "Tabela: " histor-movimen-proced.cd-tab-preco-proc-cob skip
"Data: " histor-movimen-proced.dt-base-valor
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
0 Comentários