Cette action est utilisée dans les OBJets à variantes. Elle est appelée pour chaquefenêtre active de l'OBJet et pour laquelle l'utilisateur à les droits d'accès (pas decode accès ou droit d'exécution sur le code accès de la fenêtre).
Simple, Tableau, Combiné
Non
Elle permet de ne pas proposer une fenêtre ( variante ) dans la fenêtre de sélectionen positionnant la variable OK = 0.
Dans cette action, pour chaque fenêtre associée à un OBJet, on lit le paramétragede la transaction de saisie. Pour chacunes d'elles, on teste si sa transaction de saisieest active, et la catégorie paramétrée dans cette transaction est cohérente avec lacommande à afficher.
$VARIANTE
# La transaction lu est elle utilisable ?
If clalev ([F:SLT])=0 Local File SALTRS [SLT] Endif
Read [SLT]SLT0=2;[F:AWI]TRN
If fstat
OK = 0
Elsif [F:SLT]ENAFLG<>2 | (GORDCAT <> 4 & [F:SLT]ORDCAT <> 4 &[F:SLT]ORDCAT <> GORDCAT)
OK = 0
Endif
Return
VARIANTE | |