<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.2900.3086" name=GENERATOR></HEAD>
<BODY>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>Pandurang,</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>What version and platform are you working on????
</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>I've never called Cobol directly from Qtp, but I have
done the sort of thing where I do processing in Qtp to create a subfile (on
Unix, where the data and definitions are in separate files), then have a Cobol
program read the data portion of the subfile, do more processing and write
the results into another file. I then take that file that's output from
the Cobol and create a subfile definition for it in Qtp, then rename the Cobol
output file to be the subfile.</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>Like this:</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>qtp</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>> access .....</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>bunch of qtp processing</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>> subfile S1 keep include ....</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>>go</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>>exit</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>This gives me the files:</SPAN></FONT></DIV>
<UL dir=ltr>
<LI>
<DIV align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>S1.sf (the data portion)</SPAN></FONT></DIV></LI>
<LI>
<DIV align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>S1.sfd (the definition)</SPAN></FONT></DIV></LI></UL>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>Cobol program that reads S1.sf and does a bunch of
really weird procesing, with output file S2.</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>This gives me the file:</SPAN></FONT></DIV>
<UL dir=ltr>
<LI>
<DIV align=left><FONT face=Arial color=#0000ff size=2><SPAN
class=398162813-18072007>S2</SPAN></FONT></DIV></LI></UL>
<DIV><SPAN class=398162813-18072007></SPAN><FONT face=Arial><FONT
color=#0000ff><FONT size=2>qtp</FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007> access
....</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007> set input limit
1</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007> set process limit
1</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007> use temporary data items / file items
to get the data items that I require to match the data in S2 from
above</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007> subfile S2 keep include ... (this
MUST match the Cobol program's definition of S2
EXACTLY)</SPAN></FONT></FONT></FONT></DIV>
<DIV><SPAN class=398162813-18072007></SPAN><FONT face=Arial><FONT
color=#0000ff><FONT size=2>><SPAN class=398162813-18072007> go
</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT><SPAN
class=398162813-18072007></SPAN><FONT face=Arial><FONT color=#0000ff><FONT
size=2>><SPAN class=398162813-18072007>
exit</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT> </DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>This gives me the
files:</SPAN></FONT></FONT></FONT></DIV>
<UL>
<LI><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>S2.sf, the data portion of the subfile, which is
EMPTY (0 records)</SPAN></FONT></FONT></FONT></LI>
<LI><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>S2.sfd, the definition portion of the
subfile</SPAN></FONT></FONT></FONT></LI></UL>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>Then, I simply rename S2 (output from Cobol file) as
S2.sf</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>I now have a permanent subfile named S2 that I can read
in Powerhouse.</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007></SPAN></FONT></FONT></FONT> </DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>Hope that helps,</SPAN></FONT></FONT></FONT></DIV>
<DIV><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=398162813-18072007>
<P><FONT size=2>Guy L. Werry<BR>Senior Systems Analyst<BR>Hudson Bay Mining
& Smelting Co., Limited. </FONT></P></SPAN></FONT></FONT></FONT></DIV>
<DIV><BR></DIV>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
<HR tabIndex=-1>
<FONT face=Tahoma size=2><B>From:</B>
powerh-l-bounces+guy.werry=hbms.ca@lists.sowder.com
[mailto:powerh-l-bounces+guy.werry=hbms.ca@lists.sowder.com] <B>On Behalf Of
</B>Pandurang Rajpurohit<BR><B>Sent:</B> Wednesday, July 18, 2007 8:21
AM<BR><B>To:</B> powerh-l@lists.sowder.com<BR><B>Cc:</B> Joe
Boyle<BR><B>Subject:</B> Usage of cobol program in QTP<BR></FONT><BR></DIV>
<DIV></DIV><BR><FONT face=sans-serif size=2>Hello All,</FONT> <BR><BR><BR><FONT
face=sans-serif size=2>Any one could suggest how to make use of cobol program in
QTP. </FONT><BR><BR><FONT face=sans-serif size=2>Thanks &
Regards<BR>Pandurang
Rajpurohit,<BR><BR>------------------------------------------------------------------------------------<BR>IBM
India Private Limited,<BR>Seat No 268, 4th Floor, Tower B, Tech Park One,
<BR>S.No 19/A/2A/1/2, Near DON BOSCO School,<BR>Off Airport Road, Yerwada, PUNE
411006<BR>Phone (Br) : +91 020 40115000 - 16322<BR>Phone (Dir) : +91 020
40116322<BR>Cell : +91-09922054662<BR>EMAIL : pandurang.rajpurohit@in.ibm.com
</FONT>The information in this e-mail and any attachments is confidential and may be subject to legal professional privilege. It is intended solely for the attention and use of the named addressee(s). If you are not the intended recipient, or person responsible for delivering this information to the intended recipient, please notify the sender immediately. Unless you are the intended recipient or his/her representative you are not authorised to, and must not, read, copy, distribute, use or retain this message or any part of it.
</BODY></HTML>