Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Thamara Villa Jacomo

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Thamara Villa Jacomo

Gravado em

Chave

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

...

Portuguese

Pagetitle
CN120MAN - Validação de exclusão ou alteração da medição
CN120MAN - Validação de exclusão ou alteração da medição

Ponto-de-Entrada: CN120MAN - Validação de exclusão ou alteração da medição


Versões:Protheus 12.1.17
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todas TotvsDbAccess
Idiomas:Todos


Descrição:

Localização: Function CNTA120 - Responsável pela Medição do Contrato

Em que ponto: Na validação das operações de Alteração e Exclusão (CNTA120Manut).

Utilização: Validações customizadas de acordo com a necessidade.

Eventos

Validar customizações nas operações de Alteração e Exclusão.

Programa Fonte
CNTA120.PRW
Sintaxe

CN120Man( [ cExp1 ], [ cExp2 ], [ cExp3 ] ) - Validações de alteração/exclusão( ) --> lRet

Retorno


Sem Formato
nopaneltrue
lRet
     (lógico) - Determina o retorno da validação, sendo .T. (verdadeiro) ou .F. (Falso).


    (lógico)
  • Determina o retorno da validação, sendo .T. (verdadeiro) ou .F. (Falso).
Exemplos
Variáveis


Sem Formato
Nome
nopanel
TipoEscopoPode Alterardescrição
true
#include 'protheus.ch'
#include 'parmtype.ch'

//-------------------------------------------------------------------
/*{Protheus.doc} cn120man

Ponto de Entrada acionado na validação das operações de alteração e exclusão

@author TOTVS
@version P12.1.17
*/
//-------------------------------------------------------------------
User Function cn120man()

Local cAlias := Paramixb[1]
Local nReg := Paramixb[2]
Local nOpc := Paramixb[3]
Local lRet := .T.


If nOpc == 5
     If CND->CND_DTINIC == dDatabase
          lRet := .F.
          Help("",0,"Não é possível excluir medição com data de inclusão igual a data base")
     Endif
Endif

Return lRet
aRotinaArray of RecordPrivadoSim