<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<TITLE>Message</TITLE>
<META content="MSHTML 6.00.2900.3020" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff size=2>Lorry
you can do this many ways.</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff size=2>I
always use this method:</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>RUN abc</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> GLOBAL TEMP T-Therapist CHARACTER * 10 &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> PARM PROMPT "Therapist
"</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> GLOBAL TEMP T-StartDate DATE CENTURY INCLUDED
&</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> PARM PROMPT "Selection From
(YYYYMMDD) "</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> GLOBAL TEMP T-EndDate DATE CENTURY INCLUDED
&</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> PARM PROMPT "Selection From
(YYYYMMDD) "</FONT></SPAN></DIV></FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>REQUEST create-empty-subfile</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>ACCESS systemdefaults ; single record file</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> TEMP T-Total</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>SUBFILE sfabc &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> KEEP
&</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> AT
FINAL &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> INCLUDE T-Therapist alias
Therapist, &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>
T-StartDate alias SelectionFrom, &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>
T-EndDate alias SelectionThru, &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>
T-Total alias TotalCount</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>REQUEST Subtotal-my-records</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2>ACCESS *sfabc &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> LINK Therapist OF sfabc &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> TO Therapist &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> OF mydatafile</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> TEMP T-Counter COUNT </FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT color=#0000ff
size=2></FONT></SPAN><SPAN class=464444101-14022007><FONT face="Courier New"
color=#0000ff size=2>OUTPUT sfabc &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> UPDATE &</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> AT FINAL</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face="Courier New" color=#0000ff
size=2> ITEM TotalCount of sfabc
FINAL T-Counter</FONT></SPAN></DIV>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=464444101-14022007><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV></DIV>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left><FONT face=Tahoma
size=2>-----Original Message-----<BR><B>From:</B>
powerh-l-bounces+ken.langendock=rogers.com@lists.sowder.com
[mailto:powerh-l-bounces+ken.langendock=rogers.com@lists.sowder.com] <B>On
Behalf Of </B>Lorry Litman<BR><B>Sent:</B> February 13, 2007 6:50
PM<BR><B>To:</B> PowerHouse listserver (E-mail)<BR><B>Subject:</B> QTP to always
create subfile<BR><BR></FONT></DIV><!-- Converted from text/rtf format -->
<P><FONT face=Arial size=2>Hi,</FONT> </P>
<P><FONT face=Arial size=2>I'm using PH 7.10G and VMS 7.3-1</FONT> <BR><FONT
face=Arial size=2>I have a small qtp program that prompts for a therapist
number, start and end dates. It then does some counting of items and writes to a
subfile. The problem I'm having is the subfile is only created if records are
found, however, I need the subfile to always be created and include the items
prompted for because this file is then accessed by a quiz program that does some
reporting.</FONT></P>
<P><FONT face=Arial size=2>Thanx</FONT> <BR><FONT face=Arial
size=2> Lorry</FONT> </P><BR>This e-mail
and/or any documents in this transmission is intended for the address(s) only
and may contain legally privileged or confidential information. Any unauthorized
use, disclosure, distribution, copying or dissemination is strictly prohibited.
If you receive this transmission in error, please notify the sender immediately
and return the original. </BODY></HTML>