DEFTRANS

Description

Cette action est utilisée dans les OBJets à variantes (OBJet pour lequel on a créé plusieurs fenêtres). Elle est appelée en début d'analyse des fenêtres de l'OBJet, si au moins une fenêtre est active sur cet OBJet.

Type d'OBJet

Simple, Tableau, Combiné

Transaction

Non

Utilisation

Elle permet de positionner une variable globale, qui servira dans l'action VARIANTE à filtrer les fenêtres autorisées.
Elle permet aussi d'arrêter le traitement en positionnant OK=0 et éventuellement d'afficher un message dans GMESSAGE.

Exemple : SUBSOHA   commandes de vente

Préparation d'un filtre pour les transactions de saisie. En effet, si l'on vient par tunnel dans la saisie des commandes, on lit dans l'action DEFTRANS l'entête de la commande pour connaître sa catégorie. Puis, ne seront proposées que les transactions de saisie associées à cette catégorie : traitement à développer dans l'action VARIANTE.

$DEFTRANS
# Si on ne vient pas de la gestion des commandes
If GFONC1 <> "GESSOH" Raz GFLAG Endif
# Par défaut on a droit à toutes les transactions
GORDCAT= 4
# Si tunnel, on filtre avec la catégorie de commande
If TUNNEL = 1 & !GIMPORT
Read [SOH]SOH0=CLE1
If !fstat GORDCAT = [F:SOH]SOHCAT Endif
Endif
Return

Actions associées

 

DEFTRANS

 Home page link

VARIANTE

 Home page link

SETTRANS