Quick and dirty

[Ronald W. Olenic]

This is a multi-part message in MIME format.
--------------0429E72AE3CBB7376B65836B
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Try this

screen x menu

file first_file designer
file parts_file designer
...
...
...

procedure internal two
begin
  while retrieving parts_file via part_no using part_no of first_file
  begin
   let  IB = initial balance
   let  IB-temp=IB - order qty
   let  IB = IB-temp
  end
end

procedure designer one nodata 
begin
  while retrieving first_file 
  begin
    do internal two
  end
end

...
...

build

PowerHouse will not nest loops directly.  You need to create a separate
procedure to call from within the first loop.

Ron Olenic
Senior System Analyst
The opinions expressed are my own, unless my wife tells me otherwise.

jlkeepers@mmm.com wrote:
> 
> Hello all,
> 
> The following is pseudo code that I am having a hard time code in
> PowerHouse.  Anyone have any ideas?
> 
> Pseudo code (parts are already sorted)
> 
> read part
> while not eof
>    IP = inital part
> 
>    while part = IP
>      IB = initial balance
>      IB-temp=IB - order qty
>      IB = IB-temp
>       read next part
> 
>    end while
> 
> endwhile
> 
> Any help would be most appreciated.
> 
> Sincerely,
> Jeff Keepers
> 3M Valley, NE
> 
> = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
> Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
> powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
> This list is closed, thus to post to the list, you must be a subscriber.
--------------0429E72AE3CBB7376B65836B
Content-Type: text/x-vcard; charset=us-ascii;
 name="olenicr.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for Ronald W. Olenic
Content-Disposition: attachment;
 filename="olenicr.vcf"

begin:vcard 
n:Olenic;Ronald
x-mozilla-html:TRUE
org:Compuware
adr:;;;;;;
version:2.1
email;internet:ronolenic@bigfoot.com
title:Senior Systems Analyst
note;quoted-printable:The opinions expressed are my own, and as such are subject to change or  even complete reversal without notice=0D=0A
fn:Ronald Olenic
end:vcard

--------------0429E72AE3CBB7376B65836B--

= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.