1 2 3 4 5 6 7 8 9 10 11 12 13
| EXTERNE PG_Requete
Donnee est chaîne
tableauF est une tableau de 34 par 3 chaîne
Ncomp est un entier=210001
Saisie( "N° Article ",Donnee)
POUR Ncomp=210001 _A_ 210034
tableauF[i,1]=PG_Requete("SELECT ARKTCODART FROM ARTICLE , NOMENC WHERE NOCTCODECP =¿"+Ncomp+"¿ AND ARKTCODART = ¿"+Donnee+"¿")
tableauF[i,2]=PG_Requete("SELECT NOCTUNITE FROM ARTICLE , NOMENC WHERE NOCTCODECP =¿"+Ncomp+"¿ AND ARKTCODART = ¿"+Donnee+"¿")
tableauF[i,3]=PG_Requete("SELECT NOCNMISENR FROM ARTICLE , NOMENC WHERE NOCTCODECP =¿"+Ncomp+"¿ AND ARKTCODART = ¿"+Donnee+"¿")
FIN |
Partager