Histórico da Página
#include "rwmake.ch"
User Function F040VAUT
Local aArea := GetArea()
Local lRet := .T.
restArea(aArea)
Return lRet
F040VAUT – Habilita a execução do PE A040ATOK.
Descrição: | A finalidade do ponto de entrada F040VAUT é permitir a execução do PE A040ATOK na rotina FINA040. |
Localização: | Está presente na função FA040Alter() |
Programa Fonte: | FINA040.PRX |
Versões: | 12 |
Retorno: | Lógico. .T. – Permite executar o PE A040ATOK .F. – Não permite executar o PE A040ATOK |
Exemplo:
#INCLUDE "TOTVS.CH"
User Function F040VAUT()
Local aArea := GetArea()
Local lRet := .F.
Local lLigAlcada := SuperGetMV('ES_ALCPRG',,.F.)
If lLigAlcada
If FwIsInCallStack("U_TFINA029")
lRet := .T.
EndIf
EndIf
restArea(aArea)
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#include "rwmake.ch"
User Function F040VAUT
Local aArea := GetArea()
Local lRet := .T.
restArea(aArea)
Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas