VARIANTE

Description

Cette action est utilisée dans les OBJets à variantes. Elle est appelée pour chaque fenêtre active de l'OBJet et pour laquelle l'utilisateur à les droits d'accès (pas de code accès ou droit d'exécution sur le code accès de la fenêtre). 

Type d'OBJet

Simple, Tableau, Combiné

Transaction

Non

Utilisation

Elle permet de ne pas proposer une fenêtre ( variante ) dans la fenêtre de sélection en positionnant la variable OK = 0.

Exemple : SUBSOHA   commandes de vente

Dans cette action, pour chaque fenêtre associée à un OBJet, on lit le paramétrage de la transaction de saisie. Pour chacunes d'elles, on teste si sa transaction de saisie est active, et la catégorie paramétrée dans cette transaction est cohérente avec la commande à 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

Actions associées

	DEFTRANS
	VARIANTE
	SETTRANS

---