CPC-BOSAU-PROCESSA-A500.P
Produto: | Gestão de Planos de Saúde |
| Módulo: | HRC |
| Versão: | A partir da 12.1.29.15, 12.1.31.10 e 12.1.32.5 |
| Assuntos: | cpc-bosau-processa-A500 |
- Programa para importação do PTU A500 XML.
- Caso o cliente não queira executar a chamada da CPC deve colocar "CPC ativo" como "não" no seu cadastro.
Pontos de utilização
- "ANTES-CRIA-DOC" - Permite a validação e/ou alteração dos dados dos documento e movimentos importados antes da criação dos registros nas tabelas do banco de dados;
- "DEPOIS-CRIA-DOC" - Ponto localizado no final do processo após a criação dos documentos com os movimentos importados, nesse ponto as tabelas temporárias (tmp-documento, tmp-procedimento e tmp-insumo) possuem a chave do documento/movimento criado na base o que possibilita a localização dos registros. A alteração das tabelas temporárias não terão impacto na importação dos movimentos.
Include das definições das tabelas temporárias
- {cpc/cpc-bosau-processa-A500.i}
Tabelas de entrada e de saída
def temp-table tmp-cpc-processa-a500-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(15)"
field in-evento-programa as char format "x(06)"
field idi-tipo-arquivo-ptu as integer. |
Definição campo a campo da tabela de entrada- in-evento-programa - nome do evento (utilizado para pontos que possuem múltiplas chamadas);
- nm-ponto-chamada-cpc - nome do ponto de chamada da CPC;
- idi-tipo-arquivo-ptu - indicador do tipo de arquivo importado. Valores: 500 - PTU A500 Cobrança, 520 - PTU A500 Aviso.
def temp-table tmp-cpc-import-a500-saida no-undo
field lg-undo-retry as log
field cd-erro as integer
field ds-mensagem as char format "x(75)". |
Definição campo a campo da tabela de saída
- lg-undo-retry - campo que indica se ocorreram erros na CPC. Deve retornar "yes" se ocorrer algum erro ou "no" se o processo for concluído sem erros;
- cd-erro - código do erro, pode ser valor zero.
- ds-mensagem - mensagem de erro que deve ser retornada para o programa chamador caso ocorra algum erro na CPC;
O retorno de um registro da tabela temporária de saída tmp-cpc-import-a500-saida é obrigatório |
O programa da CPC deve receber as tabelas tmp-documento, tmp-procedimento e tmp-insumo que estão definidas na include:
- {hrc/bosau/bosau-processa-a500.i}
Exemplo de