Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (stecca.silvio), última alteração em 09 jan, 2019

Ponto de Entrada

Linha de Produto:

Microsiga Protheus

Segmento:

Recursos Humanos

Módulo:

Gestão de Pessoal

Função:

CSAA100.PRW

Situação/Requisito:

Criação de P.E após a validação de exclusão do Departamento, especificamente após retorno da validação feita pela função csaa100ChkDel()

Solução/Implementação:

Criado o ponto de entrada conforme solicitado:


Exemplo de uso

#include "PROTHEUS.CH"

User Function CSAPOSX9()

Local lRet := .T.

Help( ,, "Help",, + CRLF + "Entrei no PE CSAPOSX9.", 1, 0)

If Empty(M->QB_DEPSUP)
Help( ,, "Help",, + CRLF + "Campo Depto. Super esta em branco.", 1, 0)

lRet := .F.
EndIf

Help( ,, "Help",, + CRLF + "O retorno do Ponto de Entrada é: " + cValToChar(lRet), 1, 0)

Return lRet


Link documentação PE: http://tdn.totvs.com/x/ZcXUGg

Tickets relacionados:

1041755