<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Hola,
con la siguiente secuencia de comandos me gustaría crear un "pathfinder" con variables (elementos seleccionados del cuadro de lista).
¿Qué estoy haciendo mal?
spath = "R: \ 00 DnA \ 2015 \";
// o npath = "nasdlkxxx \ AB1_FileShare06 \ wpa001 \ 00 DnA \ 2015 \"
Tpm = {
Famar
Gnosis
Hospira
LabBio
};
FamarSUB = {
Brufen P278,
Brufen P280,
Brufen N950,
Clari 3368,
Clari 10061,
Clari G656,
Clari L214,
Clari L950,
SAMe N309 G,
SAMe N309 TB,
SAMe N917 G
};
GnosisSUB = {
SAME 16373 S4,
SAMe 24358 S7,
SAMe 53570 S21
};
HospiraSUB = {
SAMe N309,
SAMe N917,
SAMe P332
};
LabBioSUB = {
SAMe N309 G,
SAMe N309 TB,
SAMe N917 G
};
tpar = Array asociativo (Tpm, {FamarSUB, GnosisSUB, HospiraSUB, LabBioSUB});
Nueva ventana ("Seleccionar TPM Y producto", << Modal,
Cuadro de lista V (
Cuadro de texto ("Seleccionar TPM"),
tpmbox = Cuadro de lista (Tpm,
prodbox << eliminar todo;
prodbox << adjuntar
Eval (tpar [Parse ((tpmbox << get selected) [1])]));
ctpm = tpmbox << se selecciona;
)
Cuadro de texto ("Seleccionar producto"),
prodbox = cuadro de lista ({}),
Cuadro de botones ("OK", cpro = prodbox << se selecciona),
)
);
data_path = spath || ctpm || "\" || cpro || "\ Database";
data_file = Pick File ("Seleccionar base de datos");
dt_data = Abrir (data_path || data_file, invisible);
spec_path = spath || ctpm || "\" || cpro || "\ Misc \ Specs";
spec_file = Pick File ("Seleccionar archivo de especificaciones");
dt_spec = Abrir (spec_path || spec_file, invisible);
Gracias de antemano,
Uwe
Los elementos seleccionados de un cuadro de lista forman una lista, incluso si solo hay una selección. Entonces, en su código "ctpm" y "cpro" hay listas y la concatenación de cadenas falla cuando construye la variable data_path. Necesitas algo como:
seleccionadoTpm = ctpm El 1 ] ;
selectedPro = cpro El 1 ] ;
Ruta de datos = spath || seleccionadoTpm || "\" || selectedPro || "\Base de datos" ;
y
ruta de especificación = spath || seleccionadoTpm || "\" || selectedPro || "\ Misc \ Specs" ;
