Histórico da Página

...

• "SUBST-PRES-EXEC"
• "LIMITA-DIGITOS"
• "ADICIONAL-URGE"
• "DEFAULT-ANEST"
• "CONTA-ANEST"
• "ENTIDADE"
• "HORA-URGENCIA"
• "MOSTRA-NORMA"
• "VAL-QTDE-PROC"
• "VALIDA-ANEST"
• "VALIDA-GLOSA"
• "MOSTRA-MENSAGEM"
• "APOS-VALORIZA"
• "ANT-INC-PACOTE"
• "ANTES-QT-COB"
• "APOS-EXIBE-VAL": liberação a partir da 12.1.2301.
• "FIM-INC-PROCED":  liberação a partir da 12.1.2307.
• "ANT-GRAVA-PROC" - a partir da versão 12.1.2407.
  
  

Include das definições das tabelas temporárias

...

field in-evento-programa                           as char format "x(10)"
field nm-ponto-chamada-cpc                     as char format "x(15)"
field cd-unidade-executante                      like moviproc.cd-unidade-prestador
field cd-prestador-executante                    like moviproc.cd-prestador
field cd-procedimento                               as int format 99999999
field cd-esp-prest-executante                    like moviproc.cd-esp-prest-executante
field dt-realizacao                                      like moviproc.dt-realizacao
field nr-rowid-moviproc                              as rowid
field nr-rowid-docrecon                             as rowid
field qt-digitos-proced                               as handle
field lg-anestesista                                   as log
field cd-proc-insu                                      like presmovt.cd-proc-insu
field cd-unidade-carteira                           like car-ide.cd-unimed
field lg-urgencia                                       as log
field qt-procedimento                               as int
field cd-tab-preco-proc                             like propost.cd-tab-preco-proc
field lg-rtvalglo-cpc                                   as log
field cd-unidade-guia                               like guiautor.cd-unidade
field aa-guia-atendimento                        like guiautor.aa-guia-atendimento
field nr-guia-atendimento                         like guiautor.nr-guia-atendimento
field nr-rowid-tranrevi                               as rowid
field cd-tipo-cob-cpc                                like moviproc.cd-tipo-cob
field vl-uso-indevido-cpc                          like moviproc.vl-perc-usu-indevido
field cd-validacao-cpc                              like moviproc.cd-validacao
field cd-user-validacao-cpc                      like moviproc.cd-user-validacao
field cd-forma-pagto-cob-cpc                   like formpaga.cd-forma-pagto
field cd-tipo-pagamento-cpc                    like moviproc.cd-tipo-pagamento
field dt-realizacao-cpc                              like moviproc.dt-realizacao
field cd-tipo-insumo-cpc                           like mov-insu.cd-tipo-insumo
field cd-insumo-cpc                                  like mov-insu.cd-insumo
field cd-unidade-cpc                                 like moviproc.cd-unidade
field cd-unidade-prestadora-cpc               like moviproc.cd-unidade-prestadora
field cd-transacao-cpc                              like moviproc.cd-transacao
field nr-serie-doc-original-cpc                    like moviproc.nr-serie-doc-original
field nr-doc-original-cpc                            like moviproc.nr-doc-original
field nr-doc-sistema-cpc                           like moviproc.nr-doc-sistema
field nr-processo-cpc                                like moviproc.nr-processo
field nr-seq-digitacao-cpc                         like moviproc.nr-seq-digitacao
field vl-cobrado                                        like moviproc.vl-cobrado
field lg-trab-cooperado                             as log
field pc-taxa-acp                                      like unicamco.pc-taxa-acp
field pc-taxa-aca                                      like unicamco.pc-taxa-aca
field vl-principal                                        like moviproc.vl-principal
field vl-auxiliar                                          like moviproc.vl-auxiliar
field vl-taxa-out-uni-prin                           like moviproc.vl-taxa-out-uni-prin
field vl-taxa-out-uni-auxi                          like moviproc.vl-taxa-out-uni-auxi
field cd-unidade-prest-principal                like unimed.cd-unimed
field cd-prestador-principal                      like moviproc.cd-prestador
field lg-inclui-pacote                                as log
field qt-repasse                                       like moviproc.qt-repasse
field cd-local-atendimento                       like locaaten.cd-local-atendimento
field cd-pacote                                         like moviproc.cd-pacote.

Definição campo a campo da tabela de entrada

field h-buffer-moviproc                           as handle
field  nm-prestador-exec                         as char
field  cd-conselho-pre-exec                    as char
field  nr-conselho-exec                           as char
field  en-uf-conselho-exec                      as char
field  cd-cpf-exec                                    as char
field  hr-realizacao-ini                             as char

