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, siau 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 partunnel dans la saisie des commandes, on lit dans l'action DEFTRANS l'entête de lacommande pour connaître sa catégorie. Puis, ne seront proposées que les transactions desaisie 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 | |
 | |
| | |
