CarregaPrxVacinas

Esta função é utilizada no modelo do relatório Relação das Próximas Vacinas (SMVA001).

Sintaxe: CarregaPrxVacinas(Numero xDatIni, Numero xDatFim, Alfa xDatRef, Numero xDatVac, Numero xDiaSol, Numero xCodAte, Alfa xGerAbe, Numero xDosVen, Alfa xAbrLoc, Alfa xAbrCar, Alfa xAbrRem, Alfa xAbrFic, Alfa xAbrTcl, Alfa xAbrCad, Alfa xAbrFil);

Parâmetros:

Nome

Tipo

Descrição

xDatIni

Numérica

Informar a data inicial, a partir da qual serão geradas as vacinas.

xDatFim

Numérica

Informar a data final, até a qual deverão ser geradas as vacinas.

xDatRef

Alfanumérica

Indica qual data deverá ser considerada para buscar as vacinas (“I” - Data de início, “T” - Data de término). A rotina então buscará todas as vacinas ativas na data informada e para isto irá considerar as datas de término de cada vacina cadastrado como periódico e a data de término do PCMSO.

xDatVac

Numérica

Informar a data que deverá constar como data da solicitação nas solicitações das vacinas. Se não houver data, será considerada a periodicidade normal das vacinas conforme indicado no cadastrado do exame (vacina).

xDiaSol

Numérica

Informar quantidade de dias da solicitação.

xCodAte

Numérica

Informar o atendente responsável pelas solicitações das vacinas geradas.

xGerAbe

Alfanumérica

Indicar qual procedimento a ser adotado quando existirem solicitações em aberto. “G” - Gerar Nova Conforme Dias, “N” - Não gerar. Quando usada a opção “G”, a função passa a considerar o parâmetro xDiaSol.

xDosVen

Numérica

Indicar qual procedimento a ser adotado quando uma vacina tiver diversas doses e uma delas estiver vencida: 0 - repetir, 1 recomeçar, 2 - continuar.

xAbrLoc

Alfanumérica

Informar abrangência de local.

xAbrCar

Alfanumérica

Informar abrangência de cargo.

xAbrRem

Alfanumérica

Informar abrangência de medicamento (vacina).

xAbrFic

Alfanumérica

Informar abrangência de código de ficha médica.

xAbrTcl

Alfanumérica

Informar abrangência de tipo de colaborador.

xAbrCad

Alfanumérica

Informar abrangência de cadastro.

xAbrFil

Alfanumérica

Informar abrangência de filial.

Tipo de Retorno: quantidade de solicitações geradas.Utilização: deve ser usada junto com a função SetaEmpresaPrxVacinas, conforme exemplo.Exemplo:<div class="Code"><p>SetaEmpresaPrxVacinas(ENumEmp);<br></br>xQtdVac = CarregaPrxVacinas(EDatIni, EDatRef, xConCam, EDatVac, xDiaSol, xCodAte, xSolAbe, xDosVen, EAbrLoc, EAbrCar, EAbrRem, EAbrFic, EAbrTcl, EAbrCad, EAbrFil);<br></br>Se (xQtdVac = 0)<br></br>Cancel(1);</p></div>Disponível para o módulo: SM, no gerador de relatórios.

Este artigo ajudou você?