Mi código para hacer esto está a continuación. No recibo errores pero no funciona. Revisé las columnas y no tienen los límites de especificaciones. El registro muestra lo siguiente:
spec_limits = {LSL(lsl), USL(usl), Mostrar límites(1)};
:Column_Name << Obtener tipo de datos() = "Carácter";
:LSL << Obtener tipo de datos() = "Numérico";
"Columna:";
nombre_columna = "MST";
"LSL:";
lsl = 9;
"USL:";
usl = 12,5;
spec_limits = {LSL(lsl), USL(usl), Mostrar límites(1)};
:Column_Name << Obtener tipo de datos() = "Carácter";
:LSL << Obtener tipo de datos() = "Numérico";
"Columna:";
nombre_columna = "FIBRA";
"LSL:";
lsl = 7;
"USL:";
usl = 9;
spec_limits = {LSL(lsl), USL(usl), Mostrar límites(1)};
:Column_Name << Obtener tipo de datos() = "Carácter";
:LSL << Obtener tipo de datos() = "Numérico";
"Columna:";
nombre_columna = "AZUFRE";
"LSL:";
lsl = 1;
"USL:";
usl = 1,5;
spec_limits = {LSL(lsl), USL(usl), Mostrar límites(1)};
:Column_Name << Obtener tipo de datos() = "Carácter";
:LSL << Obtener tipo de datos() = "Numérico";
"Columna:";
nombre_columna = "GRASA";
"LSL:";
lsl = 3;
"USL:";
usl = 5;
spec_limits = {LSL(lsl), USL(usl), Mostrar límites(1)};
:Column_Name << Obtener tipo de datos() = "Carácter";
:LSL << Obtener tipo de datos() = "Numérico";
"Columna:";
nombre_columna = "PROTEÍNA";
"LSL:";
lsl = 24;
"USL:";
usl = 27;
Aquí está el script JSL:
myDT = Abrir base de datos(
"APP=JMP;DATABASE=BBAnalytics;DRIVER={SQL Server};Descripción=BB Analytics Data Warehouse;Trusted_Connection=Sí;UID=%_UID_%;WSID=SFX-JPCZ724;SERVER=SFX-DWA01;DBCNAME=SFX-DWA01 ;",
"SELECCIONAR * DESDE [dbo].[myDT]",
"miDT"
);
specLimitsTable = Abrir base de datos(
"APP=JMP;DATABASE=BBAnalytics;DRIVER={SQL Server};Descripción=BB Analytics Data Warehouse;Trusted_Connection=Sí;UID=%_UID_%;WSID=SFX-JPCZ724;SERVER=SFX-DWA01;DBCNAME=SFX-DWA01 ;",
"SELECCIONAR * DE [dbo].[specDTTest]",
"pruebaspecDTT"
);
// Iterar sobre las filas de la tabla de límites de especificaciones
// Iterar sobre las filas de la tabla de límites de especificaciones
Para cada fila (specLimitsTable,
// Obtener valores de la fila actual
nombre_columna = Columna(specLimitsTable, "Nombre_columna")[Fila()];
lsl = Columna(specLimitsTable, "LSL")[Fila()];
usl = Columna(specLimitsTable, "USL")[Fila()];
// Establecer límites de especificaciones para la columna correspondiente en la tabla de datos principal
col_ref = Columna(myDT, nombre_columna);
col_ref << Establecer propiedad (
"Límites de especificaciones",
{LSL(lsl), USL(usl), Mostrar límites(1)}
);
spec_limits = Column(myDT, column_name) << Obtener propiedad("Límites de especificación");
Mostrar(spec_limits);
show(column_name << Obtener tipo de datos());
show(lsl << Obtener tipo de datos());
// Muestra los límites de especificaciones aplicados para cada columna
Espectáculo(
"Columna:", nombre_columna,
"LSL:", lsl,
"USL:", usl
);
);