Histórico da Página
...
def temp-table tmp-campos-layout-recebido recebido no-undo
field cd-transacao-ptu ptu as char format "x(05)"
field tp-cliente cliente as char format "x(15)"
field cd-unidade-origem origem as as char format "x(04)"
field cd-unidade-destino destino as char format "x(04)"
field nr-ident-origem origem as as char format "x(10)"
field nr-ident-destino destino as char format "x(10)"
field cd-unidade as char format "x(0410)"
field id-beneficiario cd-unidade as char format "x(13)"
field nr-via-cartao as char format "x(0204)"
field cdid-cid beneficiario as char format "x(04)"
field id-alto-custo as char format "x(0113)"
field nm-prestador nr-via-cartao as char format "x(25)"
field ds-observacao as char format "x(99902)"
field cd-unidade-prestador-req cid as as char format "x(04)"
field cdid-prestador-req alto-custo as as char format "x(0801)"
field cd-unidade-prestador nm-prestador as char format "x(04)"
field cd-prestador as char format "x(0825)"
field cd-especialidade-prestador as char format "x(03)"
field ds-just-internacao ds-observacao as as char format "x(200999)"
field qtcd-diasunidade-evol-patol prestador-req as char format "x(404)"
field tp-atendimento cd-prestador-req as char format "x(1)"
field tp-carater-atend as as char format "x(108)"
field dtcd-unidade-atendimento prestador as char format "x(804)"
field ds-linha-origem cd-prestador as char format "x(25608)"
field incd-classe-nota especialidade-prestador as char format "x(0203)"
field id-rn ds-just-internacao as as char format "x(01200)"
field tp-inter qt-dias-evol-patol as char format "x(014)"
field idtp-acidente atendimento as char format "x(01)"
field dt-sug-internacao as char format "x(081)"
field idtp-ordem-servico carater-atend as char format "x(01)"
field nr-ident-os as as char format "x(101)"
field nr-ver-tiss dt-atendimento as char format "x(07)"
field cd-uni-atend as char format "x(048)"
field nrds-versao-ptu linha-origem as char format "x(03)"
field nm-pro-solic-opme as as char format "x(70256)"
field nrin-telefone-opme classe-nota as as char format "x(1102)"
field end-email-opme id-rn as char format "x(6001)"
field ds-diag-cit-hist-quimio tp-inter as char format "x(1000)"
field ds-diag-cit-hist-radio as char format "x(1000)"
field ds-inf-relev-quimio as char format "x(1000)"
field ds-inf-relev-radio as char format "x(100001)"
field ds-pl-terap id-acidente as char format "x(999)"
field ds-quimio as char format "x(100001)"
field ds-radio dt-sug-internacao as char format "x(100008)"
field ds-opme id-ordem-servico as as char format "x(100001)"
field dsnr-just-tec ident-os as char format "x(999)"
field ds-mat-solic as as char format "x(99910)"
field idnr-ver-anexo tiss as char format "x"
field tp-sexo as char format "x(07)"
field nr-idade cd-uni-atend as char format "x(3)"
field tpRedeMIN as char format "x(0104)"
field idLiminar nr-versao-ptu as as char format "x(0103)"
field cdIBGE nm-pro-solic-opme as int
field protocoloAtendimento as as char format "x(2070)"
field token nr-telefone-opme as as char format "x(611)"
field tipoEtapaAutorizacao end-email-opme as int
field dataSolicitacao as date
field tipoGuia as int as char format "x(60)"
field tpAcomodacao ds-diag-cit-hist-quimio as char
field cd-prest-solic-recebido as char format "x(1000)"
field exec-numero-cbo ds-diag-cit-hist-radio as char
field nomePrestadorSolic as char format "x(1000)"
field siglaConselho ds-inf-relev-quimio as char
field numeroConselho as char
field unidadeFederativa as char format "x(1000)"
field ds-inf-relev-radio as char as char format "x(1000)"
field numeroCBO ds-pl-terap as char
field idCoberturaEspecial as char as char format "x(999)"
field saudeOcupacional ds-quimio as int
index i-campos is unique primary
cd-transacao-ptu.
Definição campo a campo da tabela de entrada e saída – Dados do documento
- cd-transacao-ptu – Código da transação PTU conforme manual PTU 2.8.
- tp-cliente – Código definido no manual PTU 2.8 campo TP_CLIENTE.
- cd-unidade-origem – Código da unidade que originou a solicitação.
- cd-unidade-destino – Código da unidade que recebeu a solicitação.
- nr-ident-origem – Numero da solicitação da unidade que originou a solicitação.
- nr-ident-destino – Numero da guia de autorização da unidade que recebeu a solicitação.
- cd-unidade – Código da unidade do beneficiário.
- id-beneficiario – Código de identificação do beneficiário.
- nr-via-cartao – Numero da via do documento de identificação do beneficiário.
- cd-cid – Código do CID.
- id-ato-custo – campo ID_ALTO_CUSTO do PTU 2.8
- nm-prestador – Nome do prestador.
- ds-observacao1, 2 e 3 – Observações gerais.
- cd-unidade-prestador-req – Código da unidade do prestasdor requisitante.
- cd-prestador-req – Código do prestador requisitante.
- cd-unidade-prestador – Código da unidade do prestador executante.
- cd-prestador – Código do prestador executante.
- ds-linha-origem – Descrição de observação oriunda da unidade que solicitou a autorização.
- in-classe-nota – Código da classe da nota para identificação do tipo da guia de autorização que deve ser gerada. Seu conteúdo pode ser:
01 – Consulta
02 – Exames SADT
03 – Atendimento Ambulatorial
04 – Internação Clínica
05 – Internação Cirúrgica
06 – Internação Obstétrica
07 – Odontologia
08 – Consulta em Emergência
09 - Internacao Hospital Dia
10 - Internacao Domiciliar
11 - Internacao Pediatrica
12 - Internacao Psiquiatrica
13 - Consultas Medicina Ocupacional
14 - Exames medicina ocupacional
15 - Remocao
16 - Pequena cirurgia
17 - Terapias
18 - Atendimento domiciliar
19 - SADT internado
20 - Quimioterapia
21 - Radioterapia
22 - TRS (terapia renal substitutiva)
23 - Consulta (primeira consulta)
24 - Consulta (seguimento)
25 - Consulta (pré-natal).
- id-rn - Indica se o beneficiário é recém-nato.
- tp-inter - Indica o Tipo de Internação.
- id-acidente - Indicador de Acidente.
- dt-sug-internacao - Data sugerida para a internação.
- id-ordem-servico - Indica se o pedido de autorização foi gerado através de uma comunicação de Ordem de Serviço.
- nr-ident-os - Número da Transação da Ordem de Serviço.
- nr-ver-tiss - Número de versão da TISS que o prestador enviou a transação.
- cd-uni-atend - Código da Unimed na qual o Beneficiário será atendido.
- nr-versao-ptu - Versão do PTU da Unimed Prestadora.
- nm-pro-solic-opme - Nome do Profissional Solicitante de OPME.
- nr-telefone-opme - Número de Telefone do Profissional Solicitante de OPME.
- end-email-opme - Endereço de E-mail do Profissional Solicitante de OPME.
- ds-diag-cit-hist-quimio - Descrição do diagnóstico citopatológico e histopatológico.
- ds-diag-cit-hist-radio - Descrição do diagnóstico citopatológico e histopatológico.
- ds-inf-relev-quimio - Informações relevantes a serem fornecidas pelo profissional solicitante para esclarecimento do caso.
- ds-inf-relev-radio - Informações relevantes a serem fornecidas pelo profissional solicitante para esclarecimento do caso.
- ds-pl-terap - Plano Terapêutico proposto pelo profissional solicitante .
- ds-quimio - Observação da Quimioterapia.
- ds-radio - Observação da Radioterapia.
- ds-opme - Observação do OPME.
- ds-just-tec - Relatório profissional embasando a solicitação.
- ds-mat-solic - Descrição do Material Solicitado.
- id-anexo - Indica a existência de um anexo na transação.
- tp-sexo - Sexo do Beneficiário.
- nr-idade - Idade do Beneficiário .
- tpRedeMIN - Tipo de Rede conforme Manual do Intercâmbio Nacional.
- idLiminar - Indica se o pedido está sendo realizado a partir de uma demanda judicial.
- cdIBGE - Código IBGE.
- protocoloAtendimento - Protocolo de Atendimento.
- token - Validação do beneficiário.
- tipoEtapaAutorizacao - Indica a etapa da solicitação de autorização.
- dataSolicitacao - Momento em que a Unimed Prestadora toma conhecimento do pedido.
- tipoGuia - Classifica o tipo de Guia TISS.
- tpAcomodacao - Tipo de acomodação na qual o beneficiário será submetido.
- cd-prest-solic-recebido - Código do Prestador Solicitante.
- exec-numero-cbo - Código na Classificação Brasileira de Ocupações do executante.
- nomePrestadorSolic - Razão Social, nome fantasia ou nome do prestador que está solicitando o procedimento.
- siglaConselho - Conselho profissional do solicitante.
- numeroConselho - Número do solicitante no conselho profissional.
- unidadeFederativa - UF do conselho do profissional solicitante.
- numeroCBO - Código na Classificação Brasileira de Ocupações do solicitante.
- idCoberturaEspecial - Indica cobertura especial de atendimento.
- saudeOcupacional - Classifica o tipo de atendimento quando se tratar de Saúde Ocupacional.
Tabela de entrada e saída tmp-campos- layout-bl-servic – Dados dos movimentos
as char format "x(1000)"
field ds-radio as char format "x(1000)"
field ds-opme as char format "x(1000)"
field ds-just-tec as char format "x(999)"
field ds-mat-solic as char format "x(999)"
field id-anexo as char format "x"
field tp-sexo as char format "x"
field nr-idade as char format "x(3)"
field tpRedeMIN as char format "x(01)"
field idLiminar as char format "x(01)"
field cdIBGE as int
field protocoloAtendimento as char format "x(20)"
field token as char format "x(6)"
field tipoEtapaAutorizacao as int
field dataSolicitacao as date
field tipoGuia as int
field tpAcomodacao as char
field cd-prest-solic-recebido as char
field exec-numero-cbo as char
field nomePrestadorSolic as char
field siglaConselho as char
field numeroConselho as char
field unidadeFederativa as char
field numeroCBO as char
field idCoberturaEspecial as char
field saudeOcupacional as int
index i-campos is unique primary
cd-transacao-ptu.
Definição campo a campo da tabela de entrada e saída – Dados do documento
- cd-transacao-ptu – Código da transação PTU conforme manual PTU 2.8.
- tp-cliente – Código definido no manual PTU 2.8 campo TP_CLIENTE.
- cd-unidade-origem – Código da unidade que originou a solicitação.
- cd-unidade-destino – Código da unidade que recebeu a solicitação.
- nr-ident-origem – Numero da solicitação da unidade que originou a solicitação.
- nr-ident-destino – Numero da guia de autorização da unidade que recebeu a solicitação.
- cd-unidade – Código da unidade do beneficiário.
- id-beneficiario – Código de identificação do beneficiário.
- nr-via-cartao – Numero da via do documento de identificação do beneficiário.
- cd-cid – Código do CID.
- id-ato-custo – campo ID_ALTO_CUSTO do PTU 2.8
- nm-prestador – Nome do prestador.
- ds-observacao – Observações gerais.
- cd-unidade-prestador-req – Código da unidade do prestasdor requisitante.
- cd-prestador-req – Código do prestador requisitante.
- cd-unidade-prestador – Código da unidade do prestador executante.
- cd-prestador – Código do prestador executante.
- ds-linha-origem – Descrição de observação oriunda da unidade que solicitou a autorização.
- in-classe-nota – Código da classe da nota para identificação do tipo da guia de autorização que deve ser gerada. Seu conteúdo pode ser:
01 – Consulta
02 – Exames SADT
03 – Atendimento Ambulatorial
04 – Internação Clínica
05 – Internação Cirúrgica
06 – Internação Obstétrica
07 – Odontologia
08 – Consulta em Emergência
09 - Internacao Hospital Dia
10 - Internacao Domiciliar
11 - Internacao Pediatrica
12 - Internacao Psiquiatrica
13 - Consultas Medicina Ocupacional
14 - Exames medicina ocupacional
15 - Remocao
16 - Pequena cirurgia
17 - Terapias
18 - Atendimento domiciliar
19 - SADT internado
20 - Quimioterapia
21 - Radioterapia
22 - TRS (terapia renal substitutiva)
23 - Consulta (primeira consulta)
24 - Consulta (seguimento)
25 - Consulta (pré-natal).
- id-rn - Indica se o beneficiário é recém-nato.
- tp-inter - Indica o Tipo de Internação.
- id-acidente - Indicador de Acidente.
- dt-sug-internacao - Data sugerida para a internação.
- id-ordem-servico - Indica se o pedido de autorização foi gerado através de uma comunicação de Ordem de Serviço.
- nr-ident-os - Número da Transação da Ordem de Serviço.
- nr-ver-tiss - Número de versão da TISS que o prestador enviou a transação.
- cd-uni-atend - Código da Unimed na qual o Beneficiário será atendido.
- nr-versao-ptu - Versão do PTU da Unimed Prestadora.
- nm-pro-solic-opme - Nome do Profissional Solicitante de OPME.
- nr-telefone-opme - Número de Telefone do Profissional Solicitante de OPME.
- end-email-opme - Endereço de E-mail do Profissional Solicitante de OPME.
- ds-diag-cit-hist-quimio - Descrição do diagnóstico citopatológico e histopatológico.
- ds-diag-cit-hist-radio - Descrição do diagnóstico citopatológico e histopatológico.
- ds-inf-relev-quimio - Informações relevantes a serem fornecidas pelo profissional solicitante para esclarecimento do caso.
- ds-inf-relev-radio - Informações relevantes a serem fornecidas pelo profissional solicitante para esclarecimento do caso.
- ds-pl-terap - Plano Terapêutico proposto pelo profissional solicitante .
- ds-quimio - Observação da Quimioterapia.
- ds-radio - Observação da Radioterapia.
- ds-opme - Observação do OPME.
- ds-just-tec - Relatório profissional embasando a solicitação.
- ds-mat-solic - Descrição do Material Solicitado.
- id-anexo - Indica a existência de um anexo na transação.
- tp-sexo - Sexo do Beneficiário.
- nr-idade - Idade do Beneficiário .
- tpRedeMIN - Tipo de Rede conforme Manual do Intercâmbio Nacional.
- idLiminar - Indica se o pedido está sendo realizado a partir de uma demanda judicial.
- cdIBGE - Código IBGE.
- protocoloAtendimento - Protocolo de Atendimento.
- token - Validação do beneficiário.
- tipoEtapaAutorizacao - Indica a etapa da solicitação de autorização.
- dataSolicitacao - Momento em que a Unimed Prestadora toma conhecimento do pedido.
- tipoGuia - Classifica o tipo de Guia TISS.
- tpAcomodacao - Tipo de acomodação na qual o beneficiário será submetido.
- cd-prest-solic-recebido - Código do Prestador Solicitante.
- exec-numero-cbo - Código na Classificação Brasileira de Ocupações do executante.
- nomePrestadorSolic - Razão Social, nome fantasia ou nome do prestador que está solicitando o procedimento.
- siglaConselho - Conselho profissional do solicitante.
- numeroConselho - Número do solicitante no conselho profissional.
- unidadeFederativa - UF do conselho do profissional solicitante.
- numeroCBO - Código na Classificação Brasileira de Ocupações do solicitante.
- idCoberturaEspecial - Indica cobertura especial de atendimento.
- saudeOcupacional - Classifica o tipo de atendimento quando se tratar de Saúde Ocupacional.
Tabela de entrada e saída tmp-campos- layout-bl-servic – Dados dos movimentos
def temp-table tmp-campos-layout-bl-servic no-undo
field nr-servico as int
field tp-tabela as char format "x(01)"
field cd-servico as char
field tp-tabela-recebido as char format "x(01)"
field cd-servico-recebido as char
field qt-servico as char format "x(08)"
field ds-opme as char format "x(80)"
field vl-servico as char format "x(14)"
field vl-uni-servico as char format "x(14)"
field cd-anvisa-inf as char format "x(15)"
field cd-ref-fab as char format "x(60)"
field tp-anexo as char format "x(01)"
field dt-provavel as char format "x(08)"
field cd-via-admin as char format "x(2)"
field qt-frequencia as char format "x(2)"
field id-pacote as char format "x(1)"
field tp-ordem as char format "x(1)"
field sqItem as int
field unMedicamento def temp-table tmp-campos-layout-bl-servic no-undo
field nr-servico as as int
field tp-tabela totalDosagem as char format "x(01)"
field cd-servico as chardec
field tpqt-tabela-recebido pacote-solic as char format "x(01)"
field cd-servico-recebido as charint
field qt-servico seq-item-pacote as char format "x(08)"
field ds-opme as int
index i-servico as char format "x(80)"
field vl-servico as char format "x(14)"
field vl-uni-servico is unique primary
as char format "x(14)"
field cd-anvisa-inf as char format "x(15)"
field cd-ref-fab as char format "x(60)"
field tp-anexo as char format "x(01)"
field dt-provavel as char format "x(08)"
field cd-via-admin as char format "x(2)"
field qt-frequencia as char format "x(2)"
field id-pacote as char format "x(1)"
field tp-ordem as char format "x(1)"
field sqItem as int
field unMedicamento as int
field totalDosagem as dec
field qt-pacote-solic as int
field seq-item-pacote as int
index i-servico is unique primary
nr-servico.
Definição campo a campo da tabela de entrada e saída – Dados dos movimentos
nr-servico.
Definição campo a campo da tabela de entrada e saída – Dados dos movimentos
- nr-servico – Numero do serviço , na ordem de entrada da solicitação.
- tp-tabela – Tipo da tabela no manual PTU 2.8 TP_TABELA .
- cd-servico – Código do movimento.
- tp-tabela-recebido - Identifica o Tipo de Tabela utilizado no Serviço Médico.
- cd-servico-recebido - Código do Serviço.
- qt-servico – Quantidade do serviço solicitado.
- ds-opme - Observação do OPME.
- vl-servico - Valor do serviço.
- vl-uni-servico - Valor unitário do serviço.
- cd-anvisa-inf - Código ANVISA do Material/Medicamento
- cd-ref-fab - Referencia do Material no Fabricante.
- tp-anexo - Indicador de Anexo.
- dt-provavel - Data provável da administração.
- cd-via-admin - Via Administração.
- qt-frequencia - Frequência da administração.
- id-pacote - Identifica se o serviço faz parte de um pacote.
- tp-ordem - Indica a ordem de preferência do profissional solicitante em relação ao fabricante do material solicitado
- sqItem - Sequencia do item solicitado.
- unMedicamento - Unidade de medida do medicamento.
- totalDosagem - Dosagem total do medicamento no ciclo atual.
- qt-pacote-solic -
- seq-item-pacote -
- nr-servico – Numero do serviço , na ordem de entrada da solicitação.
- Tp-tabela – Tipo da tabela no manual PTU 2.8 TP_TABELA .
- cd-servico – Código do movimento.
- qt-servico – Quantidade do serviço solicitado.
Tabela de entrada e saída tmp-campos-layout-retorno – Dados dos movimentos
def temp-table tmp-campos-layout-retorno no-undo
field cd-transacao-ptu ptu as char format "x(05)"
field tp-cliente cliente as char format "x(15)"
field cd-unidade-origem origem as as char format "x(04)"
field cd-unidade-destino destino as as char format "x(04)"
field nr-ident-origem origem as char format "x(10)"
field nr-ident-destino destino as char format "x(10)"
field cd-unidade field cd-unidade as char format "x(04)"
field id-beneficiario beneficiario as char format "x(13)"
field nm-beneficiario beneficiario as as char format "x(25)"
field ds-observacao observacao as as char format "x(120)"
field ds-linha-origem origem as char format "x(256)"
index i-campos campos is is unique primary
cd-transacao-ptu.
...
- cd-transacao-ptu – Código da transação PTU conforme manual PTU 2.8.
- tp-cliente – Código definido no manual PTU 2.8 campo TP_CLIENTE
- cd-unidade-origem – Código da unidade que originou a solicitação.
- cd-unidade-destino – Código da unidade que recebeu a solicitação
- _CLIENTE
- cd-unidade-origem – Código nr-ident-origem – Numero da solicitação da unidade que originou a solicitação.
- nrcd-identunidade-destino – Numero da guia de autorização Código da unidade que recebeu a solicitação.
- id-status – Status do registro. Seu conteúdo pode ser:
1 – Não Autorizado
2 - Autorizado
3 – Pendencias/Glosas
- nr-ident-origem – Numero da solicitação da unidade que originou a solicitação.
- nr-ident-destino – Numero da guia de autorização da unidade que recebeu a solicitação.
- cd-unidade – Código da unidade do beneficiário.
- id-beneficiario – Código de identificação do beneficiário.
- nm-beneficiario – Nome do Beneficiario.
- ds-observacao
- cd-unidade – Código da unidade do beneficiário.
- id-beneficiario – Código de identificação do beneficiário.
- nm-beneficiario – Nome do Beneficiario.
- tp-sexo-beneficiario – Sexo do Beneficiário.
- tp-inscr-beneficiario – Tipo de Inscricao do Beneficiario.
- dt-nascimento – Data de Nascimento do Beneficiário.
- tp-mens-geral-1, 2, 3, 4, 5 – Tipo de mensagem, conforme status do registro.
- ds-mens-geral-1, 2, 3, 4, 5 – Descrição da Mensagem.
- cd-mens-geral-1, 2, 3, 4, 5 – Codigo da Mensagem.
- ds-observacao-1, 2, 3 – Observações gerais.
- ds-linha-origem – Observações internas.
...
Tabela de entrada e saída tmp-campos-layout-ret-bl-servic – Dados dos movimentos
def temp-table tmp-campos-layout
...
def temp-table tmp-campos-layout-ret-bl-serv no-undo
field nr-servico -ret-bl-serv no-undo
field nr-servico as int
field tp-tabela as char format "x(01)"
field cd-servico as char
field ds-servico as int
field tp-tabela as as char format "x(0180)"
field cd-servico qt-servico as char
field ds-servico as char format "x(8008)"
field qt-servico id-autoriza as as char format "x(08)"
field id-autoriza 01)"
field cd-mens-espec-1 as as char format "x(0104)"
field cd-mens-espec-1 2 as as char format "x(04)"
field cd-mens-espec-2 3 as as char format "x(04)"
field cd-mens-espec-3 4 as as char format "x(04)"
field cd-mens-espec-4 5 as as char format "x(04)"
field cd-mensservico-espec-5 convertido as char format "x(04)"
field cd-servico-convertido as as char format "x(08)"
field sqItem sqItem as int
index i-campos campos is is unique primary
nr-servico.
...
- nr-servico – Numero do serviço , na ordem de entrada da solicitação.
- tp-tabela – Tipo da tabela no manual PTU 2.8 TP_TABELA .
- cd-servico – Código do movimento.
- ds-servico – Descrição do movimento.
- qt-servico – Quantidade do serviço solicitado.
- id-autoriza – Status do registro.
- tpcd-mens-espec-1, 2, 3, 4, 5 – Tipo de mensagem, conforme status do registro.ds-mens-espec-1, 2, 3, 4, 5 – Descrição Código da Mensagem.
- cd-mensservico-espec-1, 2, 3, 4, 5 – Codigo da Mensagem.convertido - Código do serviço convertido
Tabela de entrada tmp-cpc-atapi023-entrada
def temp-table tmp-cpc-atapi023-
...
entrada no-undo
field nm-ponto-chamada-
...
cpc as char format "x(15)"
field ds-segmento-
...
recebido as char format "x(8000)"
field ds-segmento-
...
retorno as char format "x(8000)"
...
field r-guiautor as recid
field in-liberado-
...
guias like guiautor.in-liberado-guias
field aa-guia-
...
atendimento like guiautor.aa-guia-atendimento
field nr-guia-
...
atendimento like guiautor.nr-guia
...
-atendimento
field registro as rowid
field cd-classe-
...
erro as int
field cd-unidade-
...
principal like guiautor.cd-unidade-principal
field cd-
...
prestador as dec
field cd-unidade-
...
prestador as int
field cd-unidade-
...
carteira like guiautor.cd-unidade-carteira
field cd-carteira-
...
usuario like guiautor.cd-carteira-usuario
field nr-via-
...
carteira like guiautor.nr-via-carteira
field cd
...
-cla-hos as int
field cd-
...
transacao as dec
field authorization-
...
status as char
field cd-erro-
...
retorno as char format "x(4)"
field status-guia-
...
negada like guia-negada.char-1
field cd-tipo-insumo-
...
ptu like ptuinsum.cd-tipo-insumo-serious
field cd-insumo-
...
ptu like ptuinsum.cd-insumo-ptu
...
field token as char
...
field h-tmp-guiautor as handle.
Definição campo a campo da tabela de entrada
...
def temp-table tmp-cpc-atapi023-saida saida no-undo
field in-liberado-
...
guias like guiautor.in-liberado-guias
field cd-local-
...
autorizacao like guiautor.cd-local-autorizacao
field lg-undo
...
-retry as log
field ds-mensagem as char
field lg-id-
...
autoriza as log
field ds-observacao-
...
interna like guiautor.ds-observacao-interna
field lg-
...
desconsidera as log
field cd-unidade-
...
prestador as char format "x(04)"
field cd-
...
prestador as char format "x(08)"
field in-classe-
...
nota as char format "x(02)"
field cd-cla-
...
hos as int
field authorization-status as char
field status-guia-
...
negada like guia-negada.char-1
field cd-tipo-insumo-
...
serious like ptuinsum.cd-tipo-insumo-serious
field cd-insumo-
...
serious like ptuinsum.cd-insumo-serious
field lg-alto-custo-tab-
...
propria as log
field lg-busca-
...
insumo as logical initial yes
field lg-busca-tmp-lay
...
-recebido as log
field lg-vincula-
...
pacote as log initial yes
field lg-desvincula-
...
movto as log initial yes
field lg-permite-guia-urg-
...
pendente as logical
field lg-valida-regra-urg-
...
eme as logical initial yes.
Definição campo a campo da tabela de saída
...
Tabela de saída tmp-ptu-servicos
def temp-table tmp-ptu-servicos no-undo
field nr-servico -servicos no-undo
field nr-servico as int
field tp-tabela as tabela as char format "x(01)"
field cd-servico as servico as char format "x(08)"
field tp-tabela-recebido as recebido as char format "x(01)"
field cd-servico-recebido as recebido as char format "x(08)"
field qt-servico as servico as char format "x(08)"
field ds-opme opme as char format "x(80)"
field vl-servico as servico as char format "x(14)"
index i-servico is servico is unique primary
nr-servico.
...