Summary Report of Award by .typecode
Two fields in Fund are concatenated to form .typecode
$DESCRIBE FUND
Option? list
File(s) <Current>?
Fields <ALL>? Typecode, type, code
Listing format <BRIEF>? fullField 43: .TYPECODE*
1) Fst,Lst: 319,320 ( 2) 6) Update ? YES
2) Explain: OL:Typecode 7) Transf ? YES
3) Heading: "TYP" 8) CPrefix: "TYP"
4) Prompt : <Explanation> 9) EditMsk: <None>
5) Initial? YES 10) Numeric? NOField 53: .TYPE*
1) Fst,Lst: 319,319 ( 1) 6) Update ? YES
2) Explain: Type 7) Transf ? YES
3) Heading: "Type" 8) CPrefix: "TYP"
4) Prompt : "Type" 9) EditMsk: <None>
5) Initial? YES 10) Numeric? NOField 55: .CODE*
1) Fst,Lst: 320,320 ( 1) 6) Update ? YES
2) Explain: Code 7) Transf ? YES
3) Heading: "Code" 8) CPrefix: "COD"
4) Prompt : "Code" 9) EditMsk: <None>
5) Initial? YES 10) Numeric? NO
The codes are translated in FINCODE
$ sort fincode
Fields to Sort (15 Maximum)
Level 1...Field? 1
Level 2...Field?Sorting on 1 field specified.
Select out special records <NO>? yCriterion A
Field? codepfx,codepfx/sel=or
Field CODEPFX Low ? typ/any
Field CODEPFX Low ? cod/anyCriterion B
Field?Selection statement? a
$ point
Data File Name <FINCODE>?
Option? shoRec 467 COD1 Tuition
Rec 468 COD2 Merit
Rec 469 COD3 Activity
Rec 470 COD4 Athletic
Rec 471 COD5 Misc
Rec 472 COD6 Need
Rec 473 COD7 Work
Rec 474 COD8 Loans
Rec 423 COD9 Empl Tuit Waiv
Rec 414 TYPF FEDeral
Rec 422 TYPF1 FED Tuit
Rec 420 TYPF6 FED Need
Rec 420 TYPF6 FED Need
Rec 389 TYPF8 FED Loan
Rec 416 TYPI SGU
Rec 387 TYPI1 SGU Tuit
Rec 386 TYPI2 SGU Merit
Rec 385 TYPI3 SGU Actv
Rec 384 TYPI4 SGU Athl
Rec 383 TYPI5 SGU Misc
Rec 382 TYPI6 SGU Need
Rec 381 TYPI7 SGU Work
Rec 380 TYPI8 SGU Loan
Rec 509 TYPI9 SGU ETW
Rec 415 TYPS STAte
Rec 378 TYPS1 STA Tuit
Rec 376 TYPS4 STA Misc
Rec 377 TYPS6 STA Need
Rec 413 TYPT EXTernal
Rec 375 TYPT1 EXT Tuit
Rec 374 TYPT2 EXT Merit
Rec 373 TYPT4 EXT Athl
Rec 372 TYPT5 EXT Misc
Rec 371 TYPT6 EXT Need
Find the awards for reporting
$ sort award
Fields to Sort (15 Maximum)
Level 1...Field?
No Sorting requestedSelect out special records <NO>? y
Criterion A
Field? termcode
Low ? 031s
High? 034sCriterion B
Field?Selection statement? a
$ save
Option? save
SAV: Pointer File Name? 031yawards$ sort
Data File Name <AWARD>? /pointer/tr
Translation Data File 1? fund
Translation Data File 2?Fields to Sort (15 Maximum)
Level 1...Field? fundid/tr:.typecode
Level 2...Field?
Sorting on 1 field specified.Select out special records <NO>?
Print the report
$ pprint
Data File Name <AWARD>? /nh/sum/tr
Translation Data File 1? fund
Translation Data File 2?Enter column commands
Column 1 (Line 1, Pos 1)...Field? type
%Field .TYPE not described in USERS2:[FINAID.FILES]AWARD
Column 1 (Line 1, Pos 1)...Field? fundid/tr:.type
Column 2 (Line 1, Pos 3)...Field? fundid/tr:.code
Column 3 (Line 1, Pos 5)...Field? count
Total field length? 5
Total edit mask?
Column 4 (Line 1, Pos 11)...Field?Number of lines per page <-1>?
Number of Level Breaks <0>? 2
Level 1...Field? fundid/tr:.type/skip=2
Level 2...Field? fundid/tr:.code/skip=1
Report Date <19-Jan-2005>?
Heading 1? 0304 awards, by type and code
Heading 2?
Number of copies <1>?
Report Name? 0304awards_bytypecode
Paper type <HP12REG>? -1
View the report
$ type 0304awards_bytypecode.lis
Date 19-Jan-2005
0304 awards, by type and codeT C COUNT
- - -----
F 6
-----
684
F 7
-----
75
F 8
-----
1142
-----
1901
I 1
-----
399
I 2
-----
330
I 3
-----
148
I 4
-----
316
I 5
-----
95
I 6
-----
6
I 7
-----
37
I 9
-----
52
-----
1383
S 6
-----
197
----
197
T 5
-----
139
T 6
-----
87
T 8
-----
106
-----
332
-----
3813