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                        as char format "x(10)"
    field cd-unidade unidade                                                   as as char format "x(04)"
    field id-beneficiario beneficiario                        as char format "x(13)"
    field nr-via-cartao                   as char format "x(0213)"
    field cdnr-via-cid cartao                           as char format "x(04)"
    field id-alto-custo                   as char format "x(0102)"
    field nm-prestador cd-cid                           as char format "x(25)"
      field ds-observacao                   as char format "x(999)"
    field cd-unidade-prestador-req        as as char format "x(04)"
    field cdid-prestadoralto-req     custo             as char format "x(08)"
    field cd-unidade-prestador            as char format "x(04)"
    field cd-prestador                    as as char format "x(0801)"
    field cd-especialidade-prestador      as char format "x(03)"
    field ds-just-internacao nm-prestador                               as char format "x(200)"
    field qt-dias-evol-patol              as char format "x(425)"
    field tp-atendimento ds-observacao                             as char format "x(1)"
    field tp-carater-atend                as as char format "x(1999)"
    field dt-atendimento cd-unidade-prestador-req                           as char format "x(804)"
    field dscd-linhaprestador-origem req                                          as char format "x(25608)"
    field incd-classe-nota unidade-prestador                                   as char format "x(0204)"
    field id-rn cd-prestador                                                  as char format "x(0108)"
    field tp-inter cd-especialidade-prestador                           as char format "x(0103)"
    field id-acidente ds-just-internacao                        as char format "x(01)"
    field dt-sug-internacao               as  as char format "x(08200)"
    field idqt-ordem-servico dias-evol-patol                                           as char format "x(014)"
    field nr-ident-os tp-atendimento                        as char format "x(10)"
    field nr-ver-tiss                     as char format "x(071)"
    field cdtp-unicarater-atend atend                         as char format "x(04)"
    field nr-versao-ptu                   as  as char format "x(031)"
    field nm-pro-solic-opme dt-atendimento                      as char format "x(70)"
    field nr-telefone-opme                          as char format "x(118)"
    field endds-email-opme linha-origem                                             as char format "x(60256)"
    field dsin-diag-cit-hist-quimio classe-nota                                                as char format "x(100002)"
    field ds-diag-cit-hist-radio id-rn                 as char format "x(1000)"
    field ds-inf-relev-quimio             as char format "x(1000)"
    field ds-inf-relev-radio              as char format "x(1000)"
    field ds-pl-terap                     as  as char format "x(99901)"
    field ds-quimio tp-inter                              as char format "x(1000)"
    field ds-radio                        as char format "x(100001)"
    field dsid-opme acidente                          as char format "x(1000)"
    field ds-just-tec                     as char format "x(99901)"
    field dsdt-mat-solic sug-internacao                                       as char format "x(99908)"
    field id-anexo         ordem-servico                 as char format "x"
    field tp-sexo                         as  as char format "x(01)"
    field nr-idade ident-os                         as char format "x(3)"
    field tpRedeMIN                       as char format "x(0110)"
    field idLiminar nr-ver-tiss                                                    as char format "x(0107)"
    field cdIBGE cd-uni-atend                                   as int
    field protocoloAtendimento            as as char format "x(2004)"
    field token nr-versao-ptu                                              as  as char format "x(603)"
    field tipoEtapaAutorizacao nm-pro-solic-opme                   as int
    field dataSolicitacao                 as datechar format "x(70)"
    field tipoGuia nr-telefone-opme                           as int
    field tpAcomodacao                    as char format "x(11)"
    field cdend-prestemail-solic-recebido opme          as char
    field exec-numero-cbo                 as char
    field nomePrestadorSolic              as char format "x(60)"
    field siglaConselho ds-diag-cit-hist-quimio                                as char format "x(1000)"
    field numeroConselho ds-diag-cit-hist-radio                   as char
    field unidadeFederativa               as char as char format "x(1000)"
    field numeroCBO ds-inf-relev-quimio                                      as char format "x(1000)"
    field idCoberturaEspecial ds-inf-relev-radio                      as char
    field saudeOcupacional                as intchar format "x(1000)"
    index i-campos field ds-pl-terap                                         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
• dDs-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 (pre-natal)

