ibm:vm370-lib:rscs:dmtmsg.assemble_src
Table of Contents
DMTMSG Source
References
- Fixes Applied : 1
- This Source Date : Thursday, December 7, 1978
- Last Fix ID : [R09277DT]
Source Listing
- DMTMSG.ASSEMBLE.txt
- MSG TITLE 'DMTMSG (RSCS) VM/370 - RELEASE 6' 00001000
- MACRO 00002000
- &LABEL MDEF &MNUM,&RCOD,&SCOD,&TEXT 00003000
- LCLC &VRCOD,&VSCOD,&NDX 00004000
- AIF (T'&MNUM EQ 'O').MERR1 00005000
- AIF (T'&TEXT EQ 'O').MERR2 00006000
- &VRCOD SETC '0' 00007000
- &VSCOD SETC '0' 00008000
- AIF (T'&RCOD EQ 'O').RTOK 00009000
- &VRCOD SETC '&RCOD' 00010000
- .RTOK AIF (T'&SCOD EQ 'O').STOK 00011000
- &VSCOD SETC '&SCOD' 00012000
- .STOK ANOP 00013000
- &NDX SETC '&SYSNDX'(2,3) 00014000
- &LABEL DC A(MSG&NDX) 00015000
- DC H'&MNUM',AL1(&VRCOD),AL1(&VSCOD),AL1(L'MTXT&NDX) 00016000
- MTXT&NDX DC C&TEXT 00017000
- MSG&NDX DC 0F'0' 00018000
- MEXIT 00019000
- .MERR1 MNOTE 16,'MSG NUMBER NOT SPECIFIED' 00020000
- MEXIT 00021000
- .MERR2 MNOTE 16,'MSG TEXT NOT SPECIFIED' 00022000
- MEXIT 00023000
- MEND 00024000
- EJECT 00025000
- *. 00026000
- * MODULE NAME - 00027000
- * 00028000
- * DMTMSG 00029000
- * 00030000
- * FUNCTION - 00031000
- * 00032000
- * THIS MODULE CONTAINS NO EXECUTABLE CODE AND CONTAINS 00033000
- * ONLY A LIST OF ERROR MSGS TO BE USED EXTERNALLY BY 00034000
- * DMTMGX 00035000
- * 00036000
- * ATTRIBUTES - 00037000
- * 00038000
- * REUSABLE 00039000
- * 00040000
- * ENTRY POINTS - 00041000
- * 00042000
- * 00043000
- * DMTMSG - MESSAGE TABLE 00044000
- * 00045000
- *. 00046000
- EJECT 00047000
- DMTMSG CSECT 00048000
- SPACE 2 00049000
- * MESSAGE ROUTING CODE EQUATES 00050000
- SPACE 00051000
- RSS EQU X'80' RSS OPERATOR CONSOLE 00052000
- ORIG EQU X'40' 'ORIGINATING' LINK ID 00053000
- VMID EQU X'20' VIRTUAL MACHINE USER ID 00054000
- CP EQU X'10' LOCAL CP OPERATOR 00055000
- SPACE 2 00056000
- PRINT ON,GEN 00057000
- SPACE 1 00058000
- MDEF 000,RSS+CP,,'I RSCS (REL $, LEV $, $) READY' @VA08219 00059000
- MDEF 001,RSS,,'I FREE STORAGE = $ PAGES' 00060000
- MDEF 002,RSS,,'I LINK $ DEACTIVATED' 00061000
- MDEF 003,RSS,,'I LINK $ EXECUTING: $$$$$$$$$$$$$$$$$$$$$$$$$X00062000
- $$$$$$$$$$$$$$$' 00063000
- MDEF 070,RSS,,'E I/O ERROR $ SIOCC $ CSW $ $ SENSE $ CCW $ $' 00064000
- MDEF 080,RSS,,'E PROGRAM CHECK -- LINK $ DEACTIVATED' 00065000
- MDEF 090,RSS+CP,,'T PROGRAM CHECK IN SUPERVISOR -- RSCS SHUTDX00066000
- OWN' 00067000
- MDEF 091,RSS+CP,,'T INITIALIZATION FAILURE -- RSCS SHUTDOWN' X00068010
- * COMMENT CONTINUATION * @VM01115 00068110
- MDEF 101,VMID,,'I FILE $ ENQUEUED ON LINK $' 00069000
- MDEF 102,VMID,,'I FILE $ PENDING FOR LINK $' 00070000
- MDEF 103,VMID,,'E FILE $ REJECTED -- INVALID DESTINATION ADDRX00071000
- ESS' 00072000
- MDEF 104,RSS+VMID,,'I FILE SPOOLED TO $ -- ORG $ ($) $$$ GMT' 00073100
- * *** COMMENT CONTINUATION *** @VA09277 00073200
- MDEF 105,RSS,,'I FILE $ PURGED' 00074000
- MDEF 106,RSS,,'I FILE $ MISSING -- DEQUEUED FROM LINK $' 00075000
- MDEF 107,RSS,,'I $ PENDING FILES FOR LINK $ MISSING' 00076000
- MDEF 108,RSS+CP,,'E SYSTEM ERROR READING SPOOL FILE $' 00077000
- MDEF 141,RSS,,'I LINE $ READY FOR CONNECTION TO LINK $' 00079000
- MDEF 142,RSS,,'I LINK $ LINE $ CONNECTED' 00080000
- MDEF 143,RSS,,'I LINK $ LINE $ DISCONNECTED' 00081000
- MDEF 144,RSS,,'I RECEIVING: FILE FROM $ $ FOR $ $' 00082000
- MDEF 145,RSS,,'I RECEIVED: FILE FROM $ $ FOR $ $' 00083000
- MDEF 146,RSS,,'I SENDING: FILE $ ON LINK $, REC $' 00084000
- MDEF 147,RSS+VMID,,'I SENT: FILE $ ON LINK $' 00085000
- MDEF 148,RSS,,'I ACTIVE FILE $ SENDING RESUMED ON LINK $' 00086000
- MDEF 149,RSS,,'I LINK $ LINE ACTIVITY: TOT= $; ERRS= $; TMOUTX00087000
- S= $' 00088000
- MDEF 160,RSS,,'I LINE $ DISABLED FOR $' 00089000
- MDEF 170,VMID,,'I FROM $: $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$X00090000
- $$$$$' 00091000
- MDEF 190,RSS,,'E INVALID SPOOL BLOCK FORMAT ON FILE $' 00092000
- MDEF 200,ORIG,,'I RSCS' 00093000
- MDEF 201,ORIG,,'E INVALID COMMAND $' 00094000
- MDEF 202,ORIG,,'E INVALID LINK $' 00095000
- MDEF 203,ORIG,,'E INVALID SPOOL ID $' 00096000
- MDEF 204,ORIG,,'E INVALID KEYWORD $' 00097000
- MDEF 205,ORIG,,'E CONFLICTING KEYWORD $' 00098000
- MDEF 206,ORIG,,'E INVALID OPTION $ $' 00099000
- MDEF 207,ORIG,,'E CONFLICTING OPTION $ $' 00100000
- MDEF 208,ORIG,,'E INVALID USER ID $' 00101000
- MDEF 300,ORIG,,'I ACCEPTED BY TASK $' 00102000
- MDEF 301,ORIG,,'E REJECTED BY TASK $ -- PREVIOUS COMMAND ACTIX00103000
- VE' 00104000
- MDEF 302,ORIG,,'E LINK $ IS NOT DEFINED' 00105000
- MDEF 303,ORIG,,'E LINK $ IS NOT ACTIVE' 00106000
- MDEF 304,ORIG,,'E REJECTED BY TASK $ -- NOT RECEIVING' 00107000
- MDEF 510,ORIG,,'I FILE $ BACKSPACED' 00108000
- MDEF 511,ORIG,,'E NO FILE ACTIVE ON LINK $' 00109000
- MDEF 520,RSS+ORIG,,'I FILE $ CHANGED' 00110000
- MDEF 521,RSS+ORIG,,'I FILE $ HELD FOR LINK $' 00111000
- MDEF 522,RSS+ORIG,,'I FILE $ RELEASED FOR LINK $' 00112000
- MDEF 523,RSS+ORIG,,'I LINK $ QUEUE REORDERED' 00113000
- MDEF 524,RSS+ORIG,,'E FILE $ ACTIVE -- NO ACTION TAKEN' 00114000
- MDEF 525,RSS+ORIG,,'E FILE $ IS FOR LINK $ -- NO ACTION TAKENX00115000
- ' 00116000
- MDEF 526,RSS+ORIG,,'E FILE $ NOT FOUND -- NO ACTION TAKEN' 00117000
- MDEF 530,RSS,,'I COMMAND FORWARDED ON LINK $' 00118000
- MDEF 540,RSS,,'I NEW LINK $ DEFINED' 00119000
- MDEF 541,RSS,,'I LINK $ REDEFINED' 00120000
- MDEF 542,RSS,,'E LINK $ ACTIVE -- NOT REDEFINED' 00121000
- MDEF 543,RSS,,'E LINK $ NOT DEFINED -- LINK LIMIT REACHED' 00122000
- MDEF 544,RSS,,'E LINK $ NOT DEFINED -- TYPE NOT SPECIFIED' 00123000
- MDEF 550,RSS,,'I LINK $ NOW DELETED' 00124000
- MDEF 551,RSS,,'E LINK $ ACTIVE -- NOT DELETED' 00125000
- MDEF 552,RSS,,'E LINK $ HAS A FILE QUEUE -- NOT DELETED' 00126000
- MDEF 560,RSS,,'I RSCS DISCONNECTING' 00127000
- MDEF 561,RSS,,'E USERID $ NOT RECEIVING' 00128000
- MDEF 570,RSS+ORIG,,'I LINK $ NOW SET TO DEACTIVATE' 00129000
- MDEF 571,RSS+ORIG,,'E LINK $ ALREADY SET TO DEACTIVATE' 00130000
- MDEF 580,RSS+ORIG,,'I FILE $ PROCESSING TERMINATED' 00131000
- MDEF 581,ORIG,,'E FILE $ NOT ACTIVE' 00132000
- MDEF 590,RSS+ORIG,,'I LINK $ RESUMING FILE TRANSFER' 00133000
- MDEF 591,RSS+ORIG,,'E LINK $ NOT IN HOLD STATUS' 00134000
- MDEF 600,ORIG,,'I FILE $ FORWARDED SPACED' 00135000
- MDEF 610,RSS+ORIG,,'I LINK $ TO SUSPEND FILE TRANSMISSION' 00137000
- MDEF 611,RSS+ORIG,,'I LINK $ FILE TRANSMISSION SUSPENDED' 00138000
- MDEF 612,RSS+ORIG,,'E LINK $ ALREADY IN HOLD STATUS' 00139000
- MDEF 620,X'00',,'I MESSAGE FORWARDED ON LINK $' 00140000
- MDEF 640,RSS+ORIG,,'I $ FILE(S) PURGED ON LINK $' 00141000
- MDEF 651,ORIG,,'I LINK $ INACTIVE' 00142000
- MDEF 652,ORIG,,'I LINK $ ACTIVE $ $ $ $ $ $ $' 00143000
- MDEF 653,ORIG,,'I LINK $ DEFAULT $ $ $ $ R=$' 00144000
- MDEF 654,ORIG,,'I LINK $ Q=$ P=$' 00145000
- MDEF 655,ORIG,,'I FILE $ $ $ CL $ PR $ REC $ $' 00146000
- MDEF 660,ORIG,,'I FILE $ INACTIVE ON LINK $' 00147000
- MDEF 661,ORIG,,'I FILE $ ACTIVE ON LINK $' 00148000
- MDEF 662,ORIG,,'I FILE $ ORG $ $ $$$ TO $ $' 00149000
- MDEF 663,ORIG,,'I FILE $ PR $ CL $ CO $ $ DI $, NA $$$' 00150000
- MDEF 664,ORIG,,'E FILE $ NOT FOUND' 00151000
- MDEF 670,ORIG,,'I LINK $ ACTIVE -- LINE $ $' 00152000
- MDEF 671,ORIG,,'I LINK $ INACTIVE' 00153000
- MDEF 672,ORIG,,'I NO LINK ACTIVE' 00154000
- MDEF 673,ORIG,,'I NO LINK DEFINED' 00155000
- MDEF 700,RSS,,'I ACTIVATING LINK $ $ $ $ $' 00156000
- MDEF 701,RSS,,'E NO SWITCHED LINE AVAILABLE -- LINK $ NOT ACTX00157000
- IVATED' 00158000
- MDEF 702,RSS,,'E LINE $ IS IN USE BY LINK $ -- LINK $ NOT ACTX00159000
- IVATED' 00160000
- MDEF 703,RSS,,'E DEV $ IS NOT A LINE PORT -- LINK $ NOT ACTIVX00161000
- ATED' 00162000
- MDEF 704,RSS,,'E LINE $ CC=3 NOT OPERATIONAL -- LINK $ NOT ACX00163000
- TIVATED' 00164000
- MDEF 705,RSS,,'E DRIVER $ NOT FOUND ON DISK $ -- LINK $ NOT AX00165000
- CTIVATED' 00166000
- MDEF 706,RSS,,'E FATAL ERROR LOADING FROM $ -- LINK $ NOT ACTX00167000
- IVATED' 00168000
- MDEF 707,RSS,,'E DRIVER $ FILE FORMAT INVALID -- LINK $ NOT AX00169000
- CTIVATED' 00170000
- MDEF 708,RSS,,'E VIRTUAL STORAGE CAPACITY EXCEEDED -- LINK $ X00171000
- NOT ACTIVATED' 00172000
- MDEF 709,RSS,,'E TASK NAME $ ALREADY IN USE -- LINK $ NOT ACTX00173000
- IVATED' 00174000
- MDEF 710,RSS,,'E MAX ($) ACTIVE -- LINK $ NOT ACTIVATED' 00175000
- MDEF 750,RSS+ORIG,,'E LINK $ ALREADY ACTIVE -- NO ACTION TAKEX00176000
- N' 00177000
- MDEF 751,RSS+ORIG,,'I LINK $ ALREADY ACTIVE -- NEW CLASS(ES) X00178000
- SET AS REQUESTED' 00179000
- MDEF 752,RSS+ORIG,,'I LINK $ STILL ACTIVE -- DRAIN STATUS RESX00180000
- ET' 00181000
- MDEF 801,RSS,,'I LINK $ ERROR TRACE STARTED' 00182000
- MDEF 802,RSS,,'I LINK $ TRACE STARTED' 00183000
- MDEF 803,RSS,,'I LINK $ TRACE ENDED' 00184000
- MDEF 810,RSS,,'E LINK $ TRACE ALREADY ACTIVE' 00185000
- MDEF 811,RSS,,'E LINK $ TRACE NOT ACTIVE' 00186000
- MDEF 901,RSS,,'E INVALID SML MODE SPECIFIED -- LINK $ NOT ACTX00187000
- IVATED' 00188000
- MDEF 902,RSS+ORIG,, @VA04614X00189300
- 'E NON-SIGNON CARD READ ON LINK $' @VA04614 00189700
- MDEF 903,RSS+ORIG,,'E PASSWORD SUPPLIED ON LINK $ IS INVALID' 00190100
- MDEF 904,ORIG,,'E SIGNON PARAMETER=$ ON LINK $ INVALID' 00191000
- MDEF 905,RSS+ORIG,,'I SIGNON OF LINK $ COMPLETE' 00192000
- MDEF 906,RSS,,'E INVALID SML BUFFER PARAMETER -- LINK $ NOT A00193000
- ACTIVATED' 00194000
- MDEF 907,ORIG,,'E SIGNON TYPE PARAMETER MISSING' @VA03420 00195000
- MDEF 934,ORIG,,'E ID CARD MISSING ON LINK $ -- INPUT FILE PURX00198000
- GED' 00199000
- MDEF 935,RSS+VMID,,'E LINK $ IN RJE MODE -- PRINT FILE $ PURGX00200000
- ED' 00201000
- MDEF 936,RSS+VMID,,'E NO REMOTE PUNCH AVAILABLE ON LINK $ -- X00202000
- FILE $ PURGED' 00203000
- MDEF 937,RSS+ORIG,, X00203300
- 'E DECOMPRESSION ERROR ON LINK $ ' 00203600
- MSGEND DC F'0' 00205000
- END 00206000
ibm/vm370-lib/rscs/dmtmsg.assemble_src.txt · Last modified: 2023/08/06 13:39 by Site Administrator