This is from the CSL documentation for BASSORT:
> CALLING SEQUENCE:
>
> CALL BASSORT(INFILE,OUTFILE,NUMKEYS,KEYS,OPTION,ERR)
>
> WHERE: INFILE, OUTFILE ARE STRING VARIABLES CONTAINING THE
> NAMES OF THE INPUT AND OUTPUT FILES
> RESPECTIVELY. IN EITHER CASE THE NAME
> MUST BE <= 8 CHARACTERS FOLLOWED BY A
> SEMICOLON (;) (I.E. "TEST;","MYFILE;",
> ETC.).
> THE FILES MUST NOT BE NAMED IN ANY
> FILES STATEMENT IN THE CALLING PROGRAM.
> IF THE FILES ARE TO BE ACCESSED BY THE
> CALLING PROGRAM THE ASSIGN STATEMENT
> MUST BE USED.
> INFILE AND OUTFILE MAY BE THE SAME
> NAME.
>
> NUMKEYS IS AN INTEGER CONTAINING THE NUMBER OF KEY FIELDS.
>
> KEYS IS AN INTEGER ARRAY WITH THREE ELEMENTS FOR EVERY
> KEY SPECIFIED IN NUMKEYS. THE FIRST THREE ELEMENTS
> CONTAIN THE MOST SIGNIFICANT KEY INFORMATION, THE
> SECOND THREE ELEMENTS THE NEXT MOST SIGNIFICANT, ETC.
> THE THREE ELEMENTS ARE ARRANGED THUSLY:
>
> ELEMENT 1: THE POSITION WITHIN THE INPUT RECORD
> OF THE FIRST CHARACTER OF THE KEY
> (THE FIRST CHARACTER OF THE RECORD IS 1).
>
> ELEMENT 2: NUMBER OF BYTES IN THE KEY.
>
> ELEMENT 3: BITS 0 THRU 7 (HIGH ORDER) = 0 FOR
> ASCENDING, 1 FOR DESCENDING.
>
> BITS 8 THRU 15 (LOW ORDER) =
> 0=LOGICAL OR CHARACTER
> 1=2'S COMPLEMENT (INCLUDING INTEGER
> AND DOUBLE INTEGER).
> 2=FLOATING POINT (REAL AND LONG).
> 3=PACKED DECIMAL.
> 4=NUMERIC DISPLAY.
> 5=PACKED DECIMAL WITH EVEN NUMBER OF
> DIGITS.
> OPTION IS AN INTEGER WHERE:
> 0= OUTPUT RECORD IS THE SAME AS THE INPUT RECORD.
> 1=THE OUTPUT RECORD IS A DOUBLE INTEGER WHOSE
> VALUE IS THE LOGICAL (RELATIVE) RECORD NUMBER
> OF THE RECORD.
> 2=THE OUTPUT RECORD CONTAINS ONLY THE KEY FIELDS
> CONCATENATED TOGETHER WITH THE MAJOR KEYS
> ON THE LEFT, MINOR KEYS FOLLOWING.
> 3=THE OUTPUT RECORD IS THE LOGICAL RECORD NUMBER
> (AS IN 1) FOLLOWED BY THE KEY FIELDS (AS IN 2).
>
> ERR IS AN INTEGER RETURNED FROM THE SPL INTERFACE WIHT
> THE FOLLOWING INFORMATION:
> -1: COULD NOT OPEN THE INPUT FILE.
> -2: COULD NOT OPEN THE OUTPUT FILE.
> 0: EVERYTHING WORKED.
> 1: SORTINITIAL FAILED.
> 2: SORTEND FAILED.
> 4: COULD NOT CLOSE INPUT FILE.
> 8: COULD NOT CLOSE OUTPUT FILE.
>
> THESE MAY BE COMBINED (I.E. A VALUE OF 13 WOULD
> INDICATE THAT SORTINTITIAL, FCLOSE FOR INPUT,
> AND FCLOSE FOR OUTPUT FAILED).
>
> **NOTE** WHEN THIS ROUTINE IS CALLED IT MUST BE LEFT TO END
> NORMALLY LEST THE USER HAVE SOME OPEN FILES LEFT HANGING AROUND
> (FILES OPENED IN BASIC ARE CLOSED ONLY WHEN EXITING THE SUBSYSTEM).
HTH,
Ted
--
Ted Ashton ([log in to unmask]), Info Sys, Southern Adventist University
==========================================================
Nature is an infinite sphere of which the center is everywhere and the
circumference nowhere.
-- Pascal, Blaise (1623-1662)
==========================================================
Deep thought to be found at http://www.southern.edu/~ashted
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|