Este conteúdo não recebe atualizações, pois é referente a uma versão do sistema que foi descontinuada. Acesse a documentação da versão 6.10.1 aqui

Gestão de Pessoas - Manual do Usuário / Customizações / Funções / SetaEmpresaPrxVacinas

SetaEmpresaPrxVacinas

Esta função seta o código da empresa a ser usada na função CarregaPrxVacinas.

Sintaxe: SetaEmpresaPrxVacinas (Numero NumEmp)

Parâmetros:

Nome	Tipo	Descrição
NumEmp	Numérico	Informar qual a empresa da ficha médica que deseja consultar as próximas vacinas.

Tipo de Retorno: nenhum.

Utilização: deve ser chamada antes da execução da função CarregaPrxVacinas.

Exemplo:

SetaEmpresaPrxVacinas(ENumEmp);
xQtdVac = CarregaPrxVacinas(EDatIni, EDatRef, xConCam, EDatVac, xDiaSol, xCodAte, xSolAbe, xDosVen, EAbrLoc, EAbrCar, EAbrRem, EAbrFic, EAbrTcl, EAbrCad, EAbrFil);
Se (xQtdVac = 0)
Cancel(1);

Disponível para o módulo: SM, no gerador de relatórios.