field  hr-realizacao-fim                            as char. 

Definição campo a campo da tabela de entrada

• in-evento-in-evento-programa– Evento do programa que chama cpc-rc0311b6.P."INCLUI". "PROC"."INSU".
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
• cd-unidade-executante – Código da unidade do prestador executante.
• cd-prestador-executante – Código do prestador executante.
• cd-procedimento – Código do procedimento/insumo.
• cd-esp-prest-executante – Código da especialidade do prestador executante do procedimento
• dt-realizacao – Data de realização do movimento
• nr-rowid-moviproc – Rowid da tabela de movimentos de procedimentos.
• nr-rowid-docrecon – Rowid da tabela de movimentos de documentos.
• qt-digitos-proced – número de dígitos aceito no campo quantidade de procedimentos.
• lg-anestesista – Variável que indica se possui anestesista.
• cd-proc-insu – Código do insumo.
• cd-unidade-carteira – Unidade da carteira.
• lg-urgencia – Log que indica se o procedimento é de Urgência.
• qt-procedimento – Quantidade do procedimento.
• cd-tab-preco-proc – Código da tabela de preços do procedimento.
• lg-rtvalglo-cpc - Campo que informa se o movimento foi validado ou não.
• cd-unidade-guia - Código da unidade da guia.
• aa-guia-atendimento - Ano da guia de atendimento.
• nr-guia-atendimento - Número da guia de atendimento.
• nr-rowid-tranrevi - Campo que envia o registro completo da tabela tranrevi.
• cd-tipo-cob-cpc - Tipo de cobrança.
• vl-uso-indevido-cpc - Valor do uso indevido pelo beneficiário.
• cd-validacao-cpc - Código de validação do movimento.
• cd-user-validacao-cpc - Código do usuário de validação.
• cd-forma-pagto-cob-cpc - Forma de pagamento.
• cd-tipo-pagamento-cpc - Tipo de pagamento.
• dt-realizacao-cpc - Data de realização.
• cd-tipo-insumo-cpc - Código do tipo de insumo.
• cd-insumo-cpc - Código do insumo.
• cd-unidade-cpc - Código da unidade da operadora que esta digitando o movimento.
• cd-unidade-prestadora-cpc - Código da unidade da operadora que prestou o serviço.
• cd-transacao-cpc - Código da transação.
• nr-serie-doc-original-cpc - Número de série do documento original.
• nr-doc-original-cpc - Número do documento original.
• nr-doc-sistema-cpc - Número do documento.
• nr-processo-cpc - Número do processo.
• nr-seq-digitacao-cpc - Número da sequência da digitação.
• vl-cobrado – Contém o valor cobrado do insumo.
• Lg-trab-cooperado – Indica prestador cooperado.
• Pc-taxa-acp – Percentual de taxa cobrada sobre os atos médicos principais
• Pc-taxa-aca – Percentual de taxa cobrada sobre os atos médicos auxiliares
• Vl-principal - Valor principal do procedimento
• Vl-auxiliar – Valor auxiliar – Valor auxiliar do procedimento
• Vl-taxa-out-uni-prin – Valor da taxa de intercambio sobre o valor principal do procedimento
• Vl-taxa-out-uni-prin auxi – Valor da taxa de intercambio sobre o valor auxiliar do procedimento
• cd-unidade-prest-principal - Código da unidade do prestador principal
• cd-prestador-principal - Código do prestador principal do procedimento
• Vl-taxa-out-uni-auxi – Valor da taxa de intercambio sobre o valor auxiliar do procedimento
• cd-unidade-prest-principal - Código da unidade do prestador principal
• cd-prestador-principal - Código do prestador principal
• lg-inclui-pacote - indica se o movimento está sendo incluído por um pacote.
• qt-repasse - Valor do campo Qt Repasse.
• cd-local-atendimento - Local de atendimento.
• lg-inclui-pacote - indica se o movimento está sendo incluído por um pacote.
• qt-repasse - Valor do campo Qt Repasse.
• cd-local-atendimento - Local de atendimento.
• cd-pacote - Código do pacote
• h-buffer-moviproc  - Handle da tabela referente aos movimentos (procedimentos).
• nm-prestador-exec - Nome prestador executante.
• cd-conselho-pre-exec - Código conselho prestador executante.
• nr-conselho-exe - Número conselho prestador executante.
• en-uf-conselho-exec - UF conselho prestador executante.
• cd-cpf-exec - CPF prestador executante.
• hr-realizacao-ini - Hora realizacao inicial.cd-pacote - código do pacote

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

...