0.003/13/99 CAROL WILLIS 1.0 PROGRAM NARRATIVE ----------------- THIS SUBPROGRAM RETREIVES REGISTRATION INFORMATION FOR A DESIGNATED STUDENT AND TERM AND CALCULATES TUITION TO BE RETURNED TO THE CALLING MODULE. THE SUBPROGRAM WILL CALCULATE TOTAL ENROLL CREDITS, TOTAL WITHDRAWAL CREDITS, TOTAL TUITION AMOUNT, AND TOTAL NUMBER OF CLASSES TAKEN. THE ENROLL-FLAG FIELD IS USED TO DETERMINE THE TYPE OF PROCESSING. THE CALLING PROGRAM MUST PASS THE SOCIAL SECURITY NUMBER, TERM AND YEAR TO BE PROCESSED, AND THE REGISTRATION BUFFER. AN ENROLL-FLAG CODE OF 'F' TELLS THE SUBPROGRAM THAT A NEW SOCIAL SECURITY NUMBER IS BEING PROCESSED AND THAT ALL REGIS- TRATION RECORDS ARE TO BE RETURNED WITH TUITION FOR EACH REGISTRATION. A CODE OF 'T' TELLS THE SUBPROGRAM THAT ONLY THE TUITION TOTALS FOR THE STUDENT AND TERM SHOULD BE PASSED BACK. A CODE OF 'N' FROM THE SUBPROGRAM TELLS THE CALLING MODULE THAT THERE ARE NO REGISTRATION RECORDS FOR THE SOCIAL SECURITY NUMBER. A CODE OF 'Y' TELLS THE CALLING MODULE THAT THE REGIS- TRATION RECORD IS BEING RETURNED WITH NO TOTALS. A CODE OF 'T' TELLS THE CALLING MODULE THAT THE RECORD CONTAINS TOTAL TUITION DATA FOR THE STUDENT AND TERM. DURING PROCESSING OF INDIVIDUAL RECORDS (ENROLL-FLAG OF 'F'), THE SUBPROGRAM MAINTAINS THE ENROLL-FLAG AT 'Y'. THIS SHOULD NOT BE CLEARED UNLESS THE CALLING MODULE WISHES TO CAN- CEL PROCESSING FOR THE STUDENT IN WHICH CASE THE ENROLL-FLAG SHOULD BE RESET TO 'F'. A COMBINATION OF ENROLL-FLAG IS 'T' AND ENROLL-NUMBER-CLASSES IS ZERO INDICATES THAT THERE ARE NO REGISTRATION RECORDS FOR THE STUDENT AND TERM. WHEN A DATA BASE ERROR IS ENCOUNTERED THE STATUS CODE IS PLACED IN THE RECORD RETURNED TO THE CALLING MODULE. THE FIRST TIME THE SUBPROGRAM IS CALLED SPACES MUST BE MOVED TO THE PASS-STATUS AND REGISTRATION BUFFER. * 2.0 SAMPLE JCL ---------- N/A 3.0 JOB SETUP INSTRUCTIONS ---------------------- N/A 4.0 FILES ----- 4.1 DATA BASE/SEGMENTS USED ----------------------- CEU STUDENT DATA BASE 1. CSTREGIS (READ ONLY) CEU CLASS DATA BASE 1. CCLSMSTR (READ ONLY) SIS CONTROL DATA BASE 1. CTLCAMPM (READ ONLY) 2. CTLQUART (READ ONLY) 4.2 ADDITIONAL FILES USED: N/A --------------------- 4.3 INPUT/OUTPUT RECORD LAYOUTS: N/A --------------------------- * 5.0 SPECIAL FEATURES ---------------- 5.1 CALLING PROGRAMS ---------------- 1. CEU020 2. CEU025 3. CEU170 5.2 SUBPROGRAMS CALLED: N/A ------------------ 5.3 MESSAGE SEGMENT CODES: N/A --------------------- 6.0 PROGRAM OPTIONS: N/A --------------- 7.0 PROGRAM CHANGE HISTORY: ---------------------- 7.1 VERSION NO: V3.12 CHANGE DATE: N/A PROGRAMMER NAME: GEORGIA THISTLE PROGRAM CHANGE REQUEST NO: STC-CV-042 DESCRIPTION OF CHANGE: RELEASE VERSION 7.2 VERSION NO: V3.14 CHANGE DATE: 09/29/88 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: STC-CV-059 DESCRIPTION OF CHANGE: MODIFIED PROGRAM TO PASS BACK ACTIVITY FEE OPTION AND ACTIVITY FEE AMOUNT FOR EACH REGISTRATION. ADDED ENROLL-CREDITS-SRCIT. MODIFIED SO SENIOR-CITIZEN-ADD IS NOT CHARGED LAB FEES. 7.3 VERSION NO: V4.0S CHANGE DATE: 03/03/89 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: STC-CV-069 (00001394) STC-CV-070 DESCRIPTION OF CHANGE: RECOMPILED WITH NEW FIELDS. MISC-FEE, LAB-FEE AND TUITION NOW TAKEN FROM STUDENT REGISTRATION SEGMENT. 7.4 VERSION NO: V4.02 CHANGE DATE: 04/28/89 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: 00002743 DESCRIPTION OF CHANGE: RECOMPILED WITH REVISED STUDENT REGISTRATION SEGMENT. 7.5 VERSION NO: V4.05 CHANGE DATE: 08/01/89 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: 00003509 DESCRIPTION OF CHANGE: CHANGED 'ENROLL-CREDITS' TO 'ENROLL-NUMBER-CLASSES' IN NARATIVE, SINCE CEU STUDENTS COULD HAVE ALL ZERO CREDIT CLASSES. 7.6 VERSION NO: V4.26 CHANGE DATE: 07/09/91 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: 00008331 DESCRIPTION OF CHANGE: RECOMPILED WITH NEW REGISTRATION SEGMENT (CSTREGIS) AND NEW CLASS MASTER SEGMENT (CCLSMSTR). 7.7 VERSION NO: V4.35 CHANGE DATE: 06/01/92 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: 00010065 DESCRIPTION OF CHANGE: CHANGED COPY MEMBER FROM TUITCALC TO TUITCEUC (T8). 7.8 VERSION NO: V7.02 00627002 CHANGE DATE: 03/25/98 00627101 PROGRAMMER NAME: CAROL WILLIS 00627201 PROGRAM CHANGE REQUEST NO: N/A 00627301 DESCRIPTION OF CHANGE: 00627401 COMPILED IN COBOL/370. 00627501 NO Y2K CHANGES NEEDED.