CPC-AT0113C.p

Rotina utilizada para:

• Permitir regra específica do cliente na restrição de usuários quanto à exclusão de guias de autorização.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• Quando da solicitação da autorização origem, dentro do programa AT0113C.P

Ponto de Utilização

• "REGRAS-EXCLUSAO"
• "VER-CANCEL-GUIA"
• "ANTES-ENVIA-IE"
• "DADOS-GUIA"

Include das definições das tabelas temporárias

• CPC-AT0113C.I

Tabelas de entrada e saída

Tabela de entrada tmp-cpc- at0113c-entrada

def temp-table tmp-cpc-at0113c-entrada no-undo

field in-evento-programa        as char format "x(15)"
field nm-ponto-chamada-cpc      as char format "x(15)"
field r-guia-atendimento        as rowid
field cd-userid                 as char format "x(12)"
field nr-rowid-guiautor         as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama CPC-AT0113C.P. O valor desse campo pode ser "GRUPO-AUDITORIA" somente para o ponto "REGRAS-EXCLUSAO" ;
• nm-ponto-chamada-cpc – Nome do ponto de cpc;
• r-guia-atendimento – Rowid da tabela guiautor;
• cd-userid – Usuário logado ao sistema para a digitação da guia;
• nr-rowid-guiautor – Rowid da tabela guiautor. 

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

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

 field lg-permite-excluir        as log
 field ds-mensagem               as char format "x(75)"
 field lg-undo-retry             as log
 field lg-cancela                as log
 field cd-unidade-carteira       like guiautor.cd-unidade-carteira.

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

• lg-permite-excluir – Quando ativo, permite ao usuário excluir a guia sem validar seu grupo de usuários. Quando inativo, nada é feito;
• ds-mensagem – É a mensagem que a operadora quer que seja apresentada ao usuário quando da ocorrência de erro/restrição no processo de verificação/consistencia de exclusão da guia;
• lg-undo-retry – Indica a ocorrência de erro no processo de exclusão da guia;
• lg-cancela – Indica se a guia será ou não cancelada;
• cd-unidade-carteira – Codigo da unidade da carteira do beneficiário.