DÉCLARER LE DÉFAUT 0 d'international fait ;
DÉCLARER le fkey international ;
DÉCLARER le fname VARCHAR (255) ;
DÉCLARER le fpath VARCHAR (255) ;
DÉCLARER LE CURSEUR cur1 POUR FileKey CHOISI, le nom de fichier, FilePath de FileTable ;
DÉCLARER CONTINUENT LE TRAITEUR POUR L'ENSEMBLE NON TROUVÉ fait = 1 ;
OUVRIR cur1 ;
RÉPÉTITION
CHERCHER cur1 DANS le fkey, fname, fpath ;
SINON fait ALORS
INSERTION DANS LES VALEURS de FileTable (FileBinary) (LOAD_FILE (CONCAT (fpath, '', fname))) LÀ OÙ FileKey=fkey ;
FINIR SI ;
JUSQU'À LA RÉPÉTITION de FIN faite ;
Cur1 ÉTROIT ;
|