PNA040GRV - Define gravação da manutenção de Lançamentos de Marcações

Ponto de entrada para definição de gravação ou não, da manutenção dos Lançamentos de Marcações.

#INCLUDE "Protheus.ch"
#INCLUDE "RWMAKE.CH"

User Function PNA040GRV()
Local lRet := .F.
Local cParam1 := PARAMIXB[1] // Alias do Arquivo
Local cParam2 := PARAMIXB[2] // Prefixo do Alias
Local cParam3 := PARAMIXB[3] // Opcao do Browse

If cParam1 = "SP8" .And. !(cParam3 == "2")
lRet := .T.
EndIf


Return( lRet )

Português(Brasil)

Microsiga_Protheus11

Todos

Todas

PARAMIXB[1] correspondente ao Alias do Arquivo (SP8)
PARAMIXB[2] correspondente ao Prefixo do Alias de Arquivo (P8_)
PARAMIXB[3] correspondente à Opção enviada, ou seja, Incluir, Alterar, Excluir etc.

lRet (lógico)
Deverá ser do tipo Local.

PONA040.PRW