$ blank
BLANK V6.8-01 - Blank/Load Data File Fields                 03:44 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <STDHIST>?
Number of pointers in the Pointer file: 98
Does that seem correct <NO>? y

Fields to Blank? workfield
Proceed with Blanking <NO>? y

Finished    03:45 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              03:45 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <STDHIST>? flp_enrdata_032s/all
Data File to Compare Against? stdhist
Field in "FLP_ENRDATA_032S" to key on <1>? studentid
Enter field comparison commands
Command 1 <Key Only>?
Build pointers to Matched records <NO>? y
Pointer file will be built to Matched records

File 1: FLP_ENRDATA_032S
File 2: STDHIST
File to build new Pointer file to <1>? 2
Print out Unmatched records <NO>? y
Output Device <TT:>?
ALPHA::RTA1:REG_FLPRPT 15:46:24 COMPARE   CPU=00:00:02.37 PF=3050 IO=4439 MEM=23
0
Processing 2996 of 3305 at 78.8 per second (approx 0:04 remaining)

Number of new pointers: 715
Continue the Build <NO>? y
New Pointer file created for "USERS1:[REG.FILES]STDHIST"

Finished    03:46 PM

$ blank
BLANK V6.8-01 - Blank/Load Data File Fields                 03:46 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <FLP_ENRDATA_032S>? stdhist
Number of pointers in the Pointer file: 715
Does that seem correct <NO>? y

Fields to Blank? workfield/p:3
Proceed with Blanking <NO>? y

Finished    03:47 PM

$ sort stdhist

Fields to Sort (15 Maximum)
Level 1...Field?
No Sorting requested

Select out special records <NO>? y

Criterion  A
Field? workfield
Low ? 3/any

Criterion  B
Field? termcode
Low ? 032s/any

Criterion  C
Field?

Selection statement? a and b
Field extraction/Pointer build started            03:47 PM
Pointers to 279 records constructed.              03:47 PM

$ save
SAVE V6.8-03 - DMS-Plus Pointer File Saving Program         03:48 PM
Copyright (c) 2000, Campus America, Inc.
Type "HELP" for assistance

Option? save
SAV:  Pointer File Name? stdhist_032snew
Pointer file SYS$SYSDEVICE:[REG_FLPRPT]STDHIST_032SNEW.PTR; built...number point
ers: 279
Pointers are to the USERS1:[REG.FILES]STDHIST Data File.
Option?

Finished     03:48 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              03:48 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <STDHIST>?
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Data File to Compare Against? persist
Field in "STDHIST" to key on <1>? studentid

Enter field comparison commands
Command 1 <Key Only>?
Build pointers to Matched records <NO>? y
Pointer file will be built to Matched records

File 1: STDHIST
File 2: PERSIST
File to build new Pointer file to <1>?
Print out Unmatched records <NO>?

Number of new pointers: 0
Continue the Build <NO>?
Build Aborted

Finished    03:48 PM

$ transfer
TRANSFER V6.8-01 - Information Transfer Program             03:48 PM
Copyright (c) 2000, Campus America, Inc.
Left-side Data File Name <STDHIST>?
Right-side Data File Name? persist/extend
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Key Field Load <NO>?
Number of Level Breaks <0>?
Command   1? .studentid to studentid
Field .STUDENTID is not updatable...Proceed anyway <NO>? y
Command   2? "032S" to term1
Field .TERM1 is not updatable...Proceed anyway <NO>? y
Command   3?
Proceed with the Transfer <NO>? y

Transfer started                                  03:49 PM

Last active right-side file record number: 2219

Finished    03:49 PM

$ blank
BLANK V6.8-01 - Blank/Load Data File Fields                 03:50 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <STDHIST>?
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y

Fields to Blank? workfield/p:n
Proceed with Blanking <NO>? y

Finished    03:57 PM

$ sort persist

Fields to Sort (15 Maximum)
Level 1...Field?
No Sorting requested

Select out special records <NO>? y

Criterion  A
Field? term1
Low ? 032s/any

Criterion  B
Field?

Selection statement? a
Field extraction/Pointer build started            03:58 PM
Pointers to 279 records constructed.              03:58 PM

$ save
SAVE V6.8-03 - DMS-Plus Pointer File Saving Program         03:58 PM
Copyright (c) 2000, Campus America, Inc.
Type "HELP" for assistance

Option? save
SAV:  Pointer File Name? 279
Pointer file SYS$SYSDEVICE:[REG_FLPRPT]279.PTR; built...number pointers: 279
Pointers are to the USERS1:[REG.FILES.PERSIST]PERSIST Data File.
Option?

Finished     03:58 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              03:58 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <PERSIST>?
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Data File to Compare Against? flp_enrdata_032s
Field in "PERSIST" to key on <1>? studentid/dup

Enter field comparison commands
Command 1 <Key Only>? studentid to studentid
%Comparison already implied by key lookup
Command 1 <Key Only>?
Build pointers to Matched records <NO>? y
Pointer file will be built to Matched records

File 1: PERSIST
File 2: FLP_ENRDATA_032S
File to build new Pointer file to <1>? 2
Print out Unmatched records <NO>?

Number of new pointers: 5
Continue the Build <NO>?
Build Aborted

Finished    03:59 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              03:59 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <PERSIST>?
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Data File to Compare Against? flp_endata_032s
?Can't find file or account - Data file SYS$SYSDEVICE:[REG_FLPRPT]FLP_ENDATA_032
S.DTA;
Data File to Compare Against? flp_enrdata_032s Exit

Finished    03:59 PM

$ dir *032s*

Directory SYS$SYSDEVICE:[REG_FLPRPT]

002S_032S.PTR;1     012S_032S.PTR;1     022S_032S.PTR;1     982S_032S.PTR;1
992S_032S.PTR;1     FLP_ENRDATA_032S.DSC;1
FLP_ENRDATA_032S.DTA;1                  FLP_ENRDATA_032S.KEY;2
STDHIST_032SNEW.PTR;1

Total of 9 files.

$ key flp_enrdata_032s

Key file build started                            04:00 PM

Key file build complete                           04:00 PM

Finished    04:00 PM

$ desc
DESCRIBE V6.8-01 - Data File Description Program            04:00 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <FLP_ENRDATA_032S>?
Type "HELP" for assistance

DESCRIBE Option? key

KEY Suboption? list

Key  Field  Dup  Explanation

 0      2   Yes  Student Identifier

KEY Suboption?

DESCRIBE Option?

Finished    04:00 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              04:00 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <FLP_ENRDATA_032S>?
?Pointers were built to USERS1:[REG.FILES.PERSIST]PERSIST
Pointers to SYS$SYSDEVICE:[REG_FLPRPT]FLP_ENRDATA_032S required.

Finished    04:00 PM

$ compare
COMPARE V6.8-01 - Data File Comparison Program              04:00 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <FLP_ENRDATA_032S>? persist
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Data File to Compare Against? flp_enrdata_032s
Field in "PERSIST" to key on <1>? studentid/dup

Enter field comparison commands
Command 1 <Key Only>?
Build pointers to Matched records <NO>? y
Pointer file will be built to Matched records

File 1: PERSIST
File 2: FLP_ENRDATA_032S
File to build new Pointer file to <1>? 2
Print out Unmatched records <NO>?

Number of new pointers: 1131
Continue the Build <NO>? y
New Pointer file created for "SYS$SYSDEVICE:[REG_FLPRPT]FLP_ENRDATA_032S"

Finished    04:00 PM

$ save
SAVE V6.8-03 - DMS-Plus Pointer File Saving Program         04:00 PM
Copyright (c) 2000, Campus America, Inc.
Type "HELP" for assistance

Option? save
SAV:  Pointer File Name? 1131
Pointer file SYS$SYSDEVICE:[REG_FLPRPT]1131.PTR; built...number pointers: 1131
Pointers are to the SYS$SYSDEVICE:[REG_FLPRPT]FLP_ENRDATA_032S Data File.

Option?

Finished     04:01 PM

$ save
SAVE V6.8-03 - DMS-Plus Pointer File Saving Program         04:01 PM
Copyright (c) 2000, Campus America, Inc.
Type "HELP" for assistance

Option? save
SAV:  Pointer File Name? 032s_032s
Pointer file SYS$SYSDEVICE:[REG_FLPRPT]032S_032S.PTR; built...number pointers: 1
131
Pointers are to the SYS$SYSDEVICE:[REG_FLPRPT]FLP_ENRDATA_032S Data File.

Option?

Finished     04:02 PM

$ backup users1:[reg.files.persist]persist.dta users1:[reg.files.persist]persist
_bkp010503.dta

$ transfer
TRANSFER V6.8-01 - Information Transfer Program             04:03 PM
Copyright (c) 2000, Campus America, Inc.
Left-side Data File Name <PERSIST>? flp_enrdata_032s
Right-side Data File Name? persist
Number of pointers in the Pointer file: 1131
Does that seem correct <NO>? y
Key Field Load <NO>? y
 Left-side file field to key on <1>? studentid
Number of Level Breaks <0>? 1
 Level 1...Field? studentid
Command   1? credithours to .term1_hours/sum
Command   2?
Proceed with the Transfer <NO>? y

Transfer started                                  04:04 PM

Finished    04:04 PM

$ transfer
TRANSFER V6.8-01 - Information Transfer Program             04:04 PM
Copyright (c) 2000, Campus America, Inc.
Left-side Data File Name <FLP_ENRDATA_032S>? persist/pointer=279
Right-side Data File Name? persist
Number of pointers in the Pointer file: 279
Does that seem correct <NO>? y
Key Field Load <NO>?
Number of Level Breaks <0>?
Command   1? hold:1 from term2_hours
Command   2? hold:1 to test/gte:12/seton:1
Command   3? "F" to .term1_enr/ind:1
Command   4? hold:1 to test/lte:11/seton:2
Command   5? hold:1 to test/gte:1/seton:3
Command   6? "P" to term1_enr/ind:"2,3"
Command   7?
Proceed with the Transfer <NO>? y

Transfer started                                  04:17 PM

Finished    04:17 PM

$ blank
BLANK V6.8-01 - Blank/Load Data File Fields                 04:17 PM
Copyright (c) 2000, Campus America, Inc.
Data File Name <PERSIST>? /all

Fields to Blank? workfield
Proceed with Blanking <NO>? y

Finished    04:17 PM