HP3000-L Archives

February 2011, Week 3

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:
Re: Mpe: PRINT command to get first and last records of a fileset
From:
Jay Willis <[log in to unmask]>
Reply To:
Jay Willis <[log in to unmask]>
Date:
Thu, 17 Feb 2011 11:38:22 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (15 lines) 
I want to append to a file (JSXF) the first and last records of each file in a set of files (!fileset) using one command file.

This is how I get the first record (using one command file):

file lpb = JSXF,old;dev=disc;acc=append
print !fileset;start=1;end=1;keepamdates;out=*lpb;pagehead;num

And this is how I get the last record (using another command file):

file lpb = JSXF,old;dev=disc;acc=append
print !fileset;start=-1;keepamdates;out=*lpb;pagehead;num

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

ATOM RSS1 RSS2