Question on recording a Macro thru ISPF



Support for IBM Debug Tool, Utilities and Advanced Functions

Question on recording a Macro thru ISPF

Postby Gururao78 » Mon Oct 12, 2009 8:03 pm

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
Gururao78
 
Posts: 9
Joined: Mon Sep 28, 2009 5:09 am
Has thanked: 0 time
Been thanked: 0 time

Re: Question on recording a Macro thru ISPF

 

Re: Question on recording a Macro thru ISPF

Postby Bill Dennis » Tue Oct 13, 2009 7:55 pm

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?
Regards,

Bill Dennis

Disclaimer: My comments on this forum are my own and do not represent the opinions or suggestions of any other person or business entity.
Bill Dennis
 
Posts: 278
Joined: Thu May 15, 2008 9:45 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Question on recording a Macro thru ISPF

Postby Gururao78 » Wed Oct 14, 2009 8:34 pm

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
Gururao78
 
Posts: 9
Joined: Mon Sep 28, 2009 5:09 am
Has thanked: 0 time
Been thanked: 0 time

Re: Question on recording a Macro thru ISPF

Postby Anuj Dhawan » Wed Nov 23, 2011 4:54 pm

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.
Anuj
Anuj Dhawan
 
Posts: 273
Joined: Mon Feb 25, 2008 3:53 am
Location: Mumbai, India
Has thanked: 6 times
Been thanked: 4 times


Return to IBM Debug Tool