HP3000-L Archives

January 1998, Week 4

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:
Friedrich Harasleben <[log in to unmask]>
Reply To:
Friedrich Harasleben <[log in to unmask]>
Date:
Fri, 23 Jan 1998 08:07:44 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (31 lines)
Stigers, Greg ~ AND wrote:
> 
> I have an NM KSAM file that contains records, and I now want it to be
> empty. I know that I could write a COBOL program to OPEN it OUTPUT, and
> voila! I would now have an empty file. I could also purge or rename it,
> and rebuild it, but sure as I do that, someone will need to change a key
> or a field, and then the BUILD would have to be maintained. I would
> prefer to find another, sure way to do this that is less prone to human
> error. I don't see where SuprTool can do this for me, nor did I see
> anything searching MPEX. The best way I came up with was to rename the
> original, then FCopy it to the original name, and use FCOPY
> FROM=OLDFILE;TO=(NEWFILE);NEW;SUBSET="",1,EXCLUDE
> to "clone" this file. I * think * that has the disadvantage of reading
> all of the records in the source file to exclude them. I would like a
> better approach, if there is one.

Well havenīt tried this to NM-KSAM but I used to to this:

     FCOPY FROM=$NULL;TO=KsamFile

Cheers,

Friedrich
________________________________________________________________________
     _/_/_/_/  _/_/_/_/ _/   _/ _/    _/  Oest. Kreditversicherung AG
    _/    _/  _/       _/ _/    _/   _/   Friedrich Harasleben 
   _/    _/  _/_/_/   _/_/      _/  _/    e-mail: [log in to unmask]
  _/    _/  _/       _/  _/     _/ _/     fax   : +43 1 51554 50 300
 _/_/_/_/  _/_/_/_/ _/    _/    _/_/      phone : +43 1 51554 300
________________________________________________________________________

ATOM RSS1 RSS2