725024_en-US

liliconcom

group file name and set lable by JSL looping, work fine but slowly

I have a JLS works fine, but slowly, is there any method to improve it?

 

1. import multiple files

2. base on file name rule group into a, b, c, d, e 

3. base on file name rule to decide file count and set into rows for each group

Names Default To Here(1);
dir = Pick Directory( "Select a directory" );

Multiple File Import(
	<<SET folder=""> 0, 
		insert into(a_filelist,filelist[i])
	);
	
	if ( b_files > 0, 
		insert into(b_filelist,filelist[i])
	);
	
	if ( c_files > 0, 
		insert into(c_filelist,filelist[i])
	);
	
	if ( d_files > 0, 
		insert into(d_filelist,filelist[i])
	);
	
	if ( e_files > 0, 
		insert into(e_filelist,filelist[i])
	);
);

	
for (i = 1, i <= N items(a_filelist), i++,
	is_reset_file = contains(a_filelist[i],"NULL");
	if( is_reset_file >= 1, 
		selrows = dt << get rows Where(Contains(char(a_filelist[i]), :File Name));
		column(dt,"file_lable")[selrows] = 0;
		b_count = 0;
	);
	if (is_reset_file == 0, 
		a_count = a_count + 1;
		selrows = dt << get rows Where(Contains(char(a_filelist[i]), :File Name));
		column(dt,"file_lable")[selrows] = a_count
	)
);

for (i = 1, i <= N items(b_filelist), i++,
	is_reset_file = contains(b_filelist[i],"NULL");
	if( is_reset_file >= 1, 
		selrows = dt << get rows Where(Contains(char(b_filelist[i]), :File Name));
		column(dt,"file_lable")[selrows] = 0;
		b_count = 0;
	);
	if (is_reset_file == 0, 
		b_count = b_count + 1;
		selrows = dt << get rows Where(Contains(char(b_filelist[i]), :File Name));
		column(dt,"file_lable")[selrows] = b_count
	)
);

// the following is loop for C , D, E</SET>

 

 

Automation and Scripting