DECLARAR EL DEFECTO hecho 0 de la internacional;
DECLARAR el fkey internacional;
DECLARAR el fname VARCHAR (255);
DECLARAR el fpath VARCHAR (255);
DECLARAR EL CURSOR cur1 PARA FileKey SELECTO, nombre de fichero, FilePath de FileTable;
DECLARAR CONTINÚAN A TRATANTE PARA EL SISTEMA NO ENCONTRADO hecho = 1;
ABRIR cur1;
REPETICIÓN
TRAER cur1 EN el fkey, fname, fpath;
SI NO ENTONCES hecho
PARTE MOVIBLE EN LOS VALORES de FileTable (FileBinary) (LOAD_FILE (CONCAT (fpath, '', fname))) DONDE FileKey=fkey;
TERMINAR SI;
HASTA LA REPETICIÓN hecha del FINAL;
Cur1 CERCANO;
|