If they are a PowerHouse shop and would like a PowerHouse solution then
something like the following will work just fine. This assumes of course
that the KSAM file is a PowerHouse dictionary.

:QTP
>access KSAMFILE
>set input limit [number big enough to read all existing records]
>subfile KSAMDATA keep include KSAMFILE
>go
>exit

:purge or rename existing ksam file 

:QUTIL
>create KSAMFILE capacity [number of records in new file]
>exit

:QTP
>access *KSAMDATA
>set input limit [number big enough to read all existing records]
>output KSAMFILE add
>go
>exit


-----Original Message-----
From: Eric Williams [mailto:[log in to unmask]]
Sent: Tuesday, November 01, 2005 2:03 PM
To: [log in to unmask]
Subject: [HP3000-L] KSAM Files (not Native Mode)


I need to set up a procedure to increase the size of KSAM files for a
completely new HP3000 user.  These files are NOT native mode. 
 
So far my solution has been to 
1. fcopy the records out of the KSAM file to a flat file
2. Use KSAM Util to get Key info
3. Purge and Rebuild the file
4. fcopy the records back into the KSAM file
 
Keep in mind the user has very little knowledge of the 3000 and they do not
have any 3rd party tools like suprtool.   Does a more straight forward way
to complete this task exist?  They do have Cognos (quiz, qtp, Etc.).  


Eric Williams
Contractor
Oklahoma Department of Commerce

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

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