* /* START OF SPECIFICATIONS **** 00900000 *01* PROCESSOR = ASSEMBLER 01800000 **** END OF SPECIFICATIONS ***/ 02700000 */********************************************************************/ 03600000 */* */ 04500000 */* MODULE NAME - IDCCDMC */ 05400000 */* */ 06300000 */* DESCRIPTIVE NAME - 'MODIFYC ' COMMAND DESCRIPTOR */ 07200000 */* */ 08100000 */* COPYRIGHT - NONE */ 09000000 */* */ 09900000 */* STATUS - CHANGE LEVEL = 0 */ 10800000 */* */ 11700000 */* FUNCTION - UPON RECOGNITION OF THE 'MODIFYC ' VERBNAME */ 12600000 */* (OR AN ALLOWABLE ABBREVIATION), THIS MODULE */ 13500000 */* IS LOADED BY THE IDCAMS READER/INTERPRETER. */ 14400000 */* THE INFORMATION CONTAINED IN THIS MODULE IS USED TO */ 15300000 */* SCAN THE INPUT COMMAND AND PERFORM SYNTACTIC AND */ 16200000 */* SEMANTIC CHECKING ON THE PARAMETERS SPECIFIED, AND */ 17100000 */* TO BUILD THE FUNCTION DATA TABLE (FDT) WHICH IS */ 18000000 */* PASSED TO THE 'MODIFYC ' FUNCTION SUPPORT ROUTINE */ 18900000 */* (IDCMC01 ). */ 19800000 */* */ 20700000 */* NOTES - */ 21600000 */* */ 22500000 */* DEPENDENCIES - THE CHARACTER CODES CONTAINED IN THIS TABLE */ 23400000 */* MUST MATCH THOSE OF THE INPUT COMMAND. */ 24300000 */* THE CURRENT CHARACTER CODE IS 'EBCDIC'. */ 25200000 */* */ 26100000 */* RESTRICTIONS - N/A */ 27000000 */* */ 27900000 */* REGISTER CONVENTIONS - N/A */ 28800000 */* */ 29700000 */* PATCH LABEL - N/A */ 30600000 */* */ 31500000 */* MODULE TYPE - TABLE */ 32400000 */* */ 33300000 */* PROCESSOR - ASSEMBLER */ 34200000 */* */ 35100000 */* MODULE SIZE - 3536 DECIMAL BYTES */ 36000000 */* */ 36900000 */* ATTRIBUTES - READ ONLY */ 37800000 */* */ 38700000 */* ENTRY POINT - N/A */ 39600000 */* */ 40500000 */* PURPOSE - N/A */ 41400000 */* */ 42300000 */* LINKAGE - N/A */ 43200000 */* */ 44100000 */* INPUT - N/A */ 45000000 */* */ 45900000 */* OUTPUT - N/A */ 46800000 */* */ 47700000 */* EXIT NORMAL - N/A */ 48600000 */* */ 49500000 */* EXIT ERROR - N/A */ 50400000 */* */ 51300000 */* EXTERNAL REFERENCES - N/A */ 52200000 */* */ 53100000 */* ROUTINES - N/A */ 54000000 */* */ 54900000 */* DATA AREAS - N/A */ 55800000 */* */ 56700000 */* CONTROL BLOCKS - N/A */ 57600000 */* */ 58500000 */* TABLES - N/A */ 59400000 */* */ 60300000 */* MACROS - N/A */ 61200000 */* */ 62100000 */* CHANGE ACTIVITY - NONE */ 63000000 */* */ 63900000 */********************************************************************/ 64800000 PRINT DATA 65700000 IDCCDMC CSECT 66600000 DC C'CDMC IDCMC01  ' 67500000 DC C'    }' 68400000 DC C' VOLUMEVOL }' 69300000 DC C' CARTRIDGECART ' 70200000 DC C'CELLP P P  7o' 71100000 DC C'  ' 72000000 DC C'  ' 72900000 DC C' }SEQUENCESEQ' 73800000 DC C' M0 MASSSTORAGEF' 74700000 DC C'ACILITYMSFò  DIRECTEJECTDEJ' 75600000 DC C'   CHANGELABEL CHNGLK K ' 76500000 DC C'K K K K K K K K K K K K ' 77400000 DC C'  CELLP P P  ' 78300000 DC C'7o *  ' 79200000 DC C'  %' 80100000 DC C'ò EJECTòSCRA' 81000000 DC C'TCHSCR    ' 81900000 DC C' VOLUMEVOL ' 82800000 DC C'@SEQUENCESEQ  ' 83700000 DC C' dOTHERCARTRIDGE OCARTò ' 84600000 DC C'BINDò NOBIND NBIND' 85500000 DC C'òEXCLUSIVEEXCLò' 86400000 DC C'SHAREDSHRDòREADON' 87300000 DC C'LY RONLYòREADWRITERW' 88200000 DC C'òDASDERASE DERASò' 89100000 DC C' NODASDERASENDERAS' 90000000 END 90900000