My 2cents. Another alternative is to run it in phantom. All output will go to a 
como file which may be useful. 

Thanks,

Marilyn A. Hilb 
Value Part, Inc
Direct: 847-918-6099
Fax: 847-367-1892
[EMAIL PROTECTED]
www.valuepart.com

 -----Original Message-----
From:   Joe Walter [mailto:[EMAIL PROTECTED] 
Sent:   Wednesday, April 27, 2005 6:29 PM
To:     [email protected]
Subject:        Re: [U2] Run a program in "Silent" mode

I don't do Unidata, but if there are such things as procs in Unidata - which
I take it there are from reading Allen Elwood's reply - you could also
simply execute the program from a proc using the proc 'PH' command which
hushes all output that would normally to the screen.

Example proc:
001 PQ
002 HRUN PROGRAM.FILENAME PROGRAM.ITEMNAME
or
002 HPROGRAM.ITEMNAME (to execute the program if it's compiled & catalogued
&there is an executable verb for it)
003 PH

the PH command should hush all output to terminal - sweet & simple.

below is some info on the proc ph command.

      proc.ph: (Command) Process output buffers with "hush".
      Applicable release versions: AP, R83
      Category PROC (92)
      Description processes the command(s) in the currently active output
buffer(s) and "hushes" terminal output. Output which would normally go to
the screen is turned off.





Alternatively - if you are running this program/job as a phantom process and
wan't to take the time & effort, you could do something like this...

PHANTOM.FLAG = @SYSTEM(25) ; *this returns a '1' of process is running as a
phantom, otherwise returns a '0'

then, for every print @(x,y) statement, do

IF NOT(PHANTOM.FLAG) THEN PRINT @(X,Y)

hope this helps.

joey walter

----- Original Message ----- 
From: "Allen E. Elwood" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, April 27, 2005 5:51 PM
Subject: RE: [U2] Run a program in "Silent" mode


> You could also pass a parameter from the PROC and read the parameter in
the
> program, like
>
> INPUT REALLY.PRINTING
> REALLY.PRINTING = (REALLY.PRINTING = "Y")
> IF REALLY.PRINTING THEN GOSUB OPEN.PRINTER
> {rest of program}
>
> That way if the printer isn't opened, the output will scroll on the
screen.
> And if someone did want to print they could run it from a proc that did a
> DATA "Y" in the appropriate position.
>
> fwiw,
>
> Allen
>
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of Brutzman, Bill
> Sent: Wednesday, April 27, 2005 14:13
> To: '[email protected]'
> Subject: RE: [U2] Run a program in "Silent" mode
>
>
> I change all of the
>
> PRINT @(x,y)
>
> to
>
> crt @(x,y).
>
> --Bill
>
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of Burwell, Edward
> Sent: Wednesday, April 27, 2005 1:22 PM
> To: '[email protected]'
> Subject: [U2] Run a program in "Silent" mode
>
>
> Hello,
>
> Is there a simple UniBasic command (kinda like ECHO OFF) that would cause
> all PRINT @(x,y) statements to be suppressed?
>
> I have a program that prints to the screen that I want to run in an
> "automatic" mode and I want it to not print to the screen.  We are on
> UniData 6 - aix.  Thanks.
>
> Ed Burwell
> [EMAIL PROTECTED]
> 973.361.5400 x1512
> -------
> u2-users mailing list
> [email protected]
> To unsubscribe please visit http://listserver.u2ug.org/
> -------
> u2-users mailing list
> [email protected]
> To unsubscribe please visit http://listserver.u2ug.org/
> -------
> u2-users mailing list
> [email protected]
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to