Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagejs
titlePcoXInc
If ExistBlock("PCOAK2LOK")

    lRet := ExecBlock("PCOAK2LOK",.F.,.F.)

EndIf

03. PARÂMETROS

Não há 

04. RETORNO

Tipo

Descrição

Obrigatório

Lógico

Retorna .T. (true) se a linha é valida com a regra do ponto de entrada ou .F. (false) se a linha não estiver válida com a regra do ponto de entrada.

Sim


05. EXEMPLO DE UTILIZAÇÃO


Bloco de código
languagejs
titlePCOAK2LOK
   //P_E**************************************************************************************
    //P_E - Ponto de entrada utilizado para validação da linha de digitação do orçamento³orçamento
    //P_E - Parâmetros : Nenhum ³
    //P_E - Retorno : .F. - Deve bloquear a linha de digitacao ³
    //P_E - digitação e .T. - Liberar a linha digitada ³
    .
//P_E***************************************************************************************

    lRet := ExecBlock("PCOAK2LOK",.F.,.F.)

EndIf

03. PARÂMETROS

Não há 

04. RETORNO

...

Tipo

...

Descrição

...

Obrigatório

...

Lógico

...

Retorna .T. (true) se a linha é valida com a regra do ponto de entrada ou .F. (false) se a linha não estiver válida com a regra do ponto de entrada.

...

Sim

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagejs
titlePCOAK2LOK
*

User Function PCOAK2LOK
Local lRet := .T.
    If GDFieldGet('AK2_CLASSE') == '000001'
        Help(NIL, NIL, "Ponto de Entrada - PCOAK2LOK", NIL, "Esta Classe não pode ser informada.", 1, 0, NIL, NIL, NIL, NIL, NIL, {"Informar outra Classe Orçamentária"})
        lRet := .F.
   EndIf
Return lRet // (lógico) retorna .T. (true) se a linha é valida com a regra do ponto de entrada ou .F. (false) se a linha não estiver válida.

06. DOCUMENTOS RELACIONADOS

...