Menu script

[Dennis Malen]

Bill,

That is exactly what I intend to do. The problem is "exit". Will exit bring
me back to the menu and skip the subsequent lines?
OR
Are you saying do all the reports in processing so I don't have the problem
with going to the next line as all the lines will run in the ONE processing
that I create (which is not a bad idea).

Dennis
----- Original Message ----- 
From: "William Randall" <wrandall at fptech.com>
To: <filepro-list at lists.celestial.com>
Sent: Monday, January 03, 2005 5:09 PM
Subject: Re: Menu script


> ----- Original Message ----- 
> From: Dennis Malen
> To: filepro-list at lists.celestial.com
> Sent: Monday, January 03, 2005 4:56 PM
> Subject: Menu script
>
>
> Happy & Healthy New Year to everyone!!!!!
>
> The following menu script is currently being used:
>
> /appl/fp/ddir msx.served -k
> /appl/fp/rclerk msx.served -s1 -z "addfile"
> /appl/fp/rreport msx.served -f import -a -h "Import AOS"
>
> The first line deletes the data from the file and then goes on to import
new
> information into the file.
>
> I want to avoid having someone request that the data should be removed
> accidentally. I want to place a new first line that checks the file and
> determines whether it should be deleted and then import the new info. The
> processing to check the file is easy.
>
> The problem is, if I do not want the continue how do I avoid going to the
> next line. I can use "exit" from the processing but that will take me to
the
> next line. How do I go back to the menu without continuing with the
> processing script if certain criteria to continue have not been met.
>
> Dennis Malen
> 516.479.5912
>
> -----------------------------
>
> There are a number of ways to do it but the easiest for me is to replace
the
> script with a filePro processing table that does it all with SYSTEM
> commands.  That way you can check conditions before and the EXIT will work
> as you intend.
>
> IF: <whatever condition you want>
> THEN: goto doit
> IF:
> THEN: EXIT
> doit:IF:
> THEN: system "/appl/fp/ddir msx.served -k"
> IF:
> THEN: system "/appl/fp/rclerk msx.served -s1 -z \"addfile\" "
> IF:
> THEN: system "/appl/fp/rreport msx.served -f import -a -h \"Import AOS\""
>
> Bill
>
>
>
>
> -- 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.298 / Virus Database: 265.6.7 - Release Date: 12/30/2004
>
> _______________________________________________
> Filepro-list mailing list
> Filepro-list at lists.celestial.com
> http://mailman.celestial.com/mailman/listinfo/filepro-list
>
>
>