* /* START OF SPECIFICATIONS **** 00050000 * 00100000 *01* MODULE-NAME = ISTINCLM 00150000 * 00300000 *01* DESCRIPTIVE-NAME = DEFAULT LOGON MODE TABLE 00350000 * 00400000 *01* COPYRIGHT = NONE 00450000 * 00500000 *01* STATUS = RELEASE 2 00550000 * 00600000 *01* FUNCTION = THE PURPOSE OF THIS TABLE IS TO PROVIDE THE USER WITH 00650000 * A DEFAULT TABLE PROVIDING SUPPORT FOR THE DEVICES LISTED BELOW: 00700000 * 3767/3770 INTERACTIVE, 3770 BATCH, 3270 WITH SDLC SUPPORT, 3600, 00800000 * 3650 INTERACTIVE, 3650 INTERUSER, 3650 SDLC, 3650 PIPELINE 00802000 * AND 3660 USBATCH. 00804000 * 00850000 *01* NOTES = NONE 00900000 * 00950000 *02* CHARACTER-CODE-DEPENDENCIES = NONE 01000000 * 01050000 *02* DEPENDENCIES = NONE 01100000 * 01250000 *02* RESTRICTIONS = NONE 01300000 * 01350000 *02* REGISTER-CONVENTIONS = NONE 01400000 * 01550000 *02* PATCH-LABEL = NONE 01600000 * 01650000 *01* MODULE-TYPE = MODULE, NON EXECUTABLE 01700000 * 01710000 *02* PROCESSOR = ASSEMBLER 01720000 * 01740000 *02* MODULE-SIZE = RES: CHOOSE: (9) BYTES, 01742000 * COMMENTS: ENTER SIZE CONSTRAINTS IF KNOWN, 01744000 * OTHERWISE LEAVE; 01746000 * 01748000 *02* ATTRIBUTES = REFRESHABLE, NO EXECUTABLE CODE 01748400 * 01749200 *03* RELOCATE = PAGEABLE 01749600 * 01749700 *03* MODE = PROBLEM-PROGRAM 01749800 * 01749900 *03* PROTECTION = USER-KEY 01766600 * 01776600 *03* SPECIAL-PSW-SETTING = NONE 01778600 * 01780600 *01* ENTRY = ISTINCLM 01782600 * 01783100 *02* PURPOSE = SEE FUNCTION 01783200 * 01788800 *02* LINKAGE = NOT APPLICABLE 01790800 * 01793200 *02* INPUT = NONE 01793600 * 01794200 *03* REGISTERS-SAVED-AND-RESTORED = NOT APPLICABLE 01794300 * 01844300 *03* REGISTERS-INPUT = NOT APPLICABLE 01854300 * 01886300 *02* OUTPUT = NONE 01888300 * 01892700 *03* REGISTERS-OUTPUT = NOT APPLICABLE 01893100 * 01893900 *03* REGISTERS-NOT-CORRUPTED = ALL 01894000 * 01894100 *01* EXIT-NORMAL = NOT APPLICABLE 01894200 * 01910900 *01* EXIT-ERROR = NOT APPLICABLE 01920900 * 01922900 *01* EXTERNAL-REFERENCES = NONE 01924900 * 01926900 *02* ROUTINES = NONE 01927300 * 01935100 *03* LINKAGE = NOT APPLICABLE 01937100 * 01937900 *03* REGISTERS-PASSED = NOT APPLICABLE 01938300 * 01938400 *03* REGISTERS-RETURNED = NOT APPLICABLE 01938500 * 01938600 *02* DATA-SETS = NONE 01988600 * 02018600 *02* DATA-AREA = NONE 02028600 * 02030600 *02* CONTROL-BLOCKS-SYSTEM = NONE 02032600 * 02037800 *02* CONTROL-BLOCKS-VTAM = NONE 02038200 * 02038500 *01* TABLES = NONE 02055200 * 02067200 *01* MACROS = MODETAB,MODEENT,MODEEND 02069200 * 02071600 *01* CHANGE-ACTIVITY = NONE 02071700 * 02071900 **** END OF SPECIFICATIONS ***/ 02088600 EJECT 02098600 ISTINCLM MODETAB 02138600 EJECT 02188600 IBM3767 MODEENT LOGMODE=INTERACT,FMPROF=X'03',TSPROF=X'03',PRIPROT=X'B*02238600 1',SECPROT=X'A0',COMPROT=X'3040' 02288600 EJECT 02338600 IBM3770 MODEENT LOGMODE=BATCH,FMPROF=X'03',TSPROF=X'03',PRIPROT=X'A3',*02388600 SECPROT=X'A3',COMPROT=X'7080' 02438600 EJECT 02488600 IBMS3270 MODEENT LOGMODE=S3270,FMPROF=X'02',TSPROF=X'02',PRIPROT=X'71',*02538600 SECPROT=X'40',COMPROT=X'2000' 02588600 EJECT 02638600 IBM3600 MODEENT LOGMODE=IBM3600,FMPROF=X'04',TSPROF=X'04',PRIPROT=X'F1*02688600 ',SECPROT=X'F1',COMPROT=X'7000' 02738600 EJECT 02788600 IBM3650I MODEENT LOGMODE=INTRACT,FMPROF=X'00',TSPROF=X'04',PRIPROT=X'B1*02838600 ',SECPROT=X'90',COMPROT=X'6000' 02888600 EJECT 02938600 IBM3650U MODEENT LOGMODE=INTRUSER,FMPROF=X'00',TSPROF=X'04',PRIPROT=X'3*02988600 1',SECPROT=X'30',COMPROT=X'6000' 03038600 EJECT 03088600 IBMS3650 MODEENT LOGMODE=IBMS3650,FMPROF=X'00',TSPROF=X'04',PRIPROT=X'B*03138600 0',SECPROT=X'90',COMPROT=X'4000' 03188600 EJECT 03238600 IBM3650P MODEENT LOGMODE=PIPELINE,FMPROF=X'00',TSPROF=X'03',PRIPROT=X'3*03288600 0',SECPROT=X'10',COMPROT=X'0000' 03338600 EJECT 03388600 IBM3660 MODEENT LOGMODE=SMAPPL,FMPROF=X'03',TSPROF=X'03',PRIPROT=X'A0'*03438600 ,SECPROT=X'A0',COMPROT=X'0081' 03488600 EJECT 03498600 IBM3660A MODEENT LOGMODE=SMSNA100,FMPROF=X'00',TSPROF=X'00',PRIPROT=X'0*03508600 0',SECPROT=X'00',COMPROT=X'0000' 03518600 EJECT 03538600 MODEEND 03588600 END , END OF ISTINCLM 03638600