DROIT

Descrizione

Questa azione è richiamata dopo la lettura del record della tabella principale, prima dell'alimentazione delle videate con la classe [F] della tabella principale.

Tipo di oggetto

Semplice, Riquadro, Combinato

Transazione

No

Utilizzo

Mediante questa azione è possibile verificare i diritti di accesso al record. Quando i diritti non sono verificati, lo si comunicherà al supervisore posizionando la variabile CLECUR = 0. Inoltre, è possibile visualizzare un messaggio tramite la variabile GMESSAGE.

Esempio:  SUBGAS  Inserimento dei movimenti contabili

Necessità di controllare i diritti di accesso al giornale su cui è registrato il movimento.

$DROIT
Call LECTURE("JOU",[F:HAE]JOU,"") From CONTOBJ
If [F:JOU]ACS<>""
   Call CONSACC([F:JOU]ACS,OK) From CPTSUB
   If !OK
   GMESSAGE = [F:HAE]JOU-mess(77,106,1) : # Giornale non autorizzato
   GERR = 1: CLECUR = 0
   Endif
Endif
Return