BusCodUsoRef

Retorna o código e o uso da refeição de acordo com a empresa, hora, relógio, função e direção.

Sintaxe: BusCodUsoRef(Numero xnumemp,Numero xhoracc,Numero xcodrlg, Numero xcodfnc, Alfa xdiracc, Numero End xcodref, Numero End xusoref);

Parâmetros:

Nome Tipo Descrição
xnumemp Numérico Código da empresa
xhoracc Numérico Hora da marcação
xcodrlg Numérico Código do relógio da marcação
xcodfnc Numérico  
xdiracc Alfa Direção da marcação
xcodref Numérico Retorno do código da refeição
xusoref Numérico Retorno do uso da refeição

Exemplo:

/* Somente executar determinado procedimento, se for refeição 3 e uso 4 */
BusCodUsoRef(1, 480, 2, 3, "E", xcodref, xusoref);

se ((xcodref = 3) e (xusoref = 4))
inicio
  ... 
fim;

Utilização: Regras de apuração, integração, refeitório e gerador de relatórios.

Observação: Esta função sempre retornará o USO 3 ou 4 pois a mesma não verifica a associação das marcações, ou seja, quando encontra um consumo não verifica se tem reserva para o mesmo. Caso deseja verificar o USO da marcação o mesmo deve ser verificado através de um cursor na tabela R070ACC.

Disponível para o módulo: Controle de Ponto e Refeitório.

Este artigo ajudou você?