Problème :
Accéder à une fiche perso est laborieux, beaucoup de clics à faire. L’idée serait de permettre un accès plus rapide à la fiche perso d’un document au moyen d’un bouton par exemple.
Solution :
Créer un bouton avec une macro qui cherche la fiche perso en un seul clic.
La recherche se fait avec le libellé de la fiche perso.
Premier exemple : fiche perso sur B.I.
wlInd est un entier
wlNomChampListeFichePerso est une chaîne// Cas fenêtre article
wlNomChampListeFichePerso = « FI_META_SEL_FICHE_DOC »// Recherche de la fiche personnalisée
wlInd=TableCherche(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO.COL_NOM_FICHE », »Geste commercial BI« )
SI wlInd>0 ALORS// Positionnement dans la liste des fiche personnalisée
TableSelectPlus(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO »,wlInd)// Ouverture de la fiche personnalisée
ExécuteTraitement(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO.COL_LOUPE »,trtClic)FIN
Deuxième exemple : fiche perso sur commande fournisseur
wlInd est un entier
wlNomChampListeFichePerso est une chaîne// Cas fenêtre article
wlNomChampListeFichePerso = « FI_META_SEL_FICHE_DOC »// Recherche de la fiche personnalisée
wlInd=TableCherche(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO.COL_NOM_FICHE », »Informations Cde Fournisseur« )
SI wlInd>0 ALORS// Positionnement dans la liste des fiche personnalisée
TableSelectPlus(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO »,wlInd)// Ouverture de la fiche personnalisée
ExécuteTraitement(wlNomChampListeFichePerso + « .TABLE_LISTE_FICHE_PERSO.COL_LOUPE »,trtClic)FIN