QTP to always create subfile

[Ken Langendock]

Lorry you can do this many ways.
I always use this method:
 
RUN abc
 
  GLOBAL TEMP T-Therapist CHARACTER * 10 &
         PARM PROMPT "Therapist "
  GLOBAL TEMP T-StartDate DATE CENTURY INCLUDED &
         PARM PROMPT "Selection From (YYYYMMDD) "
  GLOBAL TEMP T-EndDate DATE CENTURY INCLUDED &
         PARM PROMPT "Selection From (YYYYMMDD) "
 
REQUEST create-empty-subfile
 
ACCESS systemdefaults ; single record file
 
  TEMP T-Total
 
SUBFILE sfabc &
        KEEP &
        AT FINAL &
        INCLUDE T-Therapist alias Therapist, &
                T-StartDate alias SelectionFrom, &
                T-EndDate alias SelectionThru, &
                T-Total alias TotalCount
 
REQUEST Subtotal-my-records
 
ACCESS *sfabc &
  LINK Therapist OF sfabc &
    TO Therapist &
    OF mydatafile
 
  TEMP T-Counter COUNT 
 
OUTPUT sfabc &
       UPDATE &
       AT FINAL
 
  ITEM TotalCount of sfabc FINAL T-Counter
 
 
 
-----Original Message-----
From: powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com
[mailto:powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com] On
Behalf Of Lorry Litman
Sent: February 13, 2007 6:50 PM
To: PowerHouse listserver (E-mail)
Subject: QTP to always create subfile



Hi, 

I'm using PH 7.10G and VMS 7.3-1 
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.

Thanx 
       Lorry 


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. 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.sowder.com/pipermail/powerh-l/attachments/20070213/79451bb1/attachment.html