1 /* BEGIN INCLUDE FILE ... sort_merge_pars.incl.pl1 */ 2 3 /* input_file_max = maximum number of input files for sort-merge */ 4 5 6 dcl 1 attach_array(0:10 /*input_file_max*/), 7 2 count fixed bin(17), 8 2 desc char(168); 9 10 dcl input_file(10 /*input_file_max*/) char(256); 11 12 /* END INCLUDE FILE ... sort_merge_pars.incl.pl1 */