CodLocIns

Retorna o Local (CodLoc) que será inserido.

Tipo: Alfanumérica

Exemplo:

/* Esta regra verifica se a quantidade de caracteres de CodLoc (incluindo pontos) é maior que 5. Se for maior, pedirá se deseja continuar e incluir ou cancelar o cadastro. */

 

definir alfa xLocal;
definir numero xTamanho;
xLocal = CodLocIns;

@- pega a quantidade de caracteres de xLocal -@
TamanhoAlfa(xLocal, xTamanho);

Se (xTamanho > 5)
  Inicio
    Retorna = Mensagem(Retorna, "Local maior que 5 dígitos! [&Continuar,&Parar]");
    Se (Retorna = 1)
    Cancel(1);
  Fim;

Utilização: Regra por Processo 474 - Inserir Local.

Este artigo ajudou você?