script para especificar DBQ<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Hola,
Me pregunto cómo podría especificar la fuente de la base de datos para que esta, tal vez como una declaración global, pueda ser referida por cada dt =. Como se puede ver en la siguiente secuencia de comandos, para obtener datos de varias tablas de Access duplico DBQ = .... para cada dt =. La única diferencia es la parte "SELECCIONAR ...". En SAS, escribiría una variable de macro (% let dir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \) para especificar la ubicación de la base de datos. Pero no he aprendido cómo hacer lo mismo en JMP. He subrayado la parte duplicada de los dos primeros dt =. Se adjunta mi guión.
dt1 = Base de datos abierta ("DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb; DefaultDir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis; Controlador = {Controlador de Microsoft Access (* .mdb)} ; DriverId = 25; FIL = MS Access; FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn ; MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí; ",
"SELECT * FROM qryAFF14", "qryAFF14", invisible);
dt2 = base de datos abierta ("DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb; DefaultDir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis; Controlador = {Microsoft Access Driver (* .mdb)} ; DriverId = 25; FIL = MS Access; FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn ; MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí; ",
"SELECCIONAR * DE qryALF0", "qryALF0", invisible);
dt3 = Abrir base de datos ("DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb; DefaultDir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben Analysis; Controlador = {Controlador de Microsoft Access (* .mdb) )}; DriverId = 25; FIL = MS Access; FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn; MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí; ",
"SELECCIONAR tratamiento, abeja, edad, días_exp_cum, trips_exp_count FROM qryTrips_days_exp", "qryTrips_days_exp", invisible);
dt4 = Abrir base de datos ("DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb; DefaultDir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben Analysis; Controlador = {Controlador de Microsoft Access (* .mdb) )}; DriverId = 25; FIL = MS Access; FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn; MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí; ",
"SELECCIONAR * DE qryLeft_time_hour", "qryLeft_time_hour", invisible);
dt5 = Abrir base de datos ("DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb; DefaultDir = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben Analysis; Controlador = {Controlador de Microsoft Access (* .mdb) )}; DriverId = 25; FIL = MS Access; FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn; MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí; ",
"SELECT * FROM qryCombo_exp", "qryCombo_exp", invisible);
Re: script para especificar DBQPrueba esto:
dbq_string = "DBQ = E: \ Now \ (Proyecto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb;" ||
"DefaultDir = E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis;" ||
"Driver = {Microsoft Access Driver (* .mdb)}; DriverId = 25; FIL = MS Access;" ||
"FILEDSN = C: \ Archivos de programa \ Archivos comunes \ ODBC \ Fuentes de datos \ chang_bee_db.dsn;" ||
"MaxBufferSize = 2048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Threads = 3; UID = admin; UserCommitSync = Sí;" ;
dt1 = Abrir base de datos ( dbq_string ,
"SELECT * FROM qryAFF14" , "qryAFF14" , invisible ) ;
dt2 = abrir base de datos ( dbq_string ,
"SELECT * FROM qryALF0" , "qryALF0" , invisible ) ;
dt3 = Abrir base de datos ( dbq_string ,
"SELECCIONE tratamiento, abeja, edad, días_exp_cum, trips_exp_count DE qryTrips_days_exp" , "qryTrips_days_exp" , invisible ) ;
dt4 = Abrir base de datos ( dbq_string ,
"SELECT * FROM qryLeft_time_hour" , "qryLeft_time_hour" , invisible ) ;
dt5 = Abrir base de datos ( dbq_string ,
"SELECT * FROM qryCombo_exp" , "qryCombo_exp" , invisible ) ;