0.007/14/99 JEAN MAYS 1.0 PROGRAM NARRATIVE ----------------- THIS PROGRAM READS THE FACULTY EVALUATION VSAM FILE AND PRODUCES A FACULTY SUMMARY REPORT. FREQUENCIES AND PERCENTAGES ARE PRINTED BY INSTRUCTOR, BY CLASS OR BY CLASS FOR JUST-UPDATED CLASSES. WHEN RUN WITH A REPORT-OPTION OF 'U', FAC957 WILL PRINT A CLASS SUMMARY REPORT OF ALL CLASSES IN THE FACULTY EVALUATION VSAM FILE WITH A 'U' IN THE UPDATE-VSAM FIELD. FAC957 REPLACES THE 'U' WITH AN 'X'. (ONLY CLASSES THAT HAVE JUST BEEN UPDATED BY FAC330 FOR CURRENT PROCESSING SHOULD HAVE A 'U' IN THE UPDATE-VSAM FIELD.) FAC957 MAY BE RUN ANY TIME AFTER FAC330 HAS BEEN RUN TO UPDATE CLASSES. THIS PROGRAM MAY BE EXECUTED IN ANY OF THE OPTIONS AS MANY TIMES AS DESIRED. HOWEVER, WHEN RUN WITH A REPORT-OPTION OF 'U', REPORTS WILL BE GENERATED ONLY ONCE AFTER EACH EXECUTION OF FAC330. NOTE: THIS PROGRAM HAS THE CAPACITY FOR HANDLING TWENTY EVALUATION QUESTIONS. THE INPUT PARM, 'STANDARD-QUESTION- NUMBER', IDENTIFIES THE NUMBER OF STANDARD QUESTIONS TO BE INCLUDED IN THE SUMMARY TOTALS AT THE BOTTOM OF THE SUMMARY REPORT. THERE MUST BE 05-17 VALID STANDARD QUESTIONS. THE REMAINING QUESTIONS, UP TO 20, ARE OPTIONAL INSTRUCTOR WRITE IN QUESTIONS. FOR EXAMPLE: STANDARD-QUESTION-NUMBER = 15 STANDARD QUESTIONS...1-15 OPTIONAL QUESTIONS...16-20 THESE QUESTIONS RESIDE IN CCUSERS.A.DATA(QUESTION) AND MUST BE KEYED IN BY EACH COLLEGE INITIALLY BEFORE THIS JOB WILL RUN. THE QUESTIONS SHOULD BE ENTERED USING ISPF AS FOLLOWS: COLS 1 3 39 75 80 99LINE ONE OF QUESTION LINE TWO OF QUESTION SPACES 99INSTRUCTOR WRITE-IN WHERE 99 IS THE NUMBER OF THE QUESTION 1-20. OPTIONAL QUESTIONS MUST BE KEYED IN AS "INSTRUCTOR WRITE-IN" OR SOME OTHER DESCRIPTIVE IDENTIFIER. THE FILE MUST HAVE 20 RECORDS OR THE PROGRAM WILL TERMINATE WITH AN ERROR. IF THE FILE IS NOT FOUND, THE PROGRAM WILL ENCOUNTER A JCL ERROR. NOTE: ANSWER OPTION '5' EXCLUDES THE NUMBER OF PEOPLE WHO MARK 'N' OR WHO LEAVE THE QUESTION BLANK WHEN CALCULATING AVERAGES AND TOTALS. RESPONSES A, B, C, D, E, N ARE INPUT AS 0, 1, 2, 3, 4, 5. THE FOLLOWING WEIGHTS WILL BE ASSIGNED TO THE RESPONSES: EXCELLENT -4, VERY GOOD -3, GOOD -2, FAIR - 1, UNSATISFACTORY - 0. *********************************************************** 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ------- //FAC957 JOB (XXXX,YYYY),'FACULTY SUMMARY',CLASS=F, // PRTY=3,MSGCLASS=A,MSGLEVEL=(1,1) /*ROUTE PRINT RMTZZ //FAC957 EXEC FAC957,AGENCY=XXX,COLLEGE=XX,TERM=XXXXXX //FAC957.PARMCARD DD * ---INPUT PARAMETERS--- /* // NOTE: SEE FAC956 DOCUMENTATION FOR AN EXAMPLE OF STREAMING FAC956, FAC330, FAC957 IN ONE JOB. THIS WILL ELIMINATE USER ERROR. SYMBOLIC PARAMETERS ******************* REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER DEFAULT: NONE (EX. AGENCY=286) COLLEGE TWO CHARACTER COLLEGE NAME ABBREVIATION DEFAULT: NONE (EX. COLLEGE=VW) TERM TERM OF THE VSAM FILE DEFAULT: NONE (EX. TERM=SPRING) OPTIONAL - FORM FORM NUMBER THE OUTPUT FOR THE CLASS SUMMARY REPORT WILL BE STORED (DEFAULT = A000) (EX. FORM=A001) QUEUE FORMS CLASS UNDER WHICH THE OUTPUT REPORT WILL BE SPOOLED (DEFAULT = '*') (EX. QUEUE=A) RUNTYPE INDICATES WHETHER TO USE TEST OR PRODUCTION FILES (DEFAULT = PROD) (EX. RUNTYPE=TEST) DBTYPE INDICATES WHETHER TO USE TEST OR PRODUCTION DATA BASES (DEFAULT = PROD) (EX. RUNTYPE=TEST) VSMTYPE INDICATES WHETHER TO USE TEST OR PRODUCTION FILES (DEFAULT = PROD) (EX. VSMTYPE=TEST) SRTSIZE AMOUNT OF DASD STORAGE IN CYLINDERS ALLOCATED TO EACH SORT WORK FILE (DEFAULT = 3) (EX. SRTSIZE=4). 2.2 INPUT PARAMETERS -------------- CURRENT TERM - VALID TERMS: 1-6 'FALL ' 'SPRING' 'SUMMER' CURRENT YEAR - CURRENT YEAR: YY 7-8 STANDARD-QUESTION-NUMBER - VALID NUMBERS 05-17 9-10 (REMAINING QUESTIONS ARE OPTIONAL TO 20) ANSWER-OPTION - 1, 2, 3, 4, 5 11 '1' - A - EXCELLENT B - VERY GOOD C - GOOD D - UNSATISFACTORY E - NOT APPLICABLE '2' - A - STRONGLY DISAGREE B - DISAGREE C - UNCERTAIN D - AGREE E - STRONGLY AGREE '3' - A - STRONGLY AGREE B - AGREE C - UNCERTAIN D - DISAGREE E - STRONGLY DISAGREE '4' - A - EXCELLENT B - VERY GOOD C - GOOD D - FAIR E - UNSATISFACTORY '5' - A - EXCELLENT B - VERY GOOD C - GOOD D - FAIR E - UNSATISFACTORY N - NO RESPONSE BLANK - NO ANSWER REPORT-OPTION - EITHER A 'U' , 'I', 'C', 'D' 12 'U' FOR REPORT TO BE RUN IMMEDIATELY AFTER AN UPDATE BY FAC330 'C' FOR REPORT TO BE SORTED AND PERCENTAGES CALCULATED BY CLASS, INCLUDES 'DIVISION SUMMARY' REPORT 'D' FOR ALL DIVISION REPORTS (ONLY TERM AND YEAR PARMS WITH THIS) 'I' FOR REPORT TO BE SORTED AND PERCENTAGES CALCULATED BY INSTRUCTOR ** REPORT OPTIONS - I & C ARE FOR SUBSEQUENT RUNS ONLY ** TYPE-OPTION - BLANK WHEN REPORT-OPTION EQUALS 'U' OR 'D' 13 'A' WHEN REPORTING FOR ALL INSTRUCTORS OR ALL CLASSES 'D' WHEN REPORTING FOR ALL INSTRUCTORS OR ALL CLASSES IN A SINGLE DIVISION, (MUST SPECIFY DIVISION, SEE IND-DIV-OPT) 'I' WHEN REPORTING FOR ONE INSTRUCTOR OR ONE CLASS (MUST SPECIFY, SEE IND-CLASS-OPT OR IND-INST-OPT) 'S' WHEN REPORTING FOR ALL INSTRUCTORS BY DIVISION, WITH A DIVISION SUMMARY INCLUDED ******************************************************** * VALID COMBINATIONS FOR REPORT-OPTION AND TYPE-OPTION:* * * * REP TYPE DESCRIPTION * * * * U BLANK - UPDATE * * D BLANK - DIVISION REPORT ONLY * * I D - REPORTS ON INSTRUCTORS (SUMMARIES) FOR* * ONE CHOSEN DIVISION, WITH DIV. SUMMARY* * I I - REPORTS ON ONE INSTRUCTOR * * I A - INSTRUCTOR SUMMARY ONLY, FOR ALL * * INSTRUCTORS * * I S - REPORTS ON ALL INSTRUCTORS WITH * * DIVISION SUMMARIES * * C D - REPORTS ON ALL CLASSES IN A CHOSEN * * DIVISION WITH A DIVISION SUMMARY * * C I - REPORTS ON ONE CLASS * * C A - REPORTS ON ALL CLASSES FOR ALL * * DIVISIONS WITH DIVISION SUMMARIES * ******************************************************** IND-DIV-OPT - THE CAMPUS AND DIVISION DESIRED 14 - 15 (MUST BE A 'I' OR 'C' REPORT-OPTION AND A 'D' TYPE-OPTION) EXAMPLE: SUMMER89IDA2 IND-CLASS-OPT - THE DEPT, COURSE NUMBER AND SECTION OF THE 16 - 24 DESIRED CLASS (MUST BE A 'C' IN REPORT- OPTION AND 'I' IN TYPE-OPTION AND INCLUDE 'IND-DIV-OPT') EXAMPLE: SUMMER89CIA2CIS 131A1 IND-INST-OPT - THE INSTRUCTOR'S SOCIAL SECURITY DESIRED 25 - 33 (MUST BE A 'I' IN REPORT-OPTION AND 'I' IN TYPE-OPTION) EXAMPLE: SUMMER89II SSSSSSSSS SORT-OPTION - DETERMINES SORT. 34 D = SORT BY DIVISION FIRST THEN BY CLASS OR INSTRUCTOR (DEPENDING ON REPORT OPTION) C OR BLANK = SORT BY CAMPUS AND DIVISION, THEN BY CLASS OR INSTRUCTOR (DEPENDING ON REPORT OPTION) 3.0 JOB SETUP INSTRUCTIONS ---------------------- ALIGNMENT INSTRUCTIONS: TOP OF FORM PRINTED OUTPUT: FACULTY EVALUATION SUMMARY FORMS TYPE: 14 7/8" X 11" 1-PART SPECIAL INSTRUCTIONS: N/A 4.0 FILES ----- 4.1 DATA BASES / SEGMENTS USED CONTROL DATA BASE 1. CAMPUS SEGMENT (READ) 2. DIVISION SEGMENT (READ) 4.2 ADDITIONAL FILES USED: FACULTY EVALUATION VSAM FILE QUESTION FILE 4.3 INPUT/OUTPUT RECORD LAYOUT: FACULTY EVALUATION VSAM FILE RECORD NAME: FACEVAL-CONTROL-RECORD POSITION FROM TO FIELD NAME SIZE TYPE COMMENT -------- ---------- ---- ---- ------- 01 - 9 ID-CODE 9 N CONTROL NUMBER 10 TERM-VSAM 1 A/N TERM 11 SESSION-CODE-VSAM 1 A/N 12 INST-CAMPUS-VSAM 1 A/N 13 - 15 FILLER 3 A/N 16 - 17 YR-VSAM 2 N YEAR 18 - 21 DEPT-NAME 4 A/N 22 - 24 COURSE-NAME 3 A/N 25 - 26 SECN 2 A/N SECTION 27 CAMPUS-VSAM 1 A/N CLASS CAMPUS 28 DIVIS-VSAM 1 A/N DIVISION 29 - 44 INST-L-NAME 16 A/N INSTRUCTOR LAST NAME 45 - 54 INST-F-NAME 10 A/N INSTRUCTOR FIRST NAME 55 - 56 INST-INITIAL 2 A/N INSTRUCTOR INITIAL 57 - 65 SOC-SEC-NUM 9 N INSTRUCTOR SOCIAL SEC 66 - 69 ENROLL-VSAM 4 N ENROLLMENT 70 VSAM-UPDATE 1 A/N ' ': INITIAL VALUE CREATED BY FAC300 'M': MEMO HAS BEEN CREATED FOR THAT CLASS ID BY FAC710 'U': CLASS HAS BEEN PROCESSED BY FAC330 'X': PREVIOUS UPDATES HAVE BEEN DONE BY FAC957. 71 - 280 COUNTER1 210 A/N 281 - 490 COUNTER2 210 A/N QUESTION FILE 1 - 2 QUESTION-NUMBER 2 N QUESTION NUMBER 1-20 3 - 38 QUESTION-BEGIN 36 A/N 1ST HALF OF QUESTION 39 - 74 QUESTION-END 36 A/N 2ND HALF OF QUESTION 75 - 80 FILLER 6 A/N BLANK 5.0 SPECIAL OUTPUT MESSAGES: ----------------------- 1. MISSING INPUT PARM NO INPUT PARAMETER CARD WAS ENTERED ENTER INPUT PARAMETER CARD AND RESUBMIT JOB 2. INPUT PARAMETERS TERM OPTION YEAR OPTION STANDARD QUESTION NUMBER ANSWER-OPTION REPORT OPTION TYPE OPTION IND-DIV-OPTION IND-CLASS-OPT INSTRUCTOR OPT SORT OPTION 3. INCORRECT TERM ON PARM CARD TERM MUST BE SPRING, SUMMER, OR FALL 4. INCORRECT STANDARD-QUESTION-NUMBER STANDARD QUESTION NUMBER MUST BE 5-17 5. INCORRECT ANSWER-OPTION ANSWER OPTION MUST BE 1,2,3, OR 4 6. REPORT OPTION NOT CORRECT JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 7. TYPE-OPTION NOT CORRECT JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 8. WRONG COMBINATION OF OPTIONS JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 9. INDIVIDUAL INSTRUCTOR OPTION WRONG JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 10. INDIVIDAUL DIVISION OPTION WRONG JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 11. INDIVIDUAL CLASS DATA MISSING JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 12. INDIVIDUAL DIVISION DATA MISSING JOB WILL EOJ - ADD DIVISION CODE TO PARM AND RERUN 13. INVALID SORT OPTION SORT OPTION MUST BE 'D', 'C' OR ' '. JOB WILL EOJ - CORRECT INPUT PARM AND RERUN 14. THE INPUT DIVISION CODE WAS NOT FOUND ON THE CONTROL DATABASE CORRECT THE INPUT DIVISION ON THE PARMCARD AND RERUN 15. DIVISION NOT FOUND DIVISION WAS NOT FOUND ON DIVISION SEGMENT - PROCESSING WILL CONTINUE 16. ****SOMETHING IS WRONG WITH THE VSAM FILE**** RETURN CODE (RETURN STATUS CODE) JOB WILL EOJ CHECK STATUS CODE AND TAKE APPROPRIATE ACTION 17. THE INPUT TERM DOES NOT MATCH THE TERM ON THE VSAM FILE. PLEASE CHECK INPUT TERM AND TERM SYMBOLIC. MAKE SURE THE INPUT TERM AND TERM SYMBOLIC MATCH, THEN RESUBMIT THE JOB. 18. IMS ERROR ON (SEGMENT NAME) SEGMENT - PCB STATUS CODE JOB WILL EOJ EVALUATE STATUS CODE AND TAKE APPROPRIATE ACTION 19. *** QUESTION FILE IS CORRUPTED *** *** PLEASE RELOAD AND RERUN *** THE QUESTION FILE DID NOT HAVE 20 RECORDS. LOAD FROM A BACKUP BEFORE THE CORRUPTION OCCURED AND RERUN. PROCESSING WILL TERMINATE. 6.0 SPECIAL FEATURES ---------------- 6.1 CALLING PROGRAMS: N/A 6.2 SUBPROGRAMS CALLED: UTL001S, UTL100S, UTL060S 6.3 MESSAGE SEGMENT CODES: N/A 7.0 PROGRAM OPTIONS: --------------- N/A 8.0 PROGRAM CHANGE HISTORY: ---------------------- 8.1 VERSION NO: V3.8 (NEW PROGRAM) CHANGE DATE: 3/88 PROGRAMMER NAME: N/A MARK BOWLES, MARY HARVEY PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: NEW PGM 8.2 VERSION NO: V3.15 CHANGE DATE: 11/08/88 PROGRAMMER NAME: JEAN MAYS PROGRAM CHANGE REQUEST NO: STC-VW-542 DESCRIPTION OF CHANGE: ADDED A DIVISION SUMMARY REPORT AT DIVISION BREAK. MODIFIED RESPONSE FIELD TO HOLD 4 DIGIT NUMBER INSTEAD OF 3. 8.3 VERSION NO: V3.16 CHANGE DATE: 12/01/88 PROGRAMMER NAME: JEAN MAYS PROGRAM CHANGE REQUEST NO: 00001505 AND 00001545 DESCRIPTION OF CHANGE: CORRECTED OPTION 'U' TO NOT PRINT DIVISION REPORT AND TO WORK PROPERLY. MODIFIED PROGRAM TO BREAK ON CONTROL NUMBER TO INSURE CLASSES WITH DUPLICATE CLASS ID'S WILL HAVE SEPERATE TOTALS PER INSTRUCTOR. 8.4 VERSION NO: V4.01 CHANGE DATE: 02/21/89 PROGRAMMER NAME: JEAN MAYS PROGRAM CHANGE REQUEST NO: 00001920 DESCRIPTION OF CHANGE: ADDED AN OPTION TO ENABLE 'DIVISON SUMMARY' REPORT TO BE PRINTED FOR ALL DIVISIONS. MODIFIED TO HAVE TERM AND YEAR PRINT ON REPORT HEADING. CHANGE DATE: 03/21/89 PROGRAMMER NAME: KEN BALLARD, TNCC PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: ADDED OPTION TO USE 16 OR 11 QUESTIONS AS THE STANDARD EVALUATION. ALSO CHANGED RESPONSE COLUMN HEADINGS DEPENDING ON OPTION (SEE INPUT PARAMETERS). 8.5 VERSION : 4.05 CHANGE DATE : JULY 19, 1989 PROGRAMMER NAME : DANA BRYANT PROGRAM CHANGE REQUEST NO: 3226 DESCRIPTION OF CHANGE : ADDED A NEW TYPE-OPTION = 'S'. THIS OPTION IS TO BE USED WITH REPORT-OPTION 'I' TO PRINT A REPORT OF ALL INSTRUCTORS BY DIVISION PLUS DIVISION SUMMARY PAGES. 8.6 VERSION : 4.16 CHANGE DATE : 09/14/90 PROGRAMMER NAME : DANA BRYANT PROGRAM CHANGE REQUEST NO: 5675 DESCRIPTION OF CHANGE : UPDATED TO COMPILE UNDER COBOL II STANDARDS. ADDED CODE TO CHECK INPUT TERM AGAINST THE TERM ON THE VSAM FILE. UPDATED VSAM FILE LAYOUT. 8.7 VERSION : 4.20 CHANGE DATE : 02/15/91 PROGRAMMER NAME : PAM GUNN PROGRAM CHANGE REQUEST NO: 7321, 5676 DESCRIPTION OF CHANGE : ADDED QUESTIONS TO STUDENT EVALUATION OF INSTRUCTOR REPORT. 8.8 VERSION : 4.27 CHANGE DATE : 09/15/91 PROGRAMMER NAME : JEAN MAYS PROGRAM CHANGE REQUEST NO: 00008297 DESCRIPTION OF CHANGE : ADDED VSAM SYMBOLIC TO PROC. 8.9 VERSION : 4.28 CHANGE DATE : 11/15/91 PROGRAMMER NAME : DANA BRYANT PROGRAM CHANGE REQUEST NO: 8758 DESCRIPTION OF CHANGE : ADDED A NEW OUTPUT OPTION (3). THIS PRINTS A SEVENTEEN QUESTION STANDARDIZED TEST WITH LAST THREE QUESTIONS OPTIONAL. HEADERS FOR RESPONSE COLUMNS ARE: A - STRONGLY AGREE B - AGREE C - UNCERTAIN D - DISAGREE E - STRONGLY DISAGREE 8.10 VERSION : 4.31 CHANGE DATE : 02/15/92 PROGRAMMER NAME : DANA BRYANT PROGRAM CHANGE REQUEST NO: 8741 DESCRIPTION OF CHANGE : ADDED A NEW SORT OPTION. THIS ALLOWS THE USER TO SORT BY CAMPUS AND DIVISION, OR JUST DIVISION. ADDED A CALL TO THE CTLDIVM SEGMENT TO VERIFY THE INPUT DIVISION. 00879100 8.11 00879200 VERSION : 5.03 00879200 CHANGE DATE : 08/15/93 00879300 PROGRAMMER NAME : JEAN MAYS 00879400 PROGRAM CHANGE REQUEST NO: 00012385 00879500 DESCRIPTION OF CHANGE : 00879600 MODIFIED PROGRAM TO ALLOW THE USER TO ENTER NUMBER-OF 00879700 STANDARD-QUESTIONS (05-17) ON PARM CARD. ALSO MODIFIED TO 00879800 ALLOW USER TO ENTER ANSWER-FORMAT-TYPE ON PARM CARD, IE: 00879900 ANSWER-FORMAT-TYPE 1: EXCELLENT, VERY GOOD, GOOD,UNSATIS- 00879900 FACTORY, NOT APPLICABLE 00879900 ANSWER-FORMAT-TYPE 2: STRONGLY DISAGREE, DISAGREE, UNCERTAIN, 00880000 AGREE, STRONGLY AGREE 00879900 ANSWER-FORMAT-TYPE 3: STRONGLY AGREE, AGREE, UNCERTAIN, 00879900 DISAGREE, STRONGLY DISAGREE 00879900 ANSWER-FORMAT-TYPE 4: EXCELLENT, VERY GOOD, GOOD, FAIR, 00880000 UNSATISFACTORY. 00879900 00880000 8.12 VERSION : 6.08 CHANGE DATE : 12/15/96 PROGRAMMER NAME : CATHY SWAIN PROGRAM CHANGE REQUEST NO: 17218 DESCRIPTION OF CHANGE : MODIFIED PROGRAM TO INCLUDE ANSWER OPTION '5'. THIS OPTION EXCLUDES THE NUMBER OF PEOPLE WHO MARK "N" OR WHO LEAVE THE QUESTION BLANK WHEN CALCULATING AVERAGES AND TOTALS. ANSWER-FORMAT-TYPE 5: EXCELLENT, VERY GOOD, GOOD, FAIR, UNSATISFACTORY, NO RESPONSE, NO ANSWER. 00880000 8.13 VERSION : 7.03 CHANGE DATE : 02/24/99 PROGRAMMER NAME : CATHY SWAIN, VWCC PROGRAM CHANGE REQUEST NO: 18008 DESCRIPTION OF CHANGE : - THE PROGRAM HAS BEEN RECOMPILED AND TESTED USING THE NEW COBOL COMPILER. - Y2K CHANGES: - ADDED CALL TO UTL100S TO GET CURRENT DATE FOR THE REPORT HEADING. - ADDED CALL TO UTL060S TO GET CENTURY OF THE TERM FOR THE REPORT HEADING.