415358_zh-CN

liliconcom

如何通过 For 循环附加数据表 A 中的一份报告，然后附加数据表 B 中的另一份报告

我有两个不同的数据表，A 和 B。每个数据表中有一列具有相似的变量。

我使用单独的 For 循环从每个数据表 A 和 B 中按具有相似变量的列创建子集，以创建表格报告并将其附加到一个新窗口中。

我注意到从子集数据表 A 创建的所有表格报告都附加到新窗口中，后面跟着来自子集数据表 B 的所有表格报告。

我想要的是针对每个变量级别附加来自子集数据表 A 的一个表格报告，然后附加来自子集数据表 B 的表格报告。

代码该怎么写？

我使用“大班级”和“大班级家庭”数据集作为示例来说明这一点。

dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );

vb = V List Box();
listdt1 = {};
listdt2 = {};
coldt1 = Column (dt1, "age");
coldt2 = Column (dt2, "age");
colleveldt1 = Associative Array(coldt1) << Get Keys;
colleveldt2 = Associative Array(coldt1) << Get Keys;

For (i=1, i <=N Items(colleveldt1), i++,
	dt1row = dt1 << Get Rows Where(:age == colleveldt1[i]);
	listdt1[i] = dt1 << Subset(Rows(dt1row));
	tb = listdt1[i]<< Get As Report;
	vb << Append (Table Box(tb));

);
	
For (i=1, i <=N Items(colleveldt2), i++,
	dt2row = dt2 << Get Rows Where(:age == colleveldt2[i]);
	listdt2[i] = dt2 << Subset(Rows(dt2row));
	tb = listdt2[i]<< Get As Report;
	vb << Append (Table Box(tb));
	
	
);

New Window("Report", vb);

大规模定制回复：如何从数据表 A 附加一个报告，然后从数据表 B 到 For 循环附加另一个报告

简单的移动 JSL 就能得到你想要的

Names Default To Here( 1 );

dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );

vb = V List Box();
listdt1 = {};
listdt2 = {};
coldt1 = Column (dt1, "age");
coldt2 = Column (dt2, "age");
colleveldt1 = Associative Array(coldt1) << Get Keys;
colleveldt2 = Associative Array(coldt1) << Get Keys;

For (i=1, i <=N Items(colleveldt1), i++,
 dt1row = dt1 << Get Rows Where(:age == colleveldt1[i]);
 listdt1[i] = dt1 << Subset(Rows(dt1row),invisible);
 tb = listdt1[i]<< Get As Report;
 vb << Append (Table Box(tb));
dt2row = dt2 << Get Rows Where(:age == colleveldt2[i]);
 listdt2[i] = dt2 << Subset(Rows(dt2row),invisible);
 tb = listdt2[i]<< Get As Report;
 vb << Append (Table Box(tb));
);

New Window("Report", vb);

回复：如何通过 For 循环附加数据表 A 中的一份报告，然后附加数据表 B 中的另一份报告谢谢。