CPC-RC0713L.P

• Rotina utilizada para validar a entidade do módulo no cadastro.

Localização

• Após Validação do tipo de movimento.

Ponto de Utilização

• "ENTIDADE".

Include das definições das tabelas temporárias

• cpc-rc0713l.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0713l-entrada

tmp-cpc-rc0713l-entrada no-undo

field in-evento-programa                        as char format "x(15)"
field nm-ponto-chamada-cpc                 as char format "x(15)"
field cd-unidade-pres                              like presmovt.cd-unidade-pres
field cd-prestador                                    like presmovt.cd-prestador
field in-tipo-movimento                           like presmovt.in-tipo-movimento
field cd-tipo-insumo                                 like presmovt.cd-tipo-insumo
field cd-proc-insu                                    like presmovt.cd-proc-insu.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc- rc0713l.p.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0713l.i:
• "ENTIDADE"
• cd-unidade-pres – Código da unidade do prestador.
• cd-prestador – Código do Prestador.
• in-tipo-movimento – Tipo de movimento.
• cd-tipo-mimento – Código do Tipo de Movimento.
• cd-proc-insu – Código do insumo/procedimento.

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

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

field lg-undo-retry                            as log
field ds-mensagem                         as char format "x(75)"
field in-entidade                              like presmovt.int-2.

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.
• ds-mensagem – Deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com lg-undo-retry.
• in-Entidade – Entidade (Módulo).