RE: Display

["Bob Cozzi" <cozzi@xxxxxxxxx>]

You may want to consider creating the text for those 8 output fields using
%char() and concatenation. For example:
D SpoonFulls     S            5P 2
Eval   item1 = %char(spoonfulls) + ' ' + Ingredient1

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Angela Wawrzaszek
Sent: Monday, January 26, 2004 7:16 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Display

I have a very simple request however I think I am looking at this in a
very cumbersome program and am hoping someone out there has done this in
a 'slick' way.
 
I want to display data in a column format for upto 8 pieces of info.
Like a subfile but each piece in the subfile could be different type of
info (some character, some numeric.)   I don't want to have to define
each piece of info as its own individual name and move from the file to
all these hardcoded fields.
 
 
Ie.   
 
RecipeName          RecipeName          RecipeName         RecipeName

Ingredient1             Ingredient1             Ingredient1
Ingredient1
Ingredient2              Ingredient2            Ingredient2
Ingredient2
SpecInstruction1     SpecInstruction1   SpecInstruction1
SpecInstruction1
 .
.
.
.
 
 
 
Each Read on the file will fill one of these columns.  
 
Thanks!
 
 
 
Angela Wawrzaszek 
Programmer/Analyst 
Nucor Steel Auburn 
wawrzaszek@xxxxxxxxxxxxxxx 
(315) 258-4205 
 
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.