I tend to think Neil Armstrong is on the right track.
IIRC, the default when extracting data with QTP from a KSAM/XL file is in key (index) order. That might explain the difference in what you're seeing.
What does a LISTFILE,5 or LISTFILE,7 show?
This is from the "Using KSAM/XL" manual:
| Displaying File and
| Key Information
|
| Use the LISTFILE command to display the file specifications used to
| build the file. This command lists descriptions of one or more disk
| files at the level of detail you select. The level of display detail is
| controlled by the option number or keyword parameter following the
| file name.
|
| . . .
|
| Two options display the key specifications for a KSAM XL file.
| Option 5 (DATA) displays the file specifications and key data for the
| file. Option 7 (UNIQUE) displays information that is unique to the
| file type. For KSAM files, this displays the key data without the file
| specifications.
|
| . . .
|
| :LISTFILE ARMSTR.MGR.AR,5
| ***************************
| FILE: ARMSTR.MGR.AR
| FILE CODE : 0 FOPTIONS: ASCII,FIXED,NOCCTL,KSAMXL
| BLK FACTOR: 1 CREATOR : **
| REC SIZE: 160(BYTES) LOCKWORD: **
| BLK SIZE: 160(BYTES) SECURITY--READ : ANY
| EXT SIZE: 0(SECT) WRITE : ANY
| NUM REC: 0 APPEND : ANY
| NUM SEC: 2160 LOCK : ANY
| NUM EXT: 2 EXECUTE : ANY
| MAX REC: 115 **SECURITY IS ON
| FLAGS : n/a
| NUM LABELS: 0 CREATED : MON, NOV 13, 1989, 3:35 PM
| MAX LABELS: 0 MODIFIED: MON, NOV 13, 1989, 3:35 PM
| DISC DEV #: 16 ACCESSED: MON, NOV 13, 1989, 10:15 PM
| CLASS : DISC LABEL ADDR: **
| SEC OFFSET: 0
|
| KEY KEY TYPE KEY LOCATION KEY SIZE DUP\RDUP
| 1 NUMERIC 4 6 NONE
| 2 BYTE 10 25 RDUP
| 3 NUMERIC 65 5 RDUP
| 4 BYTE 70 3 RDUP
|
| NUM KSAM KEYS: 4 FIRST KSAM RECORD: 1
| LANGUAGE : ENGLISH REUSE RECORDS : YES
| PRIMARY KEY : RANDOM COBOL : NO
| VERSION : 2 COMPUTEBLK SIZE : OPTMBLK
|
| . . .
|
| :LISTFILE ARMSTR.MGR.AR,7
| **************************
| FILE: ARMSTR.MGR.AR
|
| KEY KEY TYPE KEY LOCATION KEY SIZE DUP\RDUP
| 1 NUMERIC 4 6 NONE
| 2 BYTE 10 25 RDUP
| 3 NUMERIC 65 5 RDUP
| 4 BYTE 70 3 RDUP
|
| NUM KSAM KEYS: 4 FIRST KSAM RECORD: 1
| LANGUAGE : ENGLISH REUSE RECORDS : YES
| PRIMARY KEY : RANDOM COBOL : NO
| VERSION : 2 COMPUTEBLK SIZE : OPTMBLK
|
Hope this helps,
Patrick
________________________________________________
Patrick Santucci
Oracle Database Administrator
CBI - A Division of HSNi
-----Original Message-----
From: James B. Byrne [mailto:[log in to unmask]]
Sent: Thursday, October 05, 2017 14:08
To: Santucci, Patrick
Cc: [log in to unmask]
Subject: RE: [EXTERNAL] [HP3000-L] KSAMXL questions
On Thu, October 5, 2017 13:11, Santucci, Patrick wrote:
> Weird...
>
> 82 + 83 = 165
> 83 + 83 = 166
>
> 166 + 82 = 248
> 166 + 83 = 249
>
> 249 + 82 = 331
> 249 + 83 = 332
>
> 332 + 82 = 414
> 332 + 83 = 415
>
> ...
>
> What are in records 82 and 83? And why the repeating pattern?
Where do you mean? In the KSAMXL file or in the SUBFILE?
The KSAMXL file has this in records 80 through 84:
80) 1349027 ONTARIO LTD 1536 00206976 VEND
81) 1349027 ONTARIO LTD. 1536 00006976 CUST
82) 1371760 ONTARIO LTD. 1536 00006706 CUST
83) 1371933 ONTARIO INC. 1536 00003495 CUST
84) 1385075 ONTARIO INC 1536 00007610 CUST
The SUBFILE has this:
80) *ACCOUNTANT *,*A253 *,*00200666 *,*VEND*
81) *ACCOUNTEMPS *,*A253 *,*00200462 *,*VEND*
82)
83)
84) *ACCURIDE CANADA INC. *,*A263 *,*00000182 *,*CUST*
There is no SORT or SELECT in the QTP RUN so I cannot account for the
difference in the order of record occurrence.
--
*** e-Mail is NOT a SECURE channel ***
Do NOT transmit sensitive data via e-Mail
Do NOT open attachments nor follow links sent by e-Mail
James B. Byrne mailto:[log in to unmask]
Harte & Lyne Limited http://www.harte-lyne.ca
9 Brockley Drive vox: +1 905 561 1241
Hamilton, Ontario fax: +1 905 561 0757
Canada L8E 3C3
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
