RE: Advice, urgent

[RReddy@xxxxxxxxxxxxxxxxxxxx]

Could you please give me an example. Thanks for your help.






lisa.thomas@Hayssen.com@midrange.com on 09/10/2001 09:16:26 AM

Please respond to rpg400-l@midrange.com

Sent by:  rpg400-l-admin@midrange.com


To:   rpg400-l@midrange.com
cc:

Subject:  RE: Advice, urgent


A recursive RPG program should work fine.  Simply use Activation Group *New
on each call and spin down through until no additional levels and delete.
When you return you'll back up a level and proceed to check for additional
levels under it.  It's a little tricky getting it perfect because there are
lots of cases to test.  I really don't see the need for the array at all.

-----Original Message-----
From: RReddy@medicalartspress.com [mailto:RReddy@medicalartspress.com]
Sent: Monday, September 10, 2001 9:54 AM
To: RPG400-L@midrange.com
Subject: Advice, urgent



Hello All.

I have the following problem.

There is a parts master file and each part have its own sublevels and each
of these sublevels could have its own sublevels.

For example.

     Part P1 has 3 levels
               a) logo
               b) Color
               c) Imprint

     Now i could have SubLevels for the option (b) like this
     Color has 3 levels
               b.1) Position
               b.2) Color Imprint
               b.3) Cut Size

     And also i could have Sublevels within this Sublevels.

What i am trying to store all the part levels with its sublevels into an
array like this

     Array Index          Value
     1         Logo
     2         Color
     3         Position
     4         Color Imprint
     5         Cut Size
     6         Imprint

And the reason for me to store into an array because lets say the user
wants to delete the color option from the part, I need to delete all the
sublevels with the color options including sublevels within sublevels.

Please advice how can i do this in RPG or RPGLE and remember each sublevels
could have its sublevels and so on.

Thanks Again.
Reddy

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.