HP3000-L Archives

March 2005, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Tom Brandt <[log in to unmask]>
Reply To:
Tom Brandt <[log in to unmask]>
Date:
Fri, 11 Mar 2005 15:45:01 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (33 lines)
At 03:36 PM 3/11/2005, Jim Phillips wrote:
>--- Tom Brandt <[log in to unmask]> wrote:
>But, do you do the DBFIND against the DETAIL or the
>MASTER?

Detail.

For example, I have this working storage structure (this might display
weird due to embedded tabs):
      05  WAF-KEY-ARG.
          10  WAF-ARG-TYPE            PIC X(02).
          10  FILLER                  PIC S9(4) COMP VALUE +0.
          10  FILLER                  PIC S9(4) COMP VALUE +18.
          10  FILLER                  PIC S9(4) COMP VALUE +0.
          10  WAF-ARG-VALUE           PIC X(18).

I move ">=" to WAF-ARG-TYPE, and a key value to WAF-ARG-VALUE.

Then I will call DBFIND, data set name = detail set name, mode =24, the
detail data set search item name, and WAF-KEY-ARG for the argument.



--
Tom Brandt
Northtech Systems, Inc.
130 S. 1st Street, Suite 220
Ann Arbor, MI 48104-1343
http://www.northtech.com/

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2