48 lines
1.1 KiB
Plaintext
48 lines
1.1 KiB
Plaintext
IMPORT UTIL
|
|
DEFINE selec STRING,
|
|
nombre_file,basedatos VARCHAR(100),
|
|
fechaFile DATETIME YEAR TO MINUTE,
|
|
chfechafile VARCHAR(50) ,
|
|
datab DYNAMIC ARRAY OF VARCHAR(60),
|
|
i INT
|
|
MAIN
|
|
|
|
CONNECT TO "decomarmol" USER "sa" USING "Lmmjvsd2020"
|
|
|
|
LET selec = "BACKUP DATABASE ?
|
|
TO DISK = ?"
|
|
|
|
PREPARE copia FROM selec
|
|
|
|
|
|
#LET selec = "execute sp_msforeachdb 'print ''[?]'''"
|
|
#PREPARE padb FROM selec
|
|
#DECLARE buscadb CURSOR FOR padb
|
|
|
|
LET datab[1]="decomarmol_old"
|
|
LET datab[2]="sistema_prueba"
|
|
LET datab[3]="ndeco"
|
|
LET datab[4]="ndecobk"
|
|
LET datab[5]="nace"
|
|
|
|
|
|
FOR i=1 to datab.getLength()
|
|
|
|
LET fechaFile = CURRENT
|
|
LET chfechafile = util.Datetime.format(fechafile, "%d-%m-%Y%H:%M:%S" )
|
|
|
|
IF datab[i]= "ndeco" THEN
|
|
LET nombre_file = '/home/decomarmol/backup/',datab[i] CLIPPED,chfechafile,".bak"
|
|
ELSE
|
|
LET nombre_file = '/home/copias/',datab[i] CLIPPED,chfechafile,".bak"
|
|
END IF
|
|
DISPLAY "en Ejecucion...",nombre_file
|
|
EXECUTE copia USING datab[i],nombre_file
|
|
|
|
|
|
|
|
END FOR
|
|
|
|
|
|
DISPLAY "He terminado..."
|
|
END MAIN |