Tabela de entrada e saída tmp-campos- layout-bl-servic – Dados dos movimentos

 as char format "x(999)"
    field ds-quimio                                                    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    def temp-table tmp-campos-layout-bl-servic no-undo
    field nr-servico                       as int
    field tp-tabela                        as char format "x(011)"
    field cd-servico sqItem                                                        as char as int
    field tp-tabela-recebido unMedicamento                        as char format "x(01)"
    field cd-servico-recebido              as charint
    field qt-servico         totalDosagem                                            as dec 
    field qt-pacote-solic                as char format "x(08)"
    field ds-opme                          as char format "x(80)"int
    field vl-servico     seq-item-pacote                    as char format "x(14)"
    field vl-uni-servico                   as char format "x(14)" as int
    field cd-anvisa-inf index i-servico                       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

 is unique primary
          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 - Quantidade pacote solicitado.
• seq-item-pacote - Sequencia do item
• 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                                             as char format "x(0515)"
    field tp-cliente cd-unidade-origem                             as char format "x(1504)"
    field cd-unidade-origem destino                            as char format "x(04)"
    field cdnr-unidadeident-destino origem               as char format "x(04)"
    field nr-ident-origem                 as char format "x(10)"
    field nr-ident-destino destino                                 as char format "x(10)"
    field cd-unidade 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
• 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.
• id-status – Status do registro. Seu conteúdo pode ser:

...

...

• 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
• ds-nascimento – Data de Nascimento do Beneficiárioobservacao – Observações gerais.
• tpds-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

• 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-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 char format "x(80)"
    field qt-servico                                                     as char format "x(08)"
    field id-autoriza    def temp-table tmp-campos-layout-ret-bl-serv  no-undo
    field nr-servico                      as int
      field tp-tabela                       as char format "x(01)"
    field cd-servico mens-espec-1                       as char
    field ds-servico                      as char format "x(8004)"
    field qt-servico cd-mens-espec-2                       as char format "x(08)"
    field id-autoriza                     as  as char format "x(0104)"
    field cd-mens-espec-1 3                                        as  as char format "x(04)"
    field cd-mens-espec-2 4                  as char format "x(04)"
    field cd-mens-espec-3                       as  as char format "x(04)"
    field cd-mens-espec-4 5                    as char format "x(04)"
    field cd-mens-espec-5                 as  as char format "x(04)"
    field cd-servico-convertido 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 registrosolicitado.
• tp-mens-espec-1, 2, 3, 4, 5 – Tipo de mensagem, conforme status id-autoriza – Status do registro.
• dscd-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

• in-liberado-guias - Situação da guia.
• cd-local-autorizacao – Local de autorização dos movimentos.
• lg-undo-retry – Indica se foi gerado erro.
• ds-mensagem – Mensagem de erro.
• lg-id-autoriza – Variável que controla se o registro será autorizado ou não.
• ds-observacao-interna - Campo que retorna as observações internas da guia.
• lg-desconsidera – Campo que desconsidera o status original da guia setado pelo sistema e grava o status retornado pela cpc quando ativa.
• cd-unidade-prestador - Unidade do prestador.
• cd-prestador - Código do prestador.
• in-classe-nota - Código da classe de nota
• cd-cla-hos - Código da classe hospitalar.
• authorization-status - Código do status da autorização
• status-guia-negada - Código do status da guia
• cd-tipo-insumo-serious - Código do tipo de insumo Serious
• cd-insumo-serious - Código do insumo Serious
• lg-alto-custo-tab-propria - Campo utilizado para considerar ou não as regras de auto custo e tabela própria.
• lg-busca-insumo - Campo que indica a busca ou não de insumo
• lg-busca-tmp-lay-recebido - busca o registro do layout.
• lg-vincula-pacote - Verifica se o pacote será vinculado ao procedimento/insumo.
• lg-desvincula-movto - Verifica se o pacote será desvinculado do movimento.
• lg-permite-guia-urg-pendente - indica se permite que uma guia de urgência/emergência entre pendente ou se deve seguir a regra da mensagem de automação
• lg-valida-regra-urg-eme - indica se valida a regra de urgência/emergência

Tabela de saída tmp-ptu-servicos

• - indica se valida a regra de urgência/emergência

Tabela de saída tmp-ptu-servicos

def temp-table tmp-ptu-servicos                 no-undo
      field nr-servico                                        as int
      field tp-tabela                                         as char format "x(01)"
      field cd-servico                                       as char format "x(08)"def temp-table tmp-ptu-servicos no-undo
      field nr-servico as int
      field tp-tabela as -recebido                         as char format "x(01)"
      field cd-servico as -recebido                       as char format "x(08)"
      field tp-tabela-recebido as char format "x(01)"
      field cd-servico-recebido as qt-servico                                       as char format "x(08)"
      field qt-servico as char format "x(08)"
      field ds-opme ds-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.

...