|
Hi Greg
I believe the data structure should be
dcl-ds *n;
s1con char(1) pos(1) dim(30);
s1cn01 char(9) pos(1);
s1cn02 char(9) pos(10);
s1cn03 char(4) pos(19);
s1cn04 char(4) pos(23);
s1cn05 char(4) pos(27);
end-ds;
your way - S1con was 900 characters - 30 x 30
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
