Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Personal Communications vb - How to Find Text

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PC Guides & IT News
View previous topic :: :: View next topic  
Author Message
wsyeo82

New User


Joined: 23 Apr 2009
Posts: 4
Location: Malaysia

PostPosted: Fri Apr 24, 2009 7:53 am    Post subject: Personal Communications vb - How to Find Text
Reply with quote

Hi,

I would like to know if there is a possibility on having a VB script written in Personal Communications to search or get a required text in the screen?

Or, how can I get the pointer/cursor to point to the particular wording?
Similar to the Excel Find Function using Ctrl + F?

Thank you.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Apr 24, 2009 8:07 am    Post subject:
Reply with quote

Hello and welcome to the forum,

What happens when you simply use Ctrl + F?

Ctrl+F works in many situations. . .
Back to top
View user's profile Send private message
wsyeo82

New User


Joined: 23 Apr 2009
Posts: 4
Location: Malaysia

PostPosted: Fri Apr 24, 2009 8:20 am    Post subject: Reply to: Personal Communications vb - How to Find Text
Reply with quote

Hi,

In Personal Communications, there are no Ctrl + F or any functions of Find that I can find in the Edit Menu or other menus, which is why I hope there is a script that can help do the search.
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Fri Apr 24, 2009 2:00 pm    Post subject:
Reply with quote

Quote:
I would like to know if there is a possibility on having a VB script written in Personal Communications

NO.


You might need to do Print screen which will create word file with text on screen and use CTRL+F or vb macro to find it.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Apr 24, 2009 2:11 pm    Post subject:
Reply with quote

What's wrong with ISPF "FIND" (F 'string') command . . . or did I totally misunderstood the question?
Back to top
View user's profile Send private message
wsyeo82

New User


Joined: 23 Apr 2009
Posts: 4
Location: Malaysia

PostPosted: Fri Apr 24, 2009 4:10 pm    Post subject:
Reply with quote

Hi,

That Find '****' i believe only applies when you have a Command Line in place. But to do a screen search, it doesnt work.

Im not too sure on what you meant by print screen which will create a word file with text. What kind of printscreen I can use that will allow me to Paste to Text?

Thank you for your response
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10308
Location: italy

PostPosted: Fri Apr 24, 2009 4:14 pm    Post subject: Reply to: Personal Communications vb - How to Find Text
Reply with quote

if You would explain better the problem/requirement, somebody might come up with ideas

and after You have found the string what is it supposed to happen IMWTK(*)

(*) IMWTK = Inquiring Minds Want To Know
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Apr 24, 2009 5:07 pm    Post subject:
Reply with quote

wsyeo82 wrote:
That Find '****' i believe only applies when you have a Command Line in place.
. . . icon_eek.gif
Quote:
But to do a screen search, it doesnt work.
What does "screen" refer to here?
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Fri Apr 24, 2009 5:34 pm    Post subject:
Reply with quote

Quote:
Im not too sure on what you meant by print screen which will create a word file with text. What kind of printscreen I can use that will allow me to Paste to Text?


If you are using IBM PC Under file>printsetup choose Send to Note if you have other default printer

Then do print screen it will transfer screen to word doc keeping alignment same.
There you can do ctrl+F or macro
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Fri Apr 24, 2009 8:47 pm    Post subject: Reply to: Personal Communications vb - How to Find Text
Reply with quote

Don't know about vbscript but you can do it by running Rexx on your PC and EHLLAPI which is built in to Personal Communications. Its considered an old technology but it works very well and it is easy once you do it once or twice.
Back to top
View user's profile Send private message
wsyeo82

New User


Joined: 23 Apr 2009
Posts: 4
Location: Malaysia

PostPosted: Fri Apr 24, 2009 9:36 pm    Post subject: Reply to: Personal Communications vb - How to Find Text
Reply with quote

Hi,

What I need to do is, when I use PCOMM to connect to, for example, the system such as IM12.
I want to write a VB script that will do;

IF (Find this screen contain text=IBM) then
point cursor there and then do a [tab] then fill 'Y'

else,
jump to next screen [pf8] and find again until no more new forward page.

end if

Well, that's what I want to do so that I can come out with a script that will help reduce the manual eye ball-ing functions.
I am alright with anyway of getting the cursor, I just need to know how to point it there and am going to try with the printscreen send to word if it works.

any other ideas?

Thanx!
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Fri Apr 24, 2009 9:54 pm    Post subject:
Reply with quote

wsyeo82,

so you know VBscript.
as MBabu suggested in his post,
you can CALL EHLLAPI API's to do all of this.

I know that you can do this with REXX on the PC.
I know that you can do this with COBOL on the PC.

now, if VBScript can also CALL API's you are in business.

Suggest you check the link for EHLLAPI that MBabu provided and learn about EHLLAPI.

You can check the VBScript people at microsoft,
I know that they respond to questions,
and see if VBScript can CALL the EHLLAPI API's.

EHLLAPI.dll comes as a part of IE, so do not download a different DLL.
there is also a WINEHLLAPI.DLL which can also be used.

I used it in the late 80's to scrape CICS Screens to accumulate totals.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PC Guides & IT News All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Sorting on text - but in non-alphabet... Roy Ware SYNCSORT 5 Wed Aug 23, 2017 9:15 pm
No new posts Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm
No new posts find RACF group for access to spooled... jzhardy JCL & VSAM 1 Mon May 08, 2017 11:46 am
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
No new posts To find out size allocated to a seque... ashek15 JCL & VSAM 15 Thu Apr 27, 2017 9:42 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us