********************************************************************* * * MVS.DOC - PC/370 RELEASE 2 MVS.ALC SHELL SVC LABELS/DOCUMENTATION * ********************************************************************* * * MVS.ALC IS A SUBROUTINE WHICH CAN BE CALLED BY ANY PC/370 MAIN * PROGRAM RUNNING IN SUPERVISOR STATE (THE DEFAULT AT STARTUP). * MVS.ALC ESTABLISHES SVC, PROGRAM, AND EXTERNAL INTERRUPT HANDLERS * TO EMULATE AN IBM MVS/XA OPERATING SYSTEM ENVIRONMENT AND RETURNS * TO THE CALLING PROGRAM IN PROBLEM STATE MODE. FROM THAT POINT ON * IN THE PC/370 PROGRAM EXECUTION, ALL SVC CALLS AND PROGRAM CHECK * INTERRUPTIONS WILL BE HANDLED BY MVS.ALC. THE LABELS OF THE COMMON * MVS SVCS FOLLOW WITH DOCUMENTATION ON HOW SELECTED SVC'S HAVE BEEN * IMPLEMENTED IN THE CURRENT VERSION OF MVS.ALC. * * MVS SUPPORTS RESIDENT AND DYNAMICALLY LOADED SVCS. ALL SVCS ARE * NAMED IGC0NNN WHERE NNN IS THE DECIMAL SVC NUMBER 000-255. IF THE * SVC TABLE DOES NOT HAVE SVC ENTRY ADDRESS IN IT WHEN ACCESSED, MVS * WILL ATTEMP TO LOAD IGC0NNN.MOD AND STORE ADDRESS FOR FUTURE USE. * IF LOAD FAILS, 106 ABEND PROCESSING IS INVOKED. * * MVS SUPPORTS RESIDENT AND DYNAMICALLY LOADED MACRO INS. ALL INS ARE * NAMED INS0NNN WHERE NNN IS THE DECIMAL INS NUMBER 000-255. IF THE * INS TABLE DOES NOT HAVE INS ENTRY ADDRESS IN IT WHEN ACCESSED, MVS * WILL ATTEMP TO LOAD INS0NNN.MOD AND STORE ADDRESS FOR FUTURE USE. * IF LOAD FAILS, 106 ABEND PROCESSING IS INVOKED. THIS IS NOT A STANDARD * MVS/XA OFFERING BUT IS USEFUL FOR SIMULATING SELECTED 370 SUPR. INSTR. * SUCH AS THE SIO SAMPLE WHICH IMPLEMENTS CCW CHANNEL SIMULATION I/O * TO/FROM CONSOLE VIA SIO X'01F'. * ********************************************************************* MVSSVCS DSECT TYPE/REGS/DESCRIPTION EXCP EQU 0 XDAP EQU 0 WAIT EQU 1 WAITR EQU 1 PRTOV EQU 1 POST EQU 2 EXIT EQU 3 T1 (NO REGS - EXIT MVS TO PC/370 SUPR. STATE) GETMAIN EQU 4 FREEMAIN EQU 5 LINK EQU 6 XCTL EQU 7 LOAD EQU 8 DELETE EQU 9 GMAINR EQU 10 T1 R0 = SPL,LENGTH, R1=NEG. GMAIN FMAINR EQU 10 T1 R0 = SPL,LENGTH, R1=POS. FMAIN ADDRESS TIME EQU 11 T1 R0 = TIME, R1 = FORMAT CODE IN LOW 4 BITS SYNCH EQU 12 ABEND EQU 13 T1/T4 R1 = COMPLETION CODE (DUMP OPT. INVOKES T4) SPIE EQU 14 ERREXCP EQU 15 PURGE EQU 16 RESTORE EQU 17 BLDL EQU 18 FIND EQU 18 OPEN EQU 19 CLOSE EQU 20 STOW EQU 21 OPENJ EQU 22 CLOSEJ EQU 23 DEVTYPE EQU 24 TRKBAL EQU 25 CATALOG EQU 26 INDEX EQU 26 LOCATE EQU 26 OBTAIN EQU 27 SCRATCH EQU 29 RENAME EQU 30 FEOV EQU 31 ALLOC EQU 32 IOHALT EQU 33 MGCR EQU 34 QEDIT EQU 34 WTO EQU 35 T1 R1 = AL2(L'MSG,0),C'MSG' WTOR EQU 35 T1 R1 = AL1(L'REPLY),AL3(REPLY),AL2(L'MSG,0),C'MSG' WTL EQU 36 SEGLD EQU 37 SEGWT EQU 37 LABEL EQU 39 EXTRACT EQU 40 IDENTIFY EQU 41 ATTACH EQU 42 CIRB EQU 43 CHAP EQU 44 OVLYBRCH EQU 45 TIMER EQU 46 STIMER EQU 47 DEQ EQU 48 SNAP EQU 51 SDUMP EQU 51 RESTART EQU 52 RELEX EQU 53 DISABLE EQU 54 EOV EQU 55 ENQ EQU 56 RESERVE EQU 56 FREEBUF EQU 57 REFBUF EQU 58 REQBUF EQU 58 OLTEP EQU 59 STAE EQU 60 STAI EQU 60 ESTAE EQU 60 ESTAI EQU 60 IKJEGS6A EQU 61 DETACH EQU 62 CHKPT EQU 63 RDJFCB EQU 64 BTAMTEST EQU 66 SYNADAF EQU 68 SYNADRLS EQU 68 BSP EQU 69 GSERV EQU 70 ASGNBFR EQU 71 BUFINQ EQU 71 RLSBFR EQU 71 SPAR EQU 73 DAR EQU 74 DQUEUE EQU 75 IFBSTAT EQU 76 LSPACE EQU 78 STATUS EQU 79 SETPRT EQU 81 DASDR EQU 82 SMFWTM EQU 83 GRAPHICS EQU 84 DDRSWAP EQU 85 ATLAS EQU 86 DOM EQU 87 MOD88 EQU 88 VOLSTAT EQU 91 TCPEXEC EQU 92 TGET EQU 93 TPUT EQU 93 SYSEVENT EQU 95 STAX EQU 96 IKJEGSSG EQU 97 PROTECT EQU 98 DYNALLOC EQU 99 IKJEFFIB EQU 100 QTIP EQU 101 AQCTL EQU 102 XLATE EQU 103 TOPCTL EQU 104 IMGLIB EQU 105 MODSET EQU 107 PGRLSE EQU 112 PGFIX EQU 113 PGFREE EQU 113 PGLOAD EQU 113 PGOUT EQU 113 EXCPVR EQU 114 DEBCHK EQU 117 TESTAUTH EQU 119 GETMAIN2 EQU 120 FREMAIN2 EQU 120 VSAM EQU 121 PURGEDQ EQU 123 TPIO EQU 124 EVENTS EQU 125 MSSUCB EQU 126 RACHECK EQU 130 RACINIT EQU 131 RACLIST EQU 132 RACDEF EQU 133 ********************************************************************* * END OF MVS.DOC *********************************************************************