This will show you the test version of the program to see the production version key in:
USE $SYS2.LIBR.PROD.SOURCLIB#FNSS21 LIBR ON CAT NOSET CLE
Once you are in the program do a “FIND”, “REV” or “UPDATE” on the following:
REV ‘OPERATIONAL-OPTIONS.’
This is the beginning of the Options, the Users will identify the changes and once you have added them, re-compile and link the FNSS21 program and ULIB the online version the batch version will be linked to the appropriate linklib. To ULIB a member you must get into UISCOM2 (Option – A) is for ULIB. Depending on the route you select you can either Refresh (RF) the load module, which will replace or refresh the load module with the “LATEST” version. First you must perform the (RF), then go out and recompile/link the online load module. Once the has been done you will have the latest version. A second way is to First compile/link the online load module. Then go to the ULIB menu and perform a (DE) to Delete the old load module, then perform a (CA) to Catalog the latest load module.
How to ULIB an online Cobol PGM:
First logon to UISCOM2 and select OPTION : A
13:53:15 TID 104 UISCOM2 User APPLFC 02/07/00
-- COM-PASS -- USTS
Suspended Programs Program Services
--------------------------------- ---------------------------------------
Programs Name C Level PF Service Description Programs ID PF
-------- -------- - ----- -- -------------------- -------- -- --
1 01 PGM/SD/FILE MAINT ULIB A
2 02 *T T B 12
3 03 Natural Front-end STNAT2 C
4 04 ON-LINE PGM DUMPS UDUMP D
5 05 UEDIT UEDIT E
6 06
7 Perform Math Comput. UMATH G
8 Asynch. Mandarin tsk MNATCH H
9
Enter Input: HELP ?
a
-------------------------------------------------------------------------------
LU Name: NAPV0091 HC TID: Recall: = Language: 001
Devtype: 3279 V Device: Suspend: < Case : UPPER
Lines : 24 Key: NO Jump: NO NO
Columns: 80
Please note : Next you select your option and (RF), which means refresh load module to be invoked the next time the program is accessed. You can also (DE) delete the module and the (CA) catalogue the new load module to be used. This will generally be done with a control program and not a sub-program if the control program needs additional space for the increase in size.
13:58:52 TID 104 UISCOM2 User APPLFC 02/07/0
-- Program Catalog -- ULI
Function ID Operand
--------------------------------- -- ------------------------------
Program overview ................ OV Prefix/Name, System
Catalog ......................... CA Name, System
Modify catalog entry ............ MO Name, System
Delete catalog entry............. DE Name, System
Refresh load module .............RF Name
Select function ....... RF
Operand ............... INAS211
System ................
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--
End
Changing COPYBOOK Members :
Please note : If a copybook member needs to be changed or added to you must add the source code of the member back to SYS2.LIBR.TEST.SOURCLIB and eventually through ATPMOVE to SYS2.LIBR.PROD.SOURCLIB. First you get the source from test source lib then wrap the JCL below around the changed member and submit. This will replace the source lib member. Remember if you change a Copy book, you need to Re-compile all programs that use that copybook so that the new change is applied.
// JOB CLASS=T
// EXEC LIB
//U.MASTER DD DSN=SYS2.LIBR.TEST.SOURCLIB,DISP=SHR
//U.SYSPRINT DD SYSOUT=H
//U.SYSIN DD *
-OPT LIST
-SEL PLUSWA21,SEQ=COBOL
-REP ALL
**** THE COPYBOOK SOURCE GOES HERE ****
-EMOD
-END
/*
//
The Online JCL (CONTROL PGM) is :
// JOB CLASS=B
//COBBIT EXEC TOALCBCL,PARM.COB='LIST,XREF,MAP,DUMP,DYNAM',
// NAME=FNSS21,MACRO=ADAUSER
//U.COPYMAST DD DSNAME=SYS2.LIBR.PROD.SOURCLIB,DISP=SHR
//U.SYSIN DD *
-OPT LIST
-SEL FNSS21,CCOPY
-REP ALL
**** THE SOURCE CODE OF THE PROGRAM GOES HERE ****
-EMOD
-END
Please note : The Online control program only needs to be compiled, linked and Ulibed when a change to the control program has taken place. If you make a change to an INAS online subprogram (ex: INAS211), only those program changes need to be compiled, linked and Ulibed (RF option).
The Online JCL (SUB PGM) is :
// JOB CLASS=B
//COBBIT EXEC TOALCBCL,PARM.COB='LIST,XREF,MAP,DUMP,DYNAM',
// NAME=INAS211,MACRO=ADAUSER
//U.COPYMAST DD DSNAME=SYS2.LIBR.PROD.SOURCLIB,DISP=SHR
//U.SYSIN DD *
-OPT LIST
-SEL INAS211,CCOPY
-REP ALL
**** THE SOURCE CODE OF THE PROGRAM GOES HERE ****
-EMOD
-END
The Batch JCL (CONTROL PGM) is:
// JOB CLASS=B
//COBBIT EXEC TBALCBCL,PARM.COB='LIST,XREF,MAP,DUMP,RENT',
// MACRO=ADAUSER,
// NAME=FNSS21,LINKLIB='SYS2.TEST.LINKLIB'
//U.COPYMAST DD DSNAME=SYS2.LIBR.PROD.SOURCLIB,DISP=SHR
//U.SYSIN DD *
-OPT LIST
-SEL FNSS21,CCOPY
-REP ALL
**** THE SOURCE CODE OF THE PROGRAM GOES HERE ****
-EMOD
-END
Please note : The Batch control program does need to be compiled and linked to the test loadlib when a change to the control program has taken place. Also, if you make a change to an INAS batch subprogram (ex: INAS211), first you compile and link the control program, then you compile and link (FNSS21) the control program.
The Batch JCL (SUB PGM) is:
// JOB CLASS=B
//COBBIT EXEC TBALCBCL,PARM.COB='LIST,XREF,MAP,DUMP,RENT',
// MACRO=ADAUSER,
// NAME=INAS211,LINKLIB='SYS2.TEST.LINKLIB'
//U.COPYMAST DD DSNAME=SYS2.LIBR.PROD.SOURCLIB,DISP=SHR
//U.SYSIN DD *
-OPT LIST
-SEL INAS211,CCOPY
-REP ALL
**** THE SOURCE CODE OF THE PROGRAM GOES HERE ****
-EMOD
-END
IX. . Receive REDDY Transmission – The REDDY transmissions are Profile (CSS) records that the data is electronically sent to a server where ESO (Billy Maher) logs on to a FTP site and enters a password. This password gives him access to three folders, CSS 1999, CSS 2000 and CSS 2001 data for Boston University only. Billy then drags this information onto his PC into a directory for all CSS data he brings over. Once Billy has completed this he creates a dataset IN.PROD.CSS&CSSYEAR.PCREDDY, the &CSSYEAR (ex. 1999, 2000 or 2001) is determined by a Parm-Edit member that Billy sets up on a nightly basis and that is determined by the data he has retrieved for any particular year. Under normal conditions we will deal with the current year’s data and the previous year’s data, but there have been times when two year’s previous is needed. The IN.PROD.CSS2001.PCREDDY dataset will then be read into the BFN9750 job that copies this data onto the transaction file (FINANCIAL-AID-EDE-TRANS).
For further details of the BFN9750 job please refer back in this document to Section II.
-
FN14 Changes
-
FN65 – 1040 Function Updates – This function is the 1040 Data Entry Update Task. It allows the Users to enter 1040 data online. First all programs, maps and subprograms are cloned and the new yearly updates and security changes are applied. The programs are called Dynamically through a table entry of FN-DYNAM-1040 (FNK201). This table is accessed through Galaxy (TBBR or TBUP). The security update requires new programs each year because we access the new view of the FN-STUDENT-CONTRIB-SOURCE-2001 for the current year’s changes. Map changes and additional program modifications will be determined by the Users and passed along through detailed specifications. Over the past few years there have been some map changes and calculation updates.
File changes were necessary for the (2000-2001) cycle with the addition of three new fields that are applicable to both the parent(s) and the student. The fields added to the FN-1040 file this year are :
Itemized Deductions - 1040 Long
Alternative Minimum Tax - 1040 Long
Standard Deductions - 1040A
XII . Receive EDE Transmissions – The EDE transmissions are ISIR (EDE) records that the data is more cumbersome for ESO (Billy Maher) to obtain. Because of the numerous steps involved it would not be noteworthy to list them all. Billy does bring the records electronically into his PC and into a directory for all EDE data he brings over. Once Billy has completed this he creates a dataset SO.USER.OFA.EDE&EDEYEAR. PCREDDY, the &EDEYEAR (ex. 1999, 2000 or 2001) is determined by a Parm-Edit member that Billy sets up on a nightly basis and that is determined by the data he has retrieved for any particular year. Under normal conditions we will deal with the current year’s data and the previous year’s data, but there have been times when two year’s previous is needed. The SO.USER.OFA.EDE&EDEYEAR.PCREDDY dataset is then sorted by Univ-ID and will omit records that start with “CPS” and have a blank UNIV-ID and blank Student name, this eliminates header records that contain information and should not be loaded onto the Adabas file (FINANCIAL-AID-EDE-TRANS). Once the records are sorted that dataset will contain all of the valid records that will then be read into the BFN9750 job that copies this data onto the transaction file (FINANCIAL-AID-EDE-TRANS).
For further details of the BFN9750 job please refer back in this document to Section II.
The standard flow for EDE records is that we can receive the records up to two weeks before we receive the Federal Methodology (FM) programs from CSS. The EDE data can be run through BFN9750 to load the data onto the transaction file (FINANCIAL-AID-EDE-TRANS). There have been some maintenance models created to examine the EDE records to perform a pre-check of the data coming from CSS. Once the data has been verified as being valid we will run the load job (BFN2001) using the program (FNNPE21B). Before the load job is run the proc (FNZ2001) must be changed to uncomment STEP020 the EDE step before the data can be stored to the FN-STUDENT-CONTRIB-SOURCE-2001 file. We also have added a change to the program (FNNPE21B) to not update the Process-Indicator to ‘N’ on the (FINANCIAL-AID-EDE-TRANS), until the users are ready to process the records.
Note: If the FM changes are minor we will enter the changes ourselves into the programs that are listed in Attachment #1. If there are substantial changes to the FM we follow the same procedures that we do for obtaining the IM programs. Please see below for the procedures:
Once the FM INAS programs have been received from CSS We in UIS need to FTP (file transfer) those members from the Personal Computer that receives the E-mail of this zipped file and transfer it to an 80 character dataset into the IBM mainframe environment. Each program and copy member is placed into it’s own dataset before they are added to the source library where new programs and copy members are added, the library is (SYS2.LIBR.TEST.SOURCLIB). Once the source of the programs and copy members have been added the programs need to be compiled and linked in both the batch and online environments. There is different JCL for each of these processes. FNA3 is the online that invokes the FM INAS COBOL members and the load job BFN2001 is the batch job that invokes the FM INAS COBOL. A list of the COBOL programs and copy members has been included in this document to show the most updated list (2 new programs for 2000-2001). There are roadblocks that can occur, some are due to the compiler version that is used at CSS and the compiler version used at Boston University. Please see Attachment #1 for the CSS programs/copy members for 2000-2001. The same programs contain the FM changes.
There is usually a week’s period of time to get the FM put in and tested before it is put into production for the User’s to test. The FM changes are due from CSS this year on 01/31/00.
-
ATTACHMENT #1 – This is an Excel document of COBOL based modules sent to us from College Scholarship Service.
INAS 2001 Programs
Member
|
Type
|
Formerly
|
Descrip
|
Test
|
Library
|
Prod
|
ATP
|
Description
|
FED21
| Copy |
|
|
10/8/99
|
|
|
|
ISIR (EDE)
|
FEDEXT21
|
Copy
|
|
|
10/8/99
|
|
|
|
ISIR Extension
|
FEDORI21
|
Copy
|
|
|
10/8/99
|
|
|
|
ISIR Original Value
|
FEDWRK21
|
Copy
|
|
|
10/8/99
|
|
|
|
Federal Work Record
|
FEDCNS21
|
Copy
|
FMCNST00
|
|
10/8/99
|
|
|
|
FM Constants
|
FNCWRK21
|
Copy
|
|
|
10/8/99
|
|
|
|
INAS Functions Work Area
|
GLOBAL21
|
Copy
|
|
|
10/8/99
|
|
|
|
FM and IM Global Options
|
PROCNS21
|
Copy
|
IMCNST00
|
|
10/8/99
|
|
|
|
IM Constants
|
PLUSWA21
|
Copy
|
|
|
10/8/99
|
|
|
|
Plus Work Area
|
PRO21
|
Copy
|
|
|
10/8/99
|
|
|
|
CSS Data Area
|
PROEXT21
|
Copy
|
|
|
10/8/99
|
|
|
|
CSS Extension
|
PROWRK21
|
Copy
|
|
|
10/8/99
|
|
|
|
CSS Work Area
|
TAXPRM21
|
Copy
|
|
|
10/8/99
|
|
|
|
Misc Tax Parameters
|
INAR21
|
Copy
|
|
|
10/8/99
|
|
|
|
Interim Needs Analysis Results
|
INAR21IM
|
Copy
|
added
|
|
10/8/99
|
|
|
|
Copy of INAR21 with EFC added
|
FNSS21
|
Pgm
|
INAS00P
|
|
10/8/99
|
|
|
|
Root PGM For INAS
|
INAS211
|
Pgm
|
FMCALC00
|
|
10/8/99
|
|
|
|
Calcs for three FM Formulas
|
INAS212
|
Pgm
|
FMRJCT00
|
|
10/8/99
|
|
|
|
Federal Reject Edits
|
INAS213
|
Pgm
|
FMSNT00
|
|
10/8/99
|
|
|
|
FM Dep/Ind Simple need / zero bypass
|
INAS214
|
Pgm
|
FMTWEK00
|
|
10/8/99
|
|
|
|
Model determine / simple needs test
|
INAS215
|
Pgm
|
IMCALC00
|
|
10/8/99
|
|
|
|
Calcs for three IM Formulas
|
INAS216
|
Pgm
|
IMTWEK00
|
|
10/8/99
|
|
|
|
Model determine / Data assumptions
|
INAS217
|
Pgm
|
IMPLUS00
|
|
10/8/99
|
|
|
|
Home Val Projection & Cap Test
|
|
|
|
|
|
|
|
|
Capitalization of other assets
|
|
|
|
|
|
|
|
|
Reg cost of Livnig ADJ to IPA
|
|
|
|
|
|
|
|
|
Bottom Line ADJ to Contrib for Stud
|
|
|
|
|
|
|
|
|
Bottom line ADJ to TOT Contrib
|
|
|
|
|
|
|
|
|
PC Alloc based # of Fam Mem in coll
|
INAS218
|
Pgm
|
INTAX00
|
|
10/8/99
|
|
|
|
|
|
|
|
|
|
|
|
|
FED TAX for all Methods
|
|
|
|
|
|
|
|
|
FICA TAX for all Methods
|
|
|
|
|
|
|
|
|
STATE TAX for 'FM'
|
|
|
|
|
|
|
|
|
STATE TAX fo 'IM'
|
INAS219
|
Pgm
|
IMMAPI00
|
|
10/8/99
|
|
|
|
Ext FM results in ISIR Rec and saves in the
|
|
|
|
|
|
|
|
|
EST FM section of the Profile rec
|
INAS21A
|
Pgm
|
IMMAPO00
|
|
10/8/99
|
|
|
|
Creates ISIR and ISIR EXT REC from Profile
|
|
|
|
|
|
|
|
|
REC to CALC EST FM VIA 'FMCALC'
|
INAS21B
|
Pgm
|
IMMSGE00
|
|
10/8/99
|
|
|
|
Replicates CSS Central Msgs
|
INAS21C
|
Pgm
|
INCOMP00
|
|
10/8/99
|
|
|
|
Compare ISIR / Profile Recs
|
|
|
|
|
|
|
|
|
Return DIFF to Profile EXT REC
|
INAS21D
|
Pgm
|
INFUNC00
|
|
10/8/99
|
|
|
|
INAS General Functions (CALCS)
|
INAS21E
|
Pgm
|
INMIGR00
|
|
10/8/99
|
|
|
|
Migrates data from Profile to Fafsa
|
INAS21F
|
Pgm
|
INLCL00
|
|
10/8/99
|
|
|
|
Control PGM called bef/aft INAS Calcs
|
INAS21G
|
Pgm
|
ININAR00
|
|
10/8/99
|
|
|
|
Prints INAR
|
Dostları ilə paylaş: |