Jay, Well it's not the only way to do this, but it does work.... file fileq=fileq;msg listeq >*fileq while finfo('fileq',19) > 1 input printer <fileq if str("!printer",7,7) = "APPRINT" setvar printer_position POS("DEV=","!printer",1) setvar printername rtrim(str("!printer",27,20)) endif endwhile showvar printername purge fileq,temp >$null reset fileq Here is the environment before running the command file :listeq FILE EQUATIONS FILE REPORTA;DEV=LP FILE REPORTB;DEV=LP FILE REPORTC;DEV=CMS2 FILE REPORTD;DEV=CMS4 FILE APPRINT=REPORTZ;DEV=LP,1 FILE FILEQ=FILEQ;MSG Here is the run of the command file... :getprint PRINTERNAME = LP,1 Now you cane use the variable PRINTERNAME in subsequent file equate issues (i.e. file APPRINT=reportc;dev=!PRINTERNAME). Regards, Reid E. Baxter Jay Willis <Jay.Willis@EVERGREENAV To: [log in to unmask] IATION.COM> cc: Sent by: HP-3000 Subject: Re: [HP3000-L] Save and Re-Use a File Equation Systems Discussion <[log in to unmask] > 04/04/2005 01:27 PM Please respond to Jay Willis Yes, Reid. I'd appreciate seeing an example. ________________________________ From: HP-3000 Systems Discussion on behalf of Reid Baxter Sent: Mon 4/4/2005 10:12 AM To: [log in to unmask] Subject: Re: [HP3000-L] Save and Re-Use a File Equation Jay, Alrightie then. In the first example there was no, "file APPRINT=". So, APPRINT is being redirected each time. So, perhaps with a "listeq" redirected to a message file searching for APPRINT and delineating the various portions of the file equate and loading a variable with the portion immediately after the "dev=" would work. If you need an example let me know. Regards, Reid E. Baxter "Jay Willis" <Jay.Willis@evergreenav To: <[log in to unmask]>, <[log in to unmask]> iation.com> cc: Subject: RE: Re: [HP3000-L] Save and Re-Use a File Equation 04/04/2005 12:57 PM Problem is, the same filename is used for all print files. We have no control of the filename - it came with the package. !job... . !file APPRINT=reportA;dev=<entered parameters> !run program A !file APPRINT=checks;dev=lp;forms=mount checks !run program B !file APPRINT=reportC;dev=<entered parameters> !run program C . !eoj ________________________________ From: HP-3000 Systems Discussion on behalf of Reid Baxter Sent: Mon 4/4/2005 9:46 AM To: [log in to unmask] Subject: Re: [HP3000-L] Save and Re-Use a File Equation Jay, If indeed you utilize a single job stream to facilitate both reports (before and after) and the 'report' name is the same, the file equate should still exist when report b is created as file equates, unless reset, are in effect for the life of the job. Regards, Reid E. Baxter Jay Willis <j.willis@EVERGREENAV To: [log in to unmask] IATION.COM> cc: Sent by: HP-3000 Subject: [HP3000-L] Save and Re-Use a File Equation Systems Discussion <[log in to unmask] DU> 04/04/2005 12:35 PM Please respond to Jay Willis Hello group. I seek help on what I believe is a simple problem. We have a system wherein the user enters on a screen the parameters of how they want reports from a job to be handled. Printer name, copies, priority. Within this job, besides the reports that the user has entered parameters for, is a file equation for forms files - checks. Some reports must be printed before the checks are printed. Other reports must come after the program that prints the checks. What I'd like to do is to save the file equation with the parameters the user entered, and then re-use that file equation after the checks are printed. Like this: 1. Enter printer name, etc for reports 2. Submit job, which does: a. file report;dev=<parameters from 1 above> b. run program A c. file print=checks;dev=lp;forms=mount checks d. run program B to print checks e. file report;dev=<parameters from 1 above> f. run program C to create report to print on printer entered in 1 I hope that makes sense. Thanks for any help. Jay * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html * This transmission may contain information that is privileged, confidential and/or exempt from disclosure under applicable law. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution, or use of the information contained herein (including any reliance thereon) is STRICTLY PROHIBITED. If you received this transmission in error, please immediately contact the sender and destroy the material in its entirety, whether in electronic or hard copy format. Thank you. * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html * (See attached file: winmail.dat) * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html * * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html * * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *