How to execute a program from a program and capture the results from the executed program

Question

Question

Bob Ebbert · Jul 18, 2019

Hi,

I have a program that displays the current running processes to the screen. I need to have a program execute that display program and capture the results to a file. The display program does pause at the bottom of each page waiting for an 'enter' to go to the next page.

Note( the display program will not successfully compile on the current system but it does work)

Also - very, very new to Mumps.

Thanks,

Bob

Discussion (23)0

Log in or sign up to continue

Robert Cemper · Jul 18, 2019

are you looking for this ?

Execute Server Commands from Caché / Ensemble / IRIS

0 0

score 0 · Answer 1 · 2019-07-18T16:43:06-04:00

Hi,

To run do cmd^zpipe(), do I need to put the code provided into a program and compile it?

Then when I run it replace cmd with the program that I wish to test?

In my case it would be D SS^ZPIPE() OR D ^%SS^SPIPE()

I really am new to this. I have access to the free online documentation and some cache programs.

Bob

score 0 · Answer 2 · 2019-07-19T10:37:43-04:00

Bob Ebbert · Jul 19, 2019

Hi,

Is this something that just can't be done in mumps/cache?

Thanks,
Bob

0 0

score 0 · Answer 3 · 2019-07-18T16:52:18-04:00

Hi,

JOBEXAM? never heard of it.

The program is a MUMPS program. The results display on the screen. I need a program to execute that program to capture the result, write it to a file and email that file. A cron will run it every 15 minutes.

Thanks,

Bob

score 0 · Answer 4 · 2019-07-18T17:25:32-04:00

Hi,

I think that I am closer.

I created a wrapper. I opened a file, executed the SS program, closed and emailed the file.

But, The program displayed the results to the screen and created a zero byte file that it emailed.

How can I get the output to not display and get written to the open file?

Thanks,

Bob

score 0 · Answer 5 · 2019-07-19T16:22:57-04:00

Hi,

Thanks for your response.

Robert Cemper sent me the solution.

use file do ALL^%SS ;; must be the same line

Worked perfectly.

Bob

score 0 · Answer 6 · 2019-07-18T17:56:37-04:00

Bob Ebbert · Jul 18, 2019

Hi,

Cache on Unix

Bob

0 0

score 0 · Answer 7 · 2019-07-19T15:50:20-04:00

Bob Ebbert · Jul 19, 2019

Hi,

OMG!. Too cool. That worked.

Thank you very, very much.

Bob

0 0

score 0 · Answer 8 · 2019-07-19T16:19:39-04:00

Bob Ebbert · Jul 19, 2019

Hi,

Oh, good to know.

Thanks again.

Bob

0 0

score 1 · Answer 9 · 2019-07-18T18:08:42-04:00

Sorry, this is a description of how to run a program of WINDOWS or LINUX from Caché.

What you address here ar Caché Routines or ClassMethods.

score 0 · Answer 10 · 2019-07-18T16:56:32-04:00

Sourabh Sethi · Jul 18, 2019

I have updated my previous comment

0 0

score 0 · Answer 11 · 2019-07-19T11:01:51-04:00

Hello,

I looked up JOBEXAM. That might display what I need but, I need to be able to capture the result into a file and email that file every 15 minutes. So if I use the program that I have or JOBEXAM, I still need a way to get the results into a file that I can email.

Thanks for your patience,

Bob

score 0 · Answer 12 · 2019-07-19T15:58:53-04:00

Robert Cemper · Jul 19, 2019

BINGO !

0 0

score 1 · Answer 13 · 2019-07-18T17:46:57-04:00

Sourabh Sethi · Jul 18, 2019

Have you used USE command?

https://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KEY...

1 0

score 0 · Answer 14 · 2019-07-19T10:55:10-04:00

Hi,

Yes, I think so.

I opened the file (file-name) then I did USE file-name.

It displayed to the terminal and created an empty file.

Bob

score 0 · Answer 15 · 2019-07-19T12:23:03-04:00

@Sourabh Sethi gives you reasonable advice. You have a code which displays something on a terminal.

If display is done with "write" command (but not with some device-specific video-memory related commands) you can switch the device before calling the "program" and it will direct all the "writes" into the file.

But maybe "your program" changes the device to terminal intentionally in the code - so I think you cannot go with USE device approach in this case - better change the code. You say "you cannot compile the program" - but do you have the source code to see what it really does? If yes you can easily answer yourself what it does and operate accordingly.

Maybe another idea is to change the device "terminal" in your system - maybe you can log everything from the device to a file. I don't remember if we have this feature for device settings.

score 0 · Answer 16 · 2019-07-19T13:31:03-04:00

Hi,

Yes, my code does have all of the necessary error handling.

I did not have the ALL in the D statement. I added it with no space before the ^.

It compiled and ran. It did stop the program from prompting between pages but I still have an empty file.

Bob

score 0 · Answer 17 · 2019-07-19T12:28:31-04:00

Hello Bob,

I believe something similar to the following is what others have been suggesting.

open file:("WNS"):3
if ('$test) { write !,"Failed to open "_file quit }
use file
do ALL^%SS
close file
quit

This works for me. Is this what you did? Is it not working for you?

Note that, unlike my minimal example, your code should of course include proper error trapping/handling.

Hope that helps,

Aaron

score 0 · Answer 18 · 2019-07-19T13:06:32-04:00

Hey Bob,

Sorry for delay in response as I was not working today.

Can you please share the code of wrapper you have written.

USE command should share the device.

Regards

Sourabh

score 0 · Answer 19 · 2019-07-19T16:47:25-04:00

Sourabh Sethi · Jul 19, 2019

That's great!!!!

0 0

score 0 · Answer 20 · 2019-07-18T16:48:14-04:00

Create a wrapper, which will OPEN a FILE, and USE it.

Then call your program from the wrapper.

Then close ur file.

I guess this should force to write in file if the earlier program is writing in terminal.

score 0 · Answer 21 · 2019-07-18T17:51:00-04:00

Hi Bob!

Could you please share the version of InterSystems Data platform you execute the program in? Is it Caché, or Ensemble or InterSystems IRIS?

Also, what is the OS as a host?

score 1 · Answer 22 · 2019-07-19T15:45:31-04:00

if you test your example from terminal prompt it needs some important change:

open file:("WNS"):3
if ('$test) { write !,"Failed to open "_file quit }
use file do ALL^%SS ;; must be the same line
close file
quit