IBM Mainframe Forum

[Gururao78]

I am trying to record a macro to capture some print screen of some JOB run statistics from SAVRS.
I have recorded the macro to do this with the save print screen instructions also. But when the macro
is saved and I run the Macro, it does everything , but does not save the Print screens.

Is there any other way to achieve this?

Guru

[Bill Dennis]

Can you post your macro source?

Perhaps the print screens are going to the ISPF LOG and getting deleted at LOGOFF?

Is this really an ISPF macro or an 3270 Emulator record/play macro?

[Gururao78]

Here is the source for my Recorded Macro:
After the command Sess0.Screen.Sendkeys("5<Enter>") , I try to capture the screenprint by using CTRL+P and append to file option. But that opration is not getting captured in the source pasted below. Is there any other way to acheive this?

This section of code contains the recorded events
Sess0.Screen.Sendkeys("b.$<Enter>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("so<Enter>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("qbextni<Tab><Tab><Tab><Tab><Tab><Tab>-5<Enter>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("1<Enter>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("5<Enter>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
Sess0.Screen.Sendkeys("<Pf8>")
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)

System.TimeoutValue = OldSystemTimeout
End Sub

[Anuj Dhawan]

That's a 3270-emulator Macro not an ISPF one. "CTRL+P" seems to be a mapped to some key. I don't know the solution for the emulator you are suing for sure, however, if you still log in on this forums - try to use the PF key you map to "CTRL+P" and see if that works.