Histórico da Página

...

field nm-ponto-chamada-cpc                  as char format "x(06)"
field lg-mensagem-na-tela                      as log
field nr-rowid-proposta                            as rowid
field dt-base-valor                                    as date
field cd-modulo                                        as int format "999"
field nr-rowid-notaserv                            as rowid
field lg-prestador-cooperado                  as log
field in-entidade                                       like evenimp.in-entidade
field cd-imposto                                       like evenimp.cd-imposto
field cd-evento                                         like evenimp.cd-evento
field dt-vigencia                                       like evenimp.dt-vigencia-ini
field cd-unidade-grupo                            like evengrimp.cd-unidade-grupo
field cd-grupo-contratante                       like evengrimp.cd-grupo-contratante
field cd-compl-grupo-contrat                  like evengrimp.cd-compl-grupo-contrat
field nr-insc-contratante                          like evenctrimp.nr-insc-contratante
field vl-base-imp                                     like fatueven.vl-evento
field qt-dias-inter                                     as int
field vl-mov                                             as dec
field dt-emissao                                      as date format "99/99/9999"
field r-ter-ade                                          as rowid.
field cd-modalidade                                like propost.cd-modalidade
field cd-plano                                          like propost.cd-plano
field cd-tipo-plano                                  like propost.cd-tipo-plano
field dt-validade                                      as date
field r-mov-insu                                      as rowid
field nr-proposta                                     like propost.nr-proposta
field vl-internacao                                  as dec
field vl-franq-internacao                        as dec  as dec

                            field in-atos-cooperados                        as int format "9"
                            field cd-contratante                                 like contrat.cd-contratante
                            field nm-contratante                                like contrat.nm-contratante
                            field nr-rowid-movimento                        as rowid
                            field in-tipo-movimento                            as char
                            field cd-unidade                                       like moviproc.cd-unidade
                            field cd-unidade-prestadora                    like moviproc.cd-unidade-prestadora

                            field cd-transacao                                    like moviproc.cd-transacao
                            field nr-serie-doc-original                         like moviproc.nr-serie-doc-original
                            field nr-doc-original                                  like moviproc.nr-doc-original
                            field nr-doc-sistema                                 like moviproc.nr-doc-sistema
                            field nr-processo                                      like moviproc.nr-processo
                            field nr-seq-digitacao                               like moviproc.nr-seq-digitacao
                            field h-tmp-erro                                        as handle.

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc – Indica o ponto de chamada, que pode ser "ALT-TMP-RTCLPAR", "APOS-GERACAO", "VERIFICA-TERMO", "TRATA-FORMA-PAG", "APÓS-CALC-FRANQ".
• lg-mensagem-na-tela – Indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem-relatorio deve ser preenchido. (não obrigatório).
• nr-rowid-proposta – Identificação do registro da proposta
• dt-base-valor – Data base do movimento.
• cd-modulo – Código do módulo do movimento
• nr-rowid-notaserv – Identificação do registro da nota de serviço
• lg-prestador-cooperado - identificação do prestador se é cooperado ou credenciado.
• in-entidade – Entidade que pertence a estrutura que está sendo calculada.
• cd-imposto – Código do imposto que está sendo calculado.
• cd-evento – Código do evento que está sendo calculado
• dt-vigencia – Data de vigência do imposto que está sendo calculada.
• cd-unidade-grupo – Código da unidade do grupo do contratante que está sendo calculado.
• cd-grupo-contratante – Grupo do contratante que está sendo calculado.
• cd-compl-grupo-contratante – Código do complemento do grupo do contratante que está sendo calculado.
• nr-insc-contratante – Número da inscrição do contratante que está sendo calculado.
• vl-base-imp – Valor da base de cálculo do imposto que está sendo calculado.
• qt-dias-inter – Quantidade de dias de Internação do Movimento.
• vl-mov – Valor do Movimento.
• dt-emissao – Data de emissão do movimento.
• r-ter-ade - Campo que passa para a CPC o registro da tabela de Termo de Adesão.
• cd-modalidade – Código da modalidade
• cd-plano – Código do plano
• cd-tipo-plano – Código do tipo de plano
• dt-validade – Data de validade
• r-mov-insu – Rowid do movimento
• nr-proposta – Número da Proposta
• vl-internacao – Valor de Internação
• vl-franq-internacao – Valor da franquia de internação
• h-tmp-erro - handle da tabela temporária de erro.

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

...

field qt-movto                                        like mov-insu.qt-insumo
field lg-undo-retry                                 as logical
field ds-mensagem-erro                      as char format "x(75)"
field lg-continua                                   as log initial yes
field vl-base-imp                                  like fatueven.vl-evento
field vl-franquia                                    as dec
field vl-real-pago                                  like mov-insu.vl-real-pago

                            field cd-modalidade                             like tiplesp.cd-modalidade
                            field cd-plano                                       like tiplesp.cd-plano
                            field cd-tipo-plano                                like tiplesp.cd-tipo-plano.

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

...