OUVRE_BOITE
Description
Cette action n'est appelée qu'une fois, après l'ouverture des écrans et de la fenêtre.
Type d'OBJet
Simple, Tableau, Combiné
Transaction
Non
Utilisation
Elle sert essentiellement à récupérer le nom des listes de gauche, afin d'éviter par la suite de tester la liste gauche courante avec un nom en dur. Le nommage de ces listes gauche est le suivant :
GAU_CHE liste principale de l'OBJet identifiée par un
code identique au code 'OBJet
GAU_CHE9 liste des derniers lus
GAU_CHEn toute autre liste ( n = 1 à 8 en fonction du
placement dans le tableau browser )
une liste désactivée par code activité n'aura pas d'identifiant et ne prend
pas de numéro.
Exemple :
Dans la gestion des commandes de ventes, pour la liste de picking sur les devis. Le nom de la liste de gauche est stocké dans une variable globale qui sera utilisée ensuite pour identifier cette liste de gauche ( par exemple, dans l'action HINT_KEY).
$OUVRE_BOITE
# Récupération des noms de currbox des tiroirs
Global Char GBOXSQ1(10)
GBOXSQ1 = "GAU_CHE"+num$(find("SQ1",OBJLIS(1..10)))
Return$HINT_KEY
Case currbox
When GBOXSQ1 : HINTLIS(val(right$(GBOXSQ1,8)))="SQD1"
When Default : Return
Endcase
Return
Cette action peut être utilisée pour gérer des habilitations sur site, pour les listes gauches secondaires d'un objet. En effet, l'automatisme de contrôle du superviseur ne s'applique que sur la liste gauche principale. Pour ce faire, écrire un link avec notamment un lien stricte sur la table AFCTFCY.
Exemple sur un browser spécifique de l'objet SDH :
$OUVRE_BOITE
If clalev([F:AFF])=0 : Local File AFCTFCY [AFF] : Endif
If clalev([F:SDH])=0 : Local file SDELIVERY [SDH] : Endif
If clalev([F:XSD6])=0 : Local file BPARTNER [XSD6] : Endif
If clalev([F:XSD7])=0 : Local file BPCUSTOMER [XSD7] : Endif
If clalev([F:XSDR])=0 : Local file TABCOUNTRY [XSDR] : Endif
Link [SDH] With & [AFF]AFF0~=[F:SDH]STOFCY;GPROFIL;GUSRFCT,
& [XSD6]BPR0=BPCORD, & [XSD7]BPC0=BPCORD,
& [XSDR]TCY0=[F:SDH]BPDCRY
& As [XDH]
& Order By Key SDH2
Return
