English
Español
RetornaPrxExamesLoc
Essa função utiliza a empresa ativa no sistema. Portanto, ao aplicá-la em um processo automático, é necessário utilizar a função WSetarCalculo para definir a empresa e o cálculo ativos.
Esta função retorna o código do exame, data do último exame, data do próximo exame e motivo do exame na tabela de Relação de Próximos Exames. Esta função é utilizada somente em um modelo da cópia (SMPC008.GER - Relação de Próximos Exames).
Sua funcionalidade depende da função InicializaPrxExamesLoc.
Sintaxe: RetornaPrxExamesLoc(xPosicao,xCodFic,xCodExa,xDatUlt,xDatPro,xMotExm,xOriExa,aOrdem);
Parâmetros:Nome | Tipo | Descrição |
xPosicao | Alfa | Posição de seleção dos dados |
xCodFic | Numérico | Código da ficha. |
xCodExa | Numérico | Retorna o código do exame. |
xDatUlt | Numérico | Retorna a data do último exame. |
xDatPro | Numérico | Retorna a data do próximo exame. |
xmotExm | Alfa | Retorna a descrição do motivo do exame. |
xOriExa | Numérico | Retorna a origem do exame . |
aOrdem | Numérico | Retorna o tipo de ordem a utilizar: |
Deseja-se saber o último, o próximo e o motivo do exame referente ao local “020309 - Consultoria Geral”.
Primeiro deve-se inserir a função InicializaPrxExamesLoc numa seção de Pré-Seleção, para que os dados sejam carregados somente uma vez.
<div class="Code"><p>Definir Numero xdatini;<br></br>Definir Numero xdatfim;<br></br>Definir Alfa xabrexa;<br></br>Definir Alfa xcodfic;<br></br>Definir Alfa xoriexa;<br></br>Definir Alfa xabrloc;<br></br>Definir Alfa xabrcar;<br></br>Definir Alfa xabrtur;<br></br>Definir Alfa xabrtcl;<br></br>Definir Alfa xabrcad;<br></br>Definir Alfa xabrfil;<br></br>Definir Alfa xabrsit;<br></br>Definir Alfa xcodrqu;</p><p></p><p>InicializaPrxExamesLoc (xDatIni, xDatFim, xAbrExa, xCodFic, xOriExa, xAbrLoc, xAbrCar, xAbrTur, xAbrTcl, xAbrCad, xAbrFil, xAbrSit, xCodRqu);</p></div>
Depois, deve-se inserir a função RetornaPrxExamesLoc numa seção de Seleção, com a variável xPosicao = “INÍCIO” para selecionar o primeiro dado carregado.
<div class="Code"><p>Definir Alfa xposicao;<br></br>Definir Numero xcodfic;<br></br>Definir Numero xcodexa;<br></br>Definir Numero xdatult;<br></br>Definir Numero xdatpro;<br></br>Definir Alfa xmotexm;</p><p>xposicao = "INICIO"</p><p>RetornaPrxExamesLoc (xPosicao, xCodFic, xCodExa, xDatUlt, xDatPro, xMotExm);</p></div>
Para retornar os demais dados, é só inserir a função RetornaPrxExamesLoc com a variável xPosicao = “PROXIMO”, assim, será carregado sempre o próximo dado.
<div class="Code"><p>xposicao = "PROXIMO"</p><p>RetornaPrxExamesLoc (xPosicao, xCodFic, xCodExa, xDatUlt, xDatPro, xMotExm, xOriExa, aOrdem);</p></div>
Utilizado em Regra de Seleção para retornar o código do exame , data do último exame , data do próximo exame, motivo do exame na tabela de Relação de Próximos Exames, a origem e a ordem de geração(1 = Ficha Médica/Código do Exame; 2 = Ficha Médica/Data Próximo Exame ou 3 = Ficha Médica/Descrição do Exame).
Observação: É necessário informar a ordenação apenas quando uma vez, ou seja, quando informar “INICIO” no primeiro parâmetro, não há necessidade de passar uma ordenação a cada retorno “PROXIMO”, neste caso pode ser passado o valor zero.
Utilização: Gerador de relatórios e editor de regras.
Disponível para o módulo: SM.
English
Español
