cdc:nos2.source:opl.opl871:deck:1xy.001
Deck 1XY Part 001
32 Modifications
Listing Sections
- Deck 1XY Start
- Deck 1XY Part 1 (Line 1551)
- Deck 1XY Part 2 (Line 3360)
Source
Seq # *Modification Id* Act ----------------------------+ 01551 M00S01261.1xy +++| VFD 18/ OPERATIONAL STATUS REGISTER 01552 M00S01262.1xy +++| VFD 18/ ADAPTER CONTROL REGISTER 01553 M00S01263.1xy +++| VFD 18/ ERROR STATUS REGISTER 01554 M00S01264.1xy +++| 01555 M00S01265.1xy +++|* DRIVER TRACE DATA. 01556 M00S01266.1xy +++| 01557 M00S01267.1xy +++| BMLTD VFD 12/0 LAST CALL TO *ERR* 01558 M00S01268.1xy +++| VFD 12/0 LAST CALL TO *FNC* 01559 M00S01269.1xy +++| VFD 12/0 LAST CALL TO *FNN* 01560 M00S01270.1xy +++| VFD 24/0 01561 M00S01271.1xy +++| BMS1L EQU *-BML LENGTH OF MESSAGE (PP WORDS) 01562 M00S01272.1xy +++| .A SET BMS1L+4 01563 M00S01273.1xy +++| BMS1LC EQU .A/5 LENGTH OF MESSAGE (CM WORDS)
Line S01274 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01564 M01S01274.ns2769 ---| IEC SPACE 4,15 01565 M01S01275.ns2769 ---|** IEC - INCREMENT ERROR COUNTER. 01566 M01S01276.ns2769 ---|* 01567 M01S01277.ns2769 ---|* THIS ROUTINE INCREMENTS THE RECOVERED/UNRECOVERED ERROR 01568 M01S01278.ns2769 ---|* COUNTER IN THE MST CORRESPONDING TO THIS UNIT. 01569 M01S01279.ns2769 ---|* 01570 M01S01280.ns2769 ---|* ENTRY (RS) = RECOVERY STATUS. 01571 M01S01281.ns2769 ---|* 0 RECOVERED BY CONTROLLER. 01572 M01S01282.ns2769 ---|* 1 RECOVERED BY DRIVER. 01573 M01S01283.ns2769 ---|* 2 UNRESOLVED. 01574 M01S01284.ns2769 ---|* 3 UNRECOVERED. 01575 M01S01285.ns2769 ---|* (T5) = EST ORDINAL. 01576 M01S01286.ns2769 ---|* 01577 M01S01287.ns2769 ---|* EXIT (A) = 0. 01578 M01S01288.ns2769 ---|* 01579 M01S01289.ns2769 ---|* USES CM+1 - CM+3. 01580 M01S01290.ns2769 ---|* 01581 M01S01291.ns2769 ---|* MACROS MONITOR. 01582 M01S01292.ns2769 ---| 01583 M01S01293.ns2769 ---| 01584 M01S01294.ns2769 ---| IEC SUBR ENTRY/EXIT 01585 M01S01295.ns2769 ---| LDD T5 SET EST ORDINAL 01586 M01S01296.ns2769 ---| STD CM+1 01587 M01S01297.ns2769 ---| LDD RS SET BYTE NUMBER 01588 M01S01298.ns2769 ---| SHN -1 01589 M01S01299.ns2769 ---| ADN 3 01590 M01S01300.ns2769 ---| STD CM+2 01591 M01S01301.ns2769 ---| LDK ICTS SET SUBFUNCTION 01592 M01S01302.ns2769 ---| STD CM+3
Line S01303 Modification History | |
---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01593 M02S01303.ns2769 ---| MONITOR STBM
Line S00003 Modification History | |
---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01594 M02S00003.ns2769 ---| MONITOR SMDM
Line S01304 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01595 M01S01304.ns2769 ---| UJN IECX RETURN 01596 M00S01305.1xy +++| IFI SPACE 4,30 01597 M00S01306.1xy +++|** IFI - INITIALIZE FOR I/O. 01598 M00S01307.1xy +++|* 01599 M00S01308.1xy +++|* THIS ROUTINE IS CALLED BY THE READ AND WRITE PROCESSORS TO 01600 M00S01309.1xy +++|* PREPARE FOR THE READ OR WRITE OPERATION. 01601 M00S01310.1xy +++|* 01602 M00S01311.1xy +++|* ENTRY (CB) = BUFFER ORDINAL. 01603 M00S01312.1xy +++|* (FU - FU+1) = FIRST WORD ADDRESS OF UEM. 01604 M00S01313.1xy +++|* (RW) = READ/WRITE FLAG. 01605 M00S01314.1xy +++|* 01606 M00S01315.1xy +++|* EXIT (UA - UA+1) = UEM ADDRESS. 01607 M00S01316.1xy +++|* 01608 M00S01317.1xy +++|* USES CM - CM+4, UA - UA+1. 01609 M00S01318.1xy +++|* 01610 M00S01319.1xy +++|* MACROS CCBA. 01611 M00S01320.1xy +++| 01612 M00S01321.1xy +++| 01613 M00S01322.1xy +++| IFI SUBR ENTRY/EXIT 01614 M00S01323.1xy +++| 01615 M00S01324.1xy +++|* SET UEM ADDRESS. 01616 M00S01325.1xy +++| 01617 M00S01326.1xy +++| CCBA IOLK 01618 M00S01327.1xy +++| CRD CM 01619 M00S01328.1xy +++| LDD CM+4 01620 M00S01329.1xy +++| ADD FU+1 01621 M00S01330.1xy +++| SHN -6 01622 M00S01331.1xy +++| STD UA+1 01623 M00S01332.1xy +++| LDD CM+3 01624 M00S01333.1xy +++| ADD FU 01625 M00S01334.1xy +++| SHN 6 01626 M00S01335.1xy +++| RAD UA+1 01627 M00S01336.1xy +++| SHN -14 01628 M00S01337.1xy +++| STD UA 01629 M00S01338.1xy +++| UJP IFIX RETURN 01630 M00S01339.1xy +++| IIC SPACE 4,10 01631 M00S01340.1xy +++|** IIC - ISSUE I/O COMPLETION REQUEST. 01632 M00S01341.1xy +++|* 01633 M00S01342.1xy +++|* ENTRY (CC) = COMPLETION COUNT. 01634 M00S01343.1xy +++|* (PB) = PREVIOUS BUFFER ORDINAL, IF ANY. 01635 M00S01344.1xy +++|* 01636 M00S01345.1xy +++|* EXIT (PB) = 0. 01637 M00S01346.1xy +++|* 01638 M00S01347.1xy +++|* USES CC, PB, S1. 01639 M00S01348.1xy +++|* 01640 M00S01349.1xy +++|* CALLS CRQ. 01641 M00S01350.1xy +++| 01642 M00S01351.1xy +++| 01643 M00S01352.1xy +++| IIC SUBR ENTRY/EXIT 01644 M00S01353.1xy +++| LDD PB 01645 M00S01354.1xy +++| ZJN IIC1 IF NO PREVIOUS BUFFER ORDINAL 01646 M00S01355.1xy +++| AOD CC INCREMENT COMPLETION COUNT 01647 M00S01356.1xy +++| LDN 0 CLEAR PREVIOUS BUFFER ORDINAL 01648 M00S01357.1xy +++| STD PB 01649 M00S01358.1xy +++| IIC1 LDD CC 01650 M00S01359.1xy +++| SHN ** 01651 M00S01360.1xy +++| IICA EQU *-1 01652 M00S01361.1xy +++| ZJN IICX IF NOT AT THRESHOLD 01653 M00S01362.1xy +++| LDK MMXN SET EXCHANGE RETRY LIMIT 01654 M00S01363.1xy +++| STD S1 01655 M00S01364.1xy +++| IIC2 RJM CRQ ISSUE COMPLETION REQUEST 01656 M00S01365.1xy +++| ZJN IICX IF NO PENDING REQUEST 01657 M00S01366.1xy +++| SOD S1 01658 M00S01367.1xy +++| PJN IIC2 IF NOT AT EXCHANGE RETRY LIMIT 01659 M00S01368.1xy +++| UJN IICX RETURN 01660 M00S01369.1xy +++| 01661 M00S01370.1xy +++| 01662 M00S01371.1xy +++| IICB BSS 0 01663 M00S01372.1xy +++| CON SHNI+77-0 01664 M00S01373.1xy +++| CON SHNI+77-1 01665 M00S01374.1xy +++| IMF SPACE 4,10 01666 M00S01375.1xy +++|** IMF - ISSUE MONITOR FUNCTION. 01667 M00S01376.1xy +++|* 01668 M00S01377.1xy +++|* ENTRY (A) = MONITOR FUNCTION CODE. 01669 M00S01378.1xy +++|* 01670 M00S01379.1xy +++|* EXIT (A) = 0. 01671 M00S01380.1xy +++|* (CM - CM+4) = COMPLETED PP OUTPUT REGISTER IMAGE. 01672 M00S01381.1xy +++|* 01673 M00S01382.1xy +++|* USES S1. 01674 M00S01383.1xy +++|* 01675 M00S01384.1xy +++|* CALLS CRQ, FTN. 01676 M00S01385.1xy +++| 01677 M00S01386.1xy +++| 01678 M00S01387.1xy +++| IMF SUBR ENTRY/EXIT 01679 M00S01388.1xy +++| STD S1 SAVE MONITOR FUNCTION CODE 01680 M00S01389.1xy +++| IMF1 RJM CRQ CHECK FOR FUNCTION REISSUE REQUIRED 01681 M00S01390.1xy +++| NJN IMF1 IF PREVIOUS FUNCTION NOT YET COMPLETE 01682 M00S01391.1xy +++| LDD S1 01683 M00S01392.1xy +++| RJM FTN ISSUE MONITOR FUNCTION 01684 M00S01393.1xy +++| UJN IMFX RETURN
Line S01394 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01685 M01S01394.ns2769 ---| IMS SPACE 4,20 01686 M01S01395.ns2769 ---|** IMS - ISSUE MESSAGE BLOCK TO *EMB*. 01687 M01S01396.ns2769 ---|* 01688 M01S01397.ns2769 ---|* THIS ROUTINE PLACES A MESSAGE BLOCK IN THE *EMB* AND CALLS 01689 M01S01398.ns2769 ---|* *1MD* (IF NOT ALREADY ACTIVE) TO ISSUE EACH MESSAGE IN THE 01690 M01S01399.ns2769 ---|* BLOCK TO THE APPROPRIATE DAYFILE. 01691 M01S01400.ns2769 ---|* 01692 M01S01401.ns2769 ---|* ENTRY (A) = 6/ LN, 12/ AD 01693 M01S01402.ns2769 ---|* LN MESSAGE BLOCK LENGTH IN CM WORDS, 01694 M01S01403.ns2769 ---|* INCLUDING HEADER. 01695 M01S01404.ns2769 ---|* AD ADDRESS OF MESSAGE BLOCK. 01696 M01S01405.ns2769 ---|* 01697 M01S01406.ns2769 ---|* USES S2, T6, CM - CM+4, SR - SR+4. 01698 M01S01407.ns2769 ---|* 01699 M01S01408.ns2769 ---|* CALLS CMD. 01700 M01S01409.ns2769 ---|* 01701 M01S01410.ns2769 ---|* MACROS MONITOR. 01702 M01S01411.ns2769 ---| 01703 M01S01412.ns2769 ---| 01704 M01S01413.ns2769 ---| IMS7 AOM IMSG SET DATA LOST FLAG 01705 M01S01414.ns2769 ---| 01706 M01S01415.ns2769 ---| IMS SUBR ENTRY/EXIT 01707 M01S01416.ns2769 ---| STM IMSE SAVE MESSAGE ADDRESS 01708 M01S01417.ns2769 ---| SHN -14 SAVE MESSAGE LENGTH 01709 M01S01418.ns2769 ---| STD S2 01710 M01S01419.ns2769 ---| LDN 0 CLEAR *EMB* FLUSH RETRY COUNT 01711 M01S01420.ns2769 ---| STD T6 01712 M01S01421.ns2769 ---| IMS1 STD CM+1 SET UP *UTEM* REQUEST 01713 M01S01422.ns2769 ---| STD CM+2 01714 M01S01423.ns2769 ---| LDC ** 01715 M01S01424.ns2769 ---| IMSA EQU *-1 (FWA OF *EMB*) 01716 M01S01425.ns2769 ---| STD CM+4 01717 M01S01426.ns2769 ---| SHN -14 01718 M01S01427.ns2769 ---| STD CM+3 01719 M01S01428.ns2769 ---| MONITOR UTEM 01720 M01S01429.ns2769 ---| LDD CM+1 01721 M01S01430.ns2769 ---| ZJN IMS3 IF INTERLOCK SUCCESSFUL 01722 M01S01431.ns2769 ---| IMS2 ADN 1 01723 M01S01432.ns2769 ---| PJN *-1 IF DELAY NOT COMPLETE 01724 M01S01433.ns2769 ---| AOD T6 INCREMENT *EMB* FLUSH RETRY COUNT 01725 M01S01434.ns2769 ---| LMN BFRL 01726 M01S01435.ns2769 ---| ZJN IMS7 IF RETRY LIMIT REACHED 01727 M01S01436.ns2769 ---| LDN 0 01728 M01S01437.ns2769 ---| UJN IMS1 TRY AGAIN 01729 M01S01438.ns2769 ---| 01730 M01S01439.ns2769 ---| IMS3 LDC ** 01731 M01S01440.ns2769 ---| IMSB EQU *-1 (FWA OF *EMB*) 01732 M01S01441.ns2769 ---| CRD SR 01733 M01S01442.ns2769 ---| SOD SR+4 CLEAR INTERLOCK 01734 M01S01443.ns2769 ---| LDD S2 01735 M01S01444.ns2769 ---| ADD SR+3 01736 M01S01445.ns2769 ---| SBK EMBLL 01737 M01S01446.ns2769 ---| MJN IMS5 IF ENOUGH ROOM IN BUFFER 01738 M01S01447.ns2769 ---| AOD T6 INCREMENT *EMB* FLUSH RETRY COUNT 01739 M01S01448.ns2769 ---| LMK BFRL 01740 M01S01449.ns2769 ---| ZJN IMS4 IF *EMB* FLUSH RETRY LIMIT REACHED 01741 M01S01450.ns2769 ---| RJM CMD CALL *1MD* 01742 M01S01451.ns2769 ---| ZJN IMS4 IF UNABLE TO CALL *1MD* 01743 M01S01452.ns2769 ---| LDC ** CLEAR *EMB* INTERLOCK 01744 M01S01453.ns2769 ---| IMSC EQU *-1 (FWA OF *EMB*) 01745 M01S01454.ns2769 ---| CWD SR 01746 M01S01455.ns2769 ---| UJP IMS2 RETRY 01747 M01S01456.ns2769 ---| 01748 M01S01457.ns2769 ---| IMS4 AOM IMSG SET DATA LOST FLAG 01749 M01S01458.ns2769 ---| UJN IMS6 FINISH AND RETURN 01750 M01S01459.ns2769 ---| 01751 M01S01460.ns2769 ---| IMS5 LDC ** 01752 M01S01461.ns2769 ---| IMSD EQU *-1 (FWA OF *EMB*) 01753 M01S01462.ns2769 ---| ADN 1 SKIP HEADER 01754 M01S01463.ns2769 ---| ADD SR+3 ADD WORD COUNT 01755 M01S01464.ns2769 ---| CWM **,S2 WRITE MESSAGE TO BUFFER 01756 M01S01465.ns2769 ---| IMSE EQU *-1 (MESSAGE ADDRESS) 01757 M01S01466.ns2769 ---| LDD S2 UPDATE WORD COUNT 01758 M01S01467.ns2769 ---| RAD SR+3 01759 M01S01468.ns2769 ---| RJM CMD CALL *1MD* 01760 M01S01469.ns2769 ---| IMS6 LDC ** 01761 M01S01470.ns2769 ---| IMSG EQU *-1 01762 M01S01471.ns2769 ---| RAD SR+1 01763 M01S01472.ns2769 ---| LDC ** UPDATE *EMB* HEADER 01764 M01S01473.ns2769 ---| IMSF EQU *-1 (FWA OF *EMB*) 01765 M01S01474.ns2769 ---| CWD SR 01766 M01S01475.ns2769 ---| LDN 0 CLEAR DATA LOST FLAG 01767 M01S01476.ns2769 ---| STM IMSG 01768 M01S01477.ns2769 ---| LJM IMSX RETURN 01769 M00S01478.1xy +++| ISF SPACE 4,25 01770 M00S01479.1xy +++|** ISF - ISSUE SEEK OPERATION. 01771 M00S01480.1xy +++|* 01772 M00S01481.1xy +++|* THIS ROUTINE ISSUES THE SEEK FUNCTION. 01773 M00S01482.1xy +++|* 01774 M00S01483.1xy +++|* ENTRY (CB) = BUFFER ORDINAL. 01775 M00S01484.1xy +++|* (CS) = CHANNEL RESERVATION STATUS. 01776 M00S01485.1xy +++|* 01777 M00S01486.1xy +++|* EXIT (A) .EQ. 0 IF UNIT ON-CYLINDER. 01778 M00S01487.1xy +++|* .NE. 0 IF DRIVE RESERVED TO OTHER CONTROLLER, OR 01779 M00S01488.1xy +++|* POSITIONER BUSY. 01780 M00S01489.1xy +++|* (CS) = BIT 3 SET IF CONTROLLER HARDWARE RESERVE IS 01781 M00S01490.1xy +++|* HELD. BIT 3 IS CLEAR IF *OPERATION COMPLETE* 01782 M00S01491.1xy +++|* FUNCTION WAS ISSUED. 01783 M00S01492.1xy +++|* (CA - CA+2) = PHYSICAL ADDRESS OF SECTOR. 01784 M00S01493.1xy +++|* TO *ERR* IF ERROR. 01785 M00S01494.1xy +++|* 01786 M00S01495.1xy +++|* USES CS, EC, CA - CA+4. 01787 M00S01496.1xy +++|* 01788 M00S01497.1xy +++|* CALLS ERR, FNC, GGS, RHR. 01789 M00S01498.1xy +++|* 01790 M00S01499.1xy +++|* MACROS CCBA. 01791 M00S01500.1xy +++| 01792 M00S01501.1xy +++| 01793 M00S01502.1xy +++| ISF SUBR ENTRY/EXIT 01794 M00S01503.1xy +++| CCBA PAD1 GET PHYSICAL ADDRESS FROM CBT ENTRY 01795 M00S01504.1xy +++| CRD CA 01796 M00S01505.1xy +++| LDD CA+2 SET HEAD NUMBER 01797 M00S01506.1xy +++| SHN 14 01798 M00S01507.1xy +++| LMD TH SET SECTOR SIZE FIELD 01799 M00S01508.1xy +++| ERRNZ SSIZ-1000 CODE DEPENDS ON VALUE 01800 M00S01509.1xy +++| STD CA+2 01801 M00S01510.1xy +++| SHN -14 SET SECTOR NUMBER 01802 M00S01511.1xy +++| STD CA+3 01803 M00S01512.1xy +++| LDN FCSK ISSUE SEEK FUNCTION 01804 M00S01513.1xy +++| RJM FNC 01805 M00S01514.1xy +++| MJN ISF3 IF FUNCTION TIMEOUT 01806 M00S01515.1xy +++| LDN FCSKL OUTPUT SEEK PARAMETERS 01807 M00S01516.1xy +++| OAM CA,CH 01808 M00S01517.1xy +++| ZJN ISF1 IF ALL DATA WAS TAKEN 01809 M00S01518.1xy +++| LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 01810 M00S01519.1xy +++| UJN ISF2 PROCESS ERROR 01811 M00S01520.1xy +++| 01812 M00S01521.1xy +++| ISF1 EJM ISF4,CH IF LAST BYTE TRANSFERRED 01813 M00S01522.1xy +++| SBN 1 01814 M00S01523.1xy +++| NJN ISF1 IF NOT TIMEOUT 01815 M00S01524.1xy +++| LCN CHFE SET *CHANNEL FAILURE* ERROR CODE 01816 M00S01525.1xy +++| ISF2 STD EC 01817 M00S01526.1xy +++| ISF3 RJM ERR PROCESS ERROR 01818 M00S01527.1xy +++| 01819 M00S01528.1xy +++| ISF4 DCN CH+40 01820 M00S01529.1xy +++| RJM GGS GET GENERAL STATUS 01821 M00S01530.1xy +++| MJN ISF3 IF STATUS WAS NOT OBTAINED 01822 M00S01531.1xy +++| ZJN ISF5 IF NO ERROR AND ON-CYLINDER
Line S01532 Modification History | |
---|---|
M01 (Removed by) | ns2561 |
Seq # *Modification Id* Act ----------------------------+ 01823 M01S01532.ns2561 ---| SHN 21-3
Line S00001 Modification History | |
---|---|
M01 (Added by) | ns2561 |
Seq # *Modification Id* Act ----------------------------+ 01824 M01S00001.ns2561 +++| SHN 21-13 01825 M01S00002.ns2561 +++| MJN ISF3 IF ABNORMAL TERMINATION 01826 M01S00003.ns2561 +++| SHN 21-3-21+13 01827 M00S01533.1xy +++| MJN ISF6 IF DRIVE RESERVED TO OPPOSITE ACCESS 01828 M00S01534.1xy +++| ISF5 LDD CS SET HARDWARE RESERVE FLAG 01829 M00S01535.1xy +++| SCN 10 01830 M00S01536.1xy +++| LMN 10 01831 M00S01537.1xy +++| STD CS 01832 M00S01538.1xy +++| LDD GS 01833 M00S01539.1xy +++| ZJN ISF6 IF ON-CYLINDER 01834 M00S01540.1xy +++| SHN 21-1 01835 M00S01541.1xy +++| PJN ISF3 IF NOT BUSY STATUS 01836 M00S01542.1xy +++| RJM RHR RELEASE HARDWARE RESERVES 01837 M00S01543.1xy +++| NJN ISF3 IF ERROR 01838 M00S01544.1xy +++| LDN 1 SET EXIT STATUS 01839 M00S01545.1xy +++| ISF6 LJM ISFX RETURN
Line S00034 Modification History | |
---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01840 M01S00034.ns2732 +++| MCA SPACE 4,10 01841 M01S00035.ns2732 +++|** MCA - MASTER CLEAR ADAPTER. 01842 M01S00036.ns2732 +++|* 01843 M01S00037.ns2732 +++|* EXIT (A) .EQ. 0, IF MASTER CLEAR SUCCESSFUL. 01844 M01S00038.ns2732 +++|* .LT. 0, IF MASTER CLEAR FAILED. 01845 M01S00039.ns2732 +++|* 01846 M01S00040.ns2732 +++|* USES T1. 01847 M01S00041.ns2732 +++|* 01848 M01S00042.ns2732 +++|* CALLS FNC, FNN, GGS. 01849 M01S00043.ns2732 +++|* 01850 M01S00044.ns2732 +++|* MACROS DELAY. 01851 M01S00045.ns2732 +++| 01852 M01S00046.ns2732 +++| 01853 M01S00047.ns2732 +++| MCA SUBR ENTRY/EXIT 01854 M01S00048.ns2732 +++| LDN 1 01855 M01S00049.ns2732 +++| STD T1 01856 M01S00050.ns2732 +++| DCN CH+40 INSURE CHANNEL IN CORRECT STATE 01857 M01S00051.ns2732 +++| MCA1 LDC FCMC MASTER CLEAR THE CHANNEL ADAPTER 01858 M01S00052.ns2732 +++| RJM FNN 01859 M01S00053.ns2732 +++| MJN MCA3 IF ERROR ON CHANNEL ACCESS 01860 M01S00054.ns2732 +++| LDC FCWC WRITE ADAPTER CONTROL REGISTER 01861 M01S00055.ns2732 +++| RJM FNC 01862 M01S00056.ns2732 +++| MJN MCA3 IF ERROR ON CHANNEL ACCESS 01863 M01S00057.ns2732 +++| LDC 20400 60 BIT CM WORD ACCESS AND NO ERROR CLEAR 01864 M01S00058.ns2732 +++| OAN CH 01865 M01S00059.ns2732 +++| MCA2 SBN 2 01866 M01S00060.ns2732 +++| MJN MCA3 IF TIMEOUT ON CONTROL REGISTER WRITE 01867 M01S00061.ns2732 +++| FJM MCA2,CH IF DATA NOT ACCEPTED 01868 M01S00062.ns2732 +++| DCN CH+40 01869 M01S00063.ns2732 +++| DELAY 01870 M01S00064.ns2732 +++| RJM GGS GET GENERAL STATUS 01871 M01S00065.ns2732 +++| ZJN MCAX IF STATUS OK 01872 M01S00066.ns2732 +++| SOD T1 01873 M01S00067.ns2732 +++| PJN MCA1 IF NEED TO TRY AGAIN 01874 M01S00068.ns2732 +++| MCA3 DCN CH+40 01875 M01S00069.ns2732 +++| UJP MCAX RETURN WITH ERROR INDICATION 01876 M00S01546.1xy +++| OVI SPACE 4,25 01877 M00S01547.1xy +++|** OVI - OBTAIN AND VERIFY *PUT* INTERLOCK. 01878 M00S01548.1xy +++|* 01879 M00S01549.1xy +++|* THIS ROUTINE ATTEMPTS TO OBTAIN THE *PUT* INTERLOCK AND IF 01880 M00S01550.1xy +++|* SUCCESSFUL, VERIFIES THAT THE BUFFER FOR WHICH THE SEEK WAS 01881 M00S01551.1xy +++|* ISSUED IS STILL CURRENT IN THE QUEUE. 01882 M00S01552.1xy +++|* 01883 M00S01553.1xy +++|* ENTRY (CA+1 - CA+3) = ADDRESS USED FOR SEEK. 01884 M00S01554.1xy +++|* (CB) = BUFFER ORDINAL. 01885 M00S01555.1xy +++|* (ER) = RECOVERY IN PROGRESS FLAG. 01886 M00S01556.1xy +++|* (IL) = NONZERO IF THE *PUT* INTERLOCK IS ALREADY HELD. 01887 M00S01557.1xy +++|* (PO) = *PUT* ORDINAL. 01888 M00S01558.1xy +++|* (PR) = SPECIAL *PUT* REQUEST PROCESSING FLAG. 01889 M00S01559.1xy +++|* 01890 M00S01560.1xy +++|* EXIT (A) = 0 IF *PUT* ENTRY IS INTERLOCKED AND BUFFER IS 01891 M00S01561.1xy +++|* STILL CURRENT IN QUEUE. 01892 M00S01562.1xy +++|* = NONZERO IF *PUT* ENTRY IS INTERLOCKED BY OTHER 01893 M00S01563.1xy +++|* DRIVER OR THE BUFFER FOR WHICH THE SEEK WAS 01894 M00S01564.1xy +++|* PERFORMED HAS ALREADY BEEN PROCESSED BY THE 01895 M00S01565.1xy +++|* OTHER DRIVER. 01896 M00S01566.1xy +++|* (IL) = 1 IF (A) = 0. 01897 M00S01567.1xy +++|* 01898 M00S01568.1xy +++|* USES IL, CM+1 - CM+2, CN - CN+4. 01899 M00S01569.1xy +++|* 01900 M00S01570.1xy +++|* CALLS RPI. 01901 M00S01571.1xy +++|* 01902 M00S01572.1xy +++|* MACROS CCBA, CPTA, MONITOR. 01903 M00S01573.1xy +++| 01904 M00S01574.1xy +++| 01905 M00S01575.1xy +++| OVI2 LDN 0 INDICATE *PUT* INTERLOCKED AND BUFFER OK 01906 M00S01576.1xy +++| 01907 M00S01577.1xy +++| OVI SUBR ENTRY/EXIT 01908 M00S01578.1xy +++| LDD IL 01909 M00S01579.1xy +++| NJN OVI2 IF THIS DRIVER ALREADY HAS *PUT* INTERLOCK 01910 M00S01580.1xy +++| LDK SUIS 01911 M00S01581.1xy +++| STD CM+1 01912 M00S01582.1xy +++| LDD PO 01913 M00S01583.1xy +++| STD CM+2 01914 M00S01584.1xy +++| MONITOR BIOM ISSUE INTERLOCK REQUEST 01915 M00S01585.1xy +++| LDD CM+1 01916 M00S01586.1xy +++| NJN OVIX IF *PUT* IS INTERLOCKED BY OTHER DRIVER 01917 M00S01587.1xy +++| AOD IL SET *PUT* INTERLOCK FLAG 01918 M00S01588.1xy +++| LDC CREQ UPDATE *CCT* TABLE 01919 M00S01589.1xy +++| OVIA EQU *-2 (*CCT* FWA SET BY *PRS*) 01920 M00S01590.1xy +++| CWD IL 01921 M00S01591.1xy +++| LDD ER 01922 M00S01592.1xy +++| NJN OVI2 IF RECOVERY IN PROGRESS 01923 M00S01593.1xy +++| LDD PR 01924 M00S01594.1xy +++| NJN OVI2 IF SPECIAL PUT REQUEST PROCESSING 01925 M00S01595.1xy +++| 01926 M00S01596.1xy +++|* VERIFY THAT THE BUFFER FOR WHICH THE SEEK WAS ISSUED IS STILL 01927 M00S01597.1xy +++|* CURRENT IN THE QUEUE. 01928 M00S01598.1xy +++| 01929 M00S01599.1xy +++| CPTA UNCT 01930 M00S01600.1xy +++| CRD CN 01931 M00S01601.1xy +++| LDD CN+3 01932 M00S01602.1xy +++| LMD CB 01933 M00S01603.1xy +++| NJN OVI1 IF CURRENT CBT ORDINAL CHANGED 01934 M00S01604.1xy +++| CCBA HSLK GET *PUT* ORDINAL FROM CBT ENTRY 01935 M00S01605.1xy +++| CRD CN 01936 M00S01606.1xy +++| LDD CN+4 01937 M00S01607.1xy +++| LMD PO 01938 M00S01608.1xy +++| NJN OVI1 IF *PUT* ORDINALS DO NOT MATCH 01939 M00S01609.1xy +++| CCBA PAD1 GET PHYSICAL ADDRESS FROM CBT ENTRY 01940 M00S01610.1xy +++| CRD CN 01941 M00S01611.1xy +++| LDD CN+1 01942 M00S01612.1xy +++| LMD CA+1 01943 M00S01613.1xy +++| NJN OVI1 IF NO CYLINDER MATCH 01944 M00S01614.1xy +++| LDD CA+2 TRACK 01945 M00S01615.1xy +++| LPN 77 01946 M00S01616.1xy +++| SHN 6 01947 M00S01617.1xy +++| LMD CA+3 SECTOR 01948 M00S01618.1xy +++| LMD CN+2 01949 M00S01619.1xy +++| ZJN OVI1.1 IF BUFFER OK 01950 M00S01620.1xy +++| OVI1 RJM RPI RELEASE *PUT* INTERLOCK 01951 M00S01621.1xy +++| LDN 1 INDICATE VERIFICATION FAILURE 01952 M00S01622.1xy +++| OVI1.1 UJP OVIX RETURN 01953 M00S01623.1xy +++| PDT SPACE 4,20 01954 M00S01624.1xy +++|** PDT - PROCESS DATA TRANSFER. 01955 M00S01625.1xy +++|* 01956 M00S01626.1xy +++|* THIS ROUTINE PREPARES FOR AND STARTS THE DATA TRANSFER WHEN A 01957 M00S01627.1xy +++|* REQUEST IS FOUND IN THE *PUT* AND THE SEEK HAS COMPLETED. IT 01958 M00S01628.1xy +++|* WILL CALL THE PROPER ROUTINE FOR THE DIRECTION OF THE I/O. 01959 M00S01629.1xy +++|* THIS ROUTINE WILL RETURN TO THE MAIN LOOP ONLY WHEN THE 01960 M00S01630.1xy +++|* TRANSFER CANNOT CONTINUE ON THE CURRENT UNIT. 01961 M00S01631.1xy +++|* 01962 M00S01632.1xy +++|* ENTRY (EC) = ERROR CODE IF ERROR RECOVERY IS IN PROGRESS. 01963 M00S01633.1xy +++|* (PO) = *PUT* ORDINAL. 01964 M00S01634.1xy +++|* (RW) = READ/WRITE FLAG. 01965 M00S01635.1xy +++|* 01966 M00S01636.1xy +++|* USES NB, PB, TB, T1. 01967 M00S01637.1xy +++|* 01968 M00S01638.1xy +++|* CALLS ERR, FNN, OVI, RHR, RIO, RPI, WIO. 01969 M00S01639.1xy +++| 01970 M00S01640.1xy +++| 01971 M00S01641.1xy +++| PDT SUBR ENTRY/EXIT 01972 M00S01642.1xy +++| RJM OVI OBTAIN *PUT* INTERLOCK AND VERIFY BUFFER 01973 M00S01643.1xy +++| NJN PDT1 IF UNABLE TO INTERLOCK *PUT*/WRONG BUFFER 01974 M00S01644.1xy +++| STD NB CLEAR NEXT BUFFER ORDINAL 01975 M00S01645.1xy +++| STD PB CLEAR PREVIOUS BUFFER ORDINAL 01976 M00S01646.1xy +++| LDC FCCT CLEAR THE T REGISTERS 01977 M00S01647.1xy +++| RJM FNN 01978 M00S01648.1xy +++| MJN PDT2 IF ERROR ENCOUNTERED
Line S01649 Modification History | |
---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01979 M01S01649.ns2732 ---| DCN CH+40 01980 M00S01650.1xy +++| LDM IICB,RW SET COMPLETION REQUEST THRESHOLD 01981 M00S01651.1xy +++| STM IICA 01982 M00S01652.1xy +++| LDM PDTA,RW STORE SUBROUTINE ADDRESS 01983 M00S01653.1xy +++| STD T1 01984 M00S01654.1xy +++| RJM 0,T1 ENTER DATA TRANSFER ROUTINE 01985 M00S01655.1xy +++| 01986 M00S01656.1xy +++|* CONTROL RETURNS HERE AFTER THE DATA TRANSFER IS COMPLETED. 01987 M00S01657.1xy +++| 01988 M00S01658.1xy +++| PDT1 RJM RHR RELEASE HARDWARE RESERVES 01989 M00S01659.1xy +++| ZJN PDT3 IF NO ERROR 01990 M00S01660.1xy +++| LDD EC 01991 M00S01661.1xy +++| NJN PDT3 IF ERROR RECOVERY IS IN PROGRESS 01992 M00S01662.1xy +++| PDT2 RJM ERR CALL ERROR PROCESSOR 01993 M00S01663.1xy +++| 01994 M00S01664.1xy +++| PDT3 RJM RPI RELEASE *PUT* INTERLOCK 01995 M00S01665.1xy +++| UJP PDTX RETURN 01996 M00S01666.1xy +++| 01997 M00S01667.1xy +++| 01998 M00S01668.1xy +++| PDTA BSS 0 PROCESSOR ADDRESS TABLE 01999 M00S01669.1xy +++| CON RIO 02000 M00S01670.1xy +++| CON WIO 02001 M00S01671.1xy +++| PFR SPACE 4,15 02002 M00S01672.1xy +++|** PFR - PREPARE FOR RETRY ATTEMPT. 02003 M00S01673.1xy +++|* 02004 M00S01674.1xy +++|* THIS ROUTINE DOES WHATEVER IS NECESSARY TO PREPARE FOR THE 02005 M00S01675.1xy +++|* NEXT RETRY ATTEMPT. ITS DUTIES INCLUDE PLUGGING INSTRUCTIONS 02006 M00S01676.1xy +++|* TO FORCE RETURN TO THE ERROR PROCESSOR FOLLOWING RECOVERY. 02007 M00S01677.1xy +++|* 02008 M00S01678.1xy +++|* ENTRY (RW) = READ/WRITE FLAG. 02009 M00S01679.1xy +++|* 02010 M00S01680.1xy +++|* USES T1, T2. 02011 M00S01681.1xy +++| 02012 M00S01682.1xy +++| 02013 M00S01683.1xy +++| PFR SUBR ENTRY/EXIT 02014 M00S01684.1xy +++| LDD RW 02015 M00S01685.1xy +++| SHN 1 02016 M00S01686.1xy +++| STD T1 02017 M00S01687.1xy +++| LDM PFRA,T1 02018 M00S01688.1xy +++| STD T2 02019 M00S01689.1xy +++| LDM PFRA+1,T1 02020 M00S01690.1xy +++| STI T2 02021 M00S01691.1xy +++| UJN PFRX RETURN 02022 M00S01692.1xy +++| 02023 M00S01693.1xy +++| 02024 M00S01694.1xy +++| PFRA BSS 0 02025 M00S01695.1xy +++| CON RIOC,UJNI+RIO12-RIOC 02026 M00S01696.1xy +++| CON WIOC,UJNI+WIO8-WIOC 02027 M00S01697.1xy +++| 02028 M00S01698.1xy +++| ERRNG RIO12-RIOC CODE DEPENDS ON VALUE 02029 M00S01699.1xy +++| ERRNG WIO8-WIOC CODE DEPENDS ON VALUE 02030 M00S01700.1xy +++| PRE SPACE 4,20 02031 M00S01701.1xy +++|** PRE - PRESET ERROR PROCESSOR. 02032 M00S01702.1xy +++|* 02033 M00S01703.1xy +++|* THIS ROUTINE PERFORMS OPERATIONS NECESSARY TO PREPARE THE 02034 M00S01704.1xy +++|* DRIVER FOR ERROR PROCESSOR EXECUTION. 02035 M00S01705.1xy +++|* 02036 M00S01706.1xy +++|* EXIT (A) = 0 IF ERROR PROCESSING SHOULD CONTINUE. 02037 M00S01707.1xy +++|* (EC) = 1 IF ERROR ON PREVIOUS SECTOR. 02038 M00S01708.1xy +++|* (PB) = PREVIOUS BUFFER ORDINAL. 02039 M00S01709.1xy +++|* (RS) = RECOVERY STATUS. 02040 M00S01710.1xy +++|* (T5) = EST ORDINAL. 02041 M00S01711.1xy +++|* (TEPA) = 1 IF VERIFICATION/INTERLOCK REJECT. 02042 M00S01712.1xy +++|* 02043 M00S01713.1xy +++|* USES CB, EC, GS, PB, RS, T5, CM - CM+4. 02044 M00S01714.1xy +++|* 02045 M00S01715.1xy +++|* CALLS CRQ, FNN, OVI. 02046 M00S01716.1xy +++|* 02047 M00S01717.1xy +++|* MACROS CPTA. 02048 M00S01718.1xy +++| 02049 M00S01719.1xy +++| 02050 M00S01720.1xy +++| PRE4 AOM TEPA SET VERIFICATION/INTERLOCK FAILURE FLAG 02051 M00S01721.1xy +++| 02052 M00S01722.1xy +++| PRE SUBR ENTRY/EXIT 02053 M00S01723.1xy +++| DCN CH+40 DISCONNECT CHANNEL 02054 M00S01724.1xy +++| LDML FNCA SAVE CURRENT FUNCTION 02055 M00S01725.1xy +++| STM BMLLF 02056 M00S01726.1xy +++| SHN -6 02057 M00S01727.1xy +++| SCN 77 02058 M00S01728.1xy +++| STM BMLAS 02059 M00S01729.1xy +++| LDML FNCB SAVE LAST ADAPTER FUNCTION 02060 M00S01730.1xy +++| STM BMLTD+4 02061 M00S01731.1xy +++| SHN -14 02062 M00S01732.1xy +++| STM BMLTD+3 02063 M00S01733.1xy +++| LDD EC SAVE CURRENT ERROR CODE 02064 M00S01734.1xy +++| SHN 21-13 02065 M00S01735.1xy +++| PJN PRE1 IF NOT COMPLEMENTED 02066 M00S01736.1xy +++| LDD EC 02067 M00S01737.1xy +++| LMC 7777 02068 M00S01738.1xy +++| UJN PRE2 CONTINUE 02069 M00S01739.1xy +++| 02070 M00S01740.1xy +++| PRE1 LDD EC 02071 M00S01741.1xy +++| PRE2 SHN 6 02072 M00S01742.1xy +++| RAM BMLTD+3 02073 M00S01743.1xy +++| LDM ERR SAVE LAST CALL TO *ERR* 02074 M00S01744.1xy +++| STM BMLTD 02075 M00S01745.1xy +++| LDM FNC SAVE LAST CALL TO *FNC* 02076 M00S01746.1xy +++| STM BMLTD+1 02077 M00S01747.1xy +++| LDM FNN SAVE LAST CALL TO *FNN* 02078 M00S01748.1xy +++| STM BMLTD+2 02079 M00S01749.1xy +++| LCN 0 INITIALIZE RECOVERY STATUS 02080 M00S01750.1xy +++| STD RS 02081 M00S01751.1xy +++| STD GS PRESET GENERAL STATUS = 7777 02082 M00S01752.1xy +++| RJM OVI GET *PUT* INTERLOCK (IF NOT ALREADY HELD) 02083 M00S01753.1xy +++| NJP PRE4 IF INTERLOCK NOT OBTAINED 02084 M00S01754.1xy +++| LDC LDNI+FCRD 02085 M00S01755.1xy +++| STM RIOA 02086 M00S01756.1xy +++| ADN FCWR-FCRD 02087 M00S01757.1xy +++| STM WIOA 02088 M00S01758.1xy +++| CPTA UNCT GET EST ORDINAL 02089 M00S01759.1xy +++| CRD CM 02090 M00S01760.1xy +++| LDD CM+1 02091 M00S01761.1xy +++| STD T5 02092 M00S01762.1xy +++| LDD EP 02093 M00S01763.1xy +++| ZJN PRE3 IF NOT PREVIOUS SECTOR ERROR 02094 M00S01764.1xy +++| LDD EC 02095 M00S01765.1xy +++| LMC 7777-FTOE 02096 M00S01766.1xy +++| NJN PRE3 IF NOT PREVIOUS SECTOR ERROR 02097 M00S01767.1xy +++| LDN FTOE 02098 M00S01768.1xy +++| STD EC 02099 M00S01769.1xy +++| LDD PB RESET CURRENT BUFFER TO PREVIOUS 02100 M00S01770.1xy +++| ZJN PRE3 IF NO PREVIOUS BUFFER 02101 M00S01771.1xy +++| STD CB 02102 M00S01772.1xy +++| LDN 0 CLEAR PREVIOUS BUFFER ORDINAL 02103 M00S01773.1xy +++| STD PB 02104 M00S01774.1xy +++| PRE3 RJM CRQ IDLE PENDING MONITOR FUNCTIONS 02105 M00S01775.1xy +++| NJN PRE3 IF FUNCTION PENDING 02106 M00S01776.1xy +++| STD EP CLEAR PREVIOUS SECTOR ERROR FLAG 02107 M00S01777.1xy +++| LJM PREX RETURN 02108 M00S01778.1xy +++| RCH SPACE 4,15 02109 M00S01779.1xy +++|** RCH - REQUEST CHANNEL. 02110 M00S01780.1xy +++|* 02111 M00S01781.1xy +++|* ENTRY (IR+4) = CHANNEL NUMBER. 02112 M00S01782.1xy +++|* (CS) = CHANNEL RESERVATION STATUS. 02113 M00S01783.1xy +++|* 02114 M00S01784.1xy +++|* EXIT (A) .NE. 0 IF CHANNEL ASSIGNED. 02115 M00S01785.1xy +++|* .EQ. 0 IF CHANNEL NOT ASSIGNED. 02116 M00S01786.1xy +++|* 02117 M00S01787.1xy +++|* USES CM+1, CS. 02118 M00S01788.1xy +++|* 02119 M00S01789.1xy +++|* MACROS MONITOR. 02120 M00S01790.1xy +++| 02121 M00S01791.1xy +++| 02122 M00S01792.1xy +++| RCH SUBR ENTRY/EXIT 02123 M00S01793.1xy +++| LDD CS 02124 M00S01794.1xy +++| LPN 1 02125 M00S01795.1xy +++| NJN RCHX IF CHANNEL ALREADY ASSIGNED 02126 M00S01796.1xy +++| LDD IR+4 02127 M00S01797.1xy +++| STD CM+1 02128 M00S01798.1xy +++| MONITOR CCHM 02129 M00S01799.1xy +++| LDD CM+2 02130 M00S01800.1xy +++| ZJN RCHX IF CHANNEL NOT ASSIGNED 02131 M00S01801.1xy +++| SCF *+2,CH UNCONDITIONALLY SET CHANNEL FLAG 02132 M00S01802.1xy +++| AOD CS SET CHANNEL RESERVED FLAG 02133 M00S01803.1xy +++| UJN RCHX RETURN
Line S01804 Modification History | |
---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 02134 M01S01804.ns2507 ---| RCS SPACE 4,15 02135 M01S01805.ns2507 ---|** RCS - REMOVE CHANNEL FROM SYSTEM USE. 02136 M01S01806.ns2507 ---|* 02137 M01S01807.ns2507 ---|* THIS ROUTINE REMOVES A FAILING CHANNEL/CONTROLLER FROM 02138 M01S01808.ns2507 ---|* SYSTEM USE EITHER GLOBALLY OR AS A PATH TO A SPECIFIC DEVICE 02139 M01S01809.ns2507 ---|* VIA A CALL TO *1DS*. IT ATTEMPTS TO RELEASE UNITS CONNECTED 02140 M01S01810.ns2507 ---|* TO MAKE THEM ACCESSIBLE THROUGH THE ALTERNATE CHANNEL, IF ONE 02141 M01S01811.ns2507 ---|* EXISTS. 02142 M01S01812.ns2507 ---|* 02143 M01S01813.ns2507 ---|* ENTRY (A) = EST ORDINAL IF CHANNEL IS TO BE DOWNED ON A 02144 M01S01814.ns2507 ---|* PARTICULAR DEVICE. 02145 M01S01815.ns2507 ---|* = 0 IF CHANNEL IS TO BE GLOBALLY DOWNED. 02146 M01S01816.ns2507 ---|* 02147 M01S01817.ns2507 ---|* USES EC, S2, CM - CM+4. 02148 M01S01818.ns2507 ---|* 02149 M01S01819.ns2507 ---|* CALLS FNC, RHR, 1DS. 02150 M01S01820.ns2507 ---|* 02151 M01S01821.ns2507 ---|* MACROS EXECUTE, MONITOR. 02152 M01S01822.ns2507 ---| 02153 M01S01823.ns2507 ---| 02154 M01S01824.ns2507 ---| RCS SUBR ENTRY/EXIT 02155 M01S01825.ns2507 ---| LMC 4000 02156 M01S01826.ns2507 ---| STM RCSA+4 02157 M01S01827.ns2507 ---| LDD CS 02158 M01S01828.ns2507 ---| LPN 10 02159 M01S01829.ns2507 ---| ZJN RCS1 IF CONTROLLER NOT RESERVED TO THIS ACCESS 02160 M01S01830.ns2507 ---| 02161 M01S01831.ns2507 ---|* BEFORE DOWNING THE CHANNEL A ZERO WORD AUTOLOAD FUNCTION IS 02162 M01S01832.ns2507 ---|* ISSUED TO PLACE THE CONTROLLER IN ITS IDLE LOOP. THIS MAY BE 02163 M01S01833.ns2507 ---|* NECESSARY SINCE A CONTROLLER MEMORY ERROR CAN HANG THE 02164 M01S01834.ns2507 ---|* PROCESSOR, PREVENTING PROCESSING OF THE *OPERATION COMPLETE* 02165 M01S01835.ns2507 ---|* FUNCTION, RESULTING IN DRIVES RESERVED TO THE DOWN 02166 M01S01836.ns2507 ---|* CONTROLLER. 02167 M01S01837.ns2507 ---| 02168 M01S01838.ns2507 ---| LDK FCAL ISSUE AUTOLOAD FUNCTION 02169 M01S01839.ns2507 ---| RJM FNC 02170 M01S01840.ns2507 ---| ZJN RCS1 IF FUNCTION WAS ACCEPTED 02171 M01S01841.ns2507 ---| LDN CSTE SET *CONTROLLER STOP* ERROR CODE 02172 M01S01842.ns2507 ---| STD EC 02173 M01S01843.ns2507 ---| UJN RCS2 CONTINUE 02174 M01S01844.ns2507 ---| 02175 M01S01845.ns2507 ---| RCS1 DCN CH+40 02176 M01S01846.ns2507 ---| RCS2 RJM RHR RELEASE HARDWARE RESERVES 02177 M01S01847.ns2507 ---| 02178 M01S01848.ns2507 ---|* CALL *1DS* TO DOWN THE CHANNEL. 02179 M01S01849.ns2507 ---| 02180 M01S01850.ns2507 ---| LDD MA PLACE *1DS* REQUEST IN MESSAGE BUFFER 02181 M01S01851.ns2507 ---| CWM RCSA,ON 02182 M01S01852.ns2507 ---| LDN 0 02183 M01S01853.ns2507 ---| STD S2 INITIALIZE RETRY COUNT 02184 M01S01854.ns2507 ---| RCS3 STD CM+1 02185 M01S01855.ns2507 ---| EXECUTE 1DS,= 02186 M01S01856.ns2507 ---| MONITOR RPPM CALL *1DS* 02187 M01S01857.ns2507 ---| LDD CM+1 02188 M01S01858.ns2507 ---| NJP RCSX IF PP ASSIGNED 02189 M01S01859.ns2507 ---| AOD S2 INCREMENT RETRY COUNT 02190 M01S01860.ns2507 ---| LMK PCRL 02191 M01S01861.ns2507 ---| ZJP RCSX IF RETRY LIMIT 02192 M01S01862.ns2507 ---| LDN 0 02193 M01S01863.ns2507 ---| UJN RCS3 RETRY *1DS* CALL 02194 M01S01864.ns2507 ---| 02195 M01S01865.ns2507 ---| 02196 M01S01866.ns2507 ---| RCSA VFD 18/3L1DS,6/,12/DWNF,12/0,12/4000 02197 M00S01867.1xy +++| RHR SPACE 4,10 02198 M00S01868.1xy +++|** RHR - RELEASE HARDWARE RESERVES. 02199 M00S01869.1xy +++|* 02200 M00S01870.1xy +++|* ENTRY (CS) = CHANNEL STATUS. 02201 M00S01871.1xy +++|* 02202 M00S01872.1xy +++|* EXIT (A) = 0 IF NO ERROR. 02203 M00S01873.1xy +++|* 02204 M00S01874.1xy +++|* USES CS, S1. 02205 M00S01875.1xy +++|* 02206 M00S01876.1xy +++|* CALLS FNC. 02207 M00S01877.1xy +++| 02208 M00S01878.1xy +++| 02209 M00S01879.1xy +++| RHR SUBR ENTRY/EXIT 02210 M00S01880.1xy +++| LDD CS 02211 M00S01881.1xy +++| LPN 10 02212 M00S01882.1xy +++| ZJN RHRX IF CONTROLLER NOT RESERVED 02213 M00S01883.1xy +++| LDN FCOC ISSUE *OPERATION COMPLETE* FUNCTION 02214 M00S01884.1xy +++| RJM FNC 02215 M00S01885.1xy +++| SHN 0-21 SAVE ERROR STATUS 02216 M00S01886.1xy +++| STD S1 02217 M00S01887.1xy +++| DCN CH+40 02218 M00S01888.1xy +++| LCN 10 CLEAR CONTROLLER RESERVE FLAG 02219 M00S01889.1xy +++| RAD CS 02220 M00S01890.1xy +++| LDD S1 SET REPLY STATUS 02221 M00S01891.1xy +++| UJN RHRX RETURN 02222 M00S01892.1xy +++| RIO SPACE 4,40 02223 M00S01893.1xy +++|** RIO - PERFORM READ I/O OPERATIONS. 02224 M00S01894.1xy +++|* 02225 M00S01895.1xy +++|* ENTRY (CB) = CURRENT BUFFER ORDINAL. 02226 M00S01896.1xy +++|* (EP) = 0. 02227 M00S01897.1xy +++|* (NB) = 0. 02228 M00S01898.1xy +++|* (PB) = 0. 02229 M00S01899.1xy +++|* 02230 M00S01900.1xy +++|* EXIT (PB) = ORDINAL OF LAST BUFFER PROCESSED. 02231 M00S01901.1xy +++|* 02232 M00S01902.1xy +++|* USES CB, EC, EP, NB, PB, SR+2. 02233 M00S01903.1xy +++|* 02234 M00S01904.1xy +++|* CALLS ERR, FNC, FNN, GGS, IFI, WFT, WTC, WTR. 02235 M00S01905.1xy +++|* 02236 M00S01906.1xy +++|* MACROS CCBA. 02237 M00S01907.1xy +++| 02238 M00S01908.1xy +++| 02239 M00S01909.1xy +++| RIO SUBR ENTRY/EXIT 02240 M00S01910.1xy +++| RJM IFI INITIALIZE FOR I/O 02241 M00S01911.1xy +++| RIO1 RJM WTR WRITE T PRIME REGISTER 02242 M00S01912.1xy +++| MJN RIO5 IF ERROR WRITING T REGISTER 02243 M00S01913.1xy +++| LDN FCRD ISSUE READ FUNCTION 02244 M00S01914.1xy +++|* LDN FCCO (CONTROLLER ERROR RECOVERY IN PROGRESS) 02245 M00S01915.1xy +++| RIOA EQU *-1 02246 M00S01916.1xy +++| RJM FNN 02247 M00S01917.1xy +++| PJN RIO2 IF NO ERROR 02248 M00S01918.1xy +++| AOD EP SET PREVIOUS SECTOR ERROR FLAG 02249 M00S01919.1xy +++| UJN RIO5 CALL ERROR PROCESSOR 02250 M00S01920.1xy +++| 02251 M00S01921.1xy +++| RIO2 LDC FCDI+HLEN INITIATE DMA TRANSFER 02252 M00S01922.1xy +++| RJM FNC 02253 M00S01923.1xy +++| MJN RIO5 IF ERROR ON FUNCTION 02254 M00S01924.1xy +++| RIO3 FJM RIO6,CH IF CHANNEL FULL 02255 M00S01925.1xy +++| SBN 1 02256 M00S01926.1xy +++| NJN RIO3 IF NOT TIMEOUT 02257 M00S01927.1xy +++| LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 02258 M00S01928.1xy +++| RIO4 STD EC 02259 M00S01929.1xy +++| RIO5 RJM ERR CALL ERROR PROCESSOR 02260 M00S01930.1xy +++| 02261 M00S01931.1xy +++| RIO6 LDN HLEN INPUT HEADER DATA 02262 M00S01932.1xy +++| IAM BUFF,CH 02263 M00S01933.1xy +++| ZJN RIO8 IF DATA TRANSFER COMPLETE 02264 M00S01934.1xy +++| SFM RIO7,CH IF CHANNEL PARITY ERROR 02265 M00S01935.1xy +++| LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 02266 M00S01936.1xy +++| UJN RIO4 SET ERROR CODE 02267 M00S01937.1xy +++| 02268 M00S01938.1xy +++| RIO7 LCN CHPE SET *CHANNEL PARITY* ERROR CODE 02269 M00S01939.1xy +++| UJN RIO4 SET ERROR CODE 02270 M00S01940.1xy +++| 02271 M00S01941.1xy +++| RIO8 DCN CH+40 INPUT TO PP COMPLETE 02272 M00S01942.1xy +++| RJM WTC STORE LINKAGE BYTES 02273 M00S01943.1xy +++| RJM WFT WAIT FOR TRANSFER COMPLETION 02274 M00S01944.1xy +++| MJN RIO4 IF ERROR ENCOUNTERED 02275 M00S01945.1xy +++| ZJN RIO12 IF NO CONSECUTIVE REQUEST 02276 M00S01946.1xy +++|* UJN RIO12 (ERROR RECOVERY IN PROGRESS) 02277 M00S01947.1xy +++| RIOC EQU *-1 02278 M00S01948.1xy +++| LDN 0 CLEAR NEXT BUFFER ORDINAL 02279 M00S01949.1xy +++| STD NB 02280 M00S01950.1xy +++| LJM RIO1 PROCESS NEXT REQUEST 02281 M00S01951.1xy +++| 02282 M00S01952.1xy +++| RIO12 RJM GGS GET GENERAL STATUS 02283 M00S01953.1xy +++| ZJP RIOX IF NO ERROR 02284 M00S01954.1xy +++| LDD PB BACKUP TO PREVIOUS BUFFER 02285 M00S01955.1xy +++| STD CB 02286 M00S01956.1xy +++| LDN 0 AVOID BUFFER COMPLETION 02287 M00S01957.1xy +++| STD PB 02288 M00S01958.1xy +++| LJM RIO5 CALL ERROR PROCESSOR
Line S00070 Modification History | |
---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 02289 M01S00070.ns2732 +++| RLC SPACE 4,10 02290 M01S00071.ns2732 +++|** RLC - RELOAD CCC CONTROLWARE IF NECESSARY. 02291 M01S00072.ns2732 +++|* 02292 M01S00073.ns2732 +++|* RLC WILL RELOAD CONTROLWARE BEFORE THE FINAL RETRY FOR EACH 02293 M01S00074.ns2732 +++|* ACCESS, PROVIDED THAT THE ERROR CODE IS LESS THAN *NRVE*. 02294 M01S00075.ns2732 +++|* 02295 M01S00076.ns2732 +++|* EXIT (A) .EQ. 0 IF LOAD WAS SUCCESSFUL OR UNNECESSARY. 02296 M01S00077.ns2732 +++|* .NE. 0 IF LOAD WAS ATTEMPTED AND FAILED. 02297 M01S00078.ns2732 +++|* 02298 M01S00079.ns2732 +++|* USES T1, CM - CM+4, CN - CN+4. 02299 M01S00080.ns2732 +++|* 02300 M01S00081.ns2732 +++|* CALLS FNC, GGS, MCA. 02301 M01S00082.ns2732 +++|* 02302 M01S00083.ns2732 +++|* MACROS DELAY, MONITOR. 02303 M01S00084.ns2732 +++| 02304 M01S00085.ns2732 +++| 02305 M01S00086.ns2732 +++| RLC8 LDN 0 INDICATE NO ERROR 02306 M01S00087.ns2732 +++| RLC9 DCN CH+40 02307 M01S00088.ns2732 +++| 02308 M01S00089.ns2732 +++| RLC SUBR ENTRY/EXIT 02309 M01S00090.ns2732 +++| LDD EC 02310 M01S00091.ns2732 +++| SBK NRVE 02311 M01S00092.ns2732 +++| PJN RLC8 IF NOT A CANDIDATE FOR CONTROLWARE RELOAD 02312 M01S00093.ns2732 +++| LDM TREC,EC 02313 M01S00094.ns2732 +++| SBD RC 02314 M01S00095.ns2732 +++| ZJN RLC1 IF TIME FOR RELOAD ON SECONDARY ACCESS 02315 M01S00096.ns2732 +++| SBD RC 02316 M01S00097.ns2732 +++| NJN RLC2 IF NOT TIME FOR RELOAD ON PRIMARY ACCESS 02317 M01S00098.ns2732 +++| RLC1 RJM MCA MASTER CLEAR ADAPTOR 02318 M01S00099.ns2732 +++| 02319 M01S00100.ns2732 +++|* CHECK FOR SYSEDIT IN PROGRESS AND DELAY IF NECESSARY. 02320 M01S00101.ns2732 +++| 02321 M01S00102.ns2732 +++| RLC2 LDK PLDP CHECK PERIPHERAL DIRECTORY POINTER 02322 M01S00103.ns2732 +++| CRD CM 02323 M01S00104.ns2732 +++| LDD CM 02324 M01S00105.ns2732 +++| ADD CM+1 02325 M01S00106.ns2732 +++| NJN RLC3 IF SYSEDIT NOT IN PROGRESS 02326 M01S00107.ns2732 +++| DELAY 02327 M01S00108.ns2732 +++| UJN RLC2 RECHECK SYSEDIT IN PROGRESS 02328 M01S00109.ns2732 +++| 02329 M01S00110.ns2732 +++|* FIND CONTROLWARE. 02330 M01S00111.ns2732 +++| 02331 M01S00112.ns2732 +++| RLC3 LDN ZERL 02332 M01S00113.ns2732 +++| CRD CM 02333 M01S00114.ns2732 +++| LDD MA PUT CONTROLWARE ID IN MESSAGE BUFFER 02334 M01S00115.ns2732 +++| CWM RLCA,ON 02335 M01S00116.ns2732 +++| MONITOR SCDM SEARCH CENTRAL DIRECTORY 02336 M01S00117.ns2732 +++| LDD CM+3 02337 M01S00118.ns2732 +++| SHN 14 02338 M01S00119.ns2732 +++| LMD CM+4 02339 M01S00120.ns2732 +++| CRD CM READ *PST* ENTRY 02340 M01S00121.ns2732 +++| LDD CM+1 02341 M01S00122.ns2732 +++| SHN 21-12 02342 M01S00123.ns2732 +++| PJN RLC4 IF NOT CM RESIDENT 02343 M01S00124.ns2732 +++| LDD CM+3 GET ADDRESS OF *RCL* ENTRY 02344 M01S00125.ns2732 +++| SHN 14 02345 M01S00126.ns2732 +++| LMD CM+4 02346 M01S00127.ns2732 +++| ADN 1 02347 M01S00128.ns2732 +++| CRD CN READ 5200 RECORD HEADER 02348 M01S00129.ns2732 +++| ADN 1 SET FWA OF 5200 RECORD DATA 02349 M01S00130.ns2732 +++| STD CM+4 02350 M01S00131.ns2732 +++| SHN -14 02351 M01S00132.ns2732 +++| STD CM+3 02352 M01S00133.ns2732 +++| LCN 1 ADJUST WORD COUNT FOR HEADER 02353 M01S00134.ns2732 +++| RAD CN+4 02354 M01S00135.ns2732 +++| 02355 M01S00136.ns2732 +++|* LOAD CONTROLWARE. 02356 M01S00137.ns2732 +++| 02357 M01S00138.ns2732 +++| LDK FCAL AUTOLOAD FUNCTION 02358 M01S00139.ns2732 +++| RJM FNC ISSUE FUNCTION AND ACTIVATE CHANNEL 02359 M01S00140.ns2732 +++| ZJN RLC5 IF NO ERROR ON FUNCTION 02360 M01S00141.ns2732 +++| RLC4 UJP RLC9 RETURN WITH ERROR INDICATION 02361 M01S00142.ns2732 +++| 02362 M01S00143.ns2732 +++| RLC5 LDD CN+4 02363 M01S00144.ns2732 +++| RLC6 SBD HN 02364 M01S00145.ns2732 +++| MJN RLC7 IF LESS THAN 100B WORDS LEFT 02365 M01S00146.ns2732 +++| LDN 0 02366 M01S00147.ns2732 +++| RLC7 ADD HN 02367 M01S00148.ns2732 +++| STD T1 02368 M01S00149.ns2732 +++| LDD CM+3 02369 M01S00150.ns2732 +++| SHN 14 02370 M01S00151.ns2732 +++| LMD CM+4 02371 M01S00152.ns2732 +++| CRM BUFF,T1 READ BLOCK OF CONTROLWARE FROM CM 02372 M01S00153.ns2732 +++| STD CM+4 UPDATE BLOCK ADDRESS 02373 M01S00154.ns2732 +++| SHN -14 02374 M01S00155.ns2732 +++| STD CM+3 02375 M01S00156.ns2732 +++| LDD T1 SET BYTES TO TRANSFER 02376 M01S00157.ns2732 +++| SHN 2 02377 M01S00158.ns2732 +++| ADD T1 02378 M01S00159.ns2732 +++| OAM BUFF,CH LOAD BLOCK OF CONTROLWARE TO CCC 02379 M01S00160.ns2732 +++| FJM *,CH IF TRANSFER NOT COMPLETE 02380 M01S00161.ns2732 +++| NJN RLC4 IF INCOMPLETE TRANSFER 02381 M01S00162.ns2732 +++| LDD CN+4 02382 M01S00163.ns2732 +++| SBD T1 02383 M01S00164.ns2732 +++| STD CN+4 02384 M01S00165.ns2732 +++| NJN RLC6 IF MORE WORDS TO TRANSFER 02385 M01S00166.ns2732 +++| DCN CH+40 02386 M01S00167.ns2732 +++| DELAY 02387 M01S00168.ns2732 +++| RJM GGS GET GENERAL STATUS 02388 M01S00169.ns2732 +++| UJP RLCX RETURN 02389 M01S00170.ns2732 +++| 02390 M01S00171.ns2732 +++| 02391 M01S00172.ns2732 +++| RLCA VFD 42/0LMA464,18/0 CONTROLWARE NAME 02392 M00S01959.1xy +++| RPI SPACE 4,10 02393 M00S01960.1xy +++|** RPI - RELEASE *PUT* INTERLOCK. 02394 M00S01961.1xy +++|* 02395 M00S01962.1xy +++|* ENTRY (CC) = COMPLETION COUNT. 02396 M00S01963.1xy +++|* (IL) = *PUT* INTERLOCK FLAG. 02397 M00S01964.1xy +++|* (PB) = PREVIOUS BUFFER ORDINAL. 02398 M00S01965.1xy +++|* (PO) = *PUT* ORDINAL. 02399 M00S01966.1xy +++|* (RW) = READ/WRITE FLAG. 02400 M00S01967.1xy +++|* (TB) = TOTAL BUFFER COUNT. 02401 M00S01968.1xy +++|* 02402 M00S01969.1xy +++|* USES CC, IL, PB, CM - CM+4. 02403 M00S01970.1xy +++|* 02404 M00S01971.1xy +++|* MACROS MONITOR. 02405 M00S01972.1xy +++| 02406 M00S01973.1xy +++| 02407 M00S01974.1xy +++| RPI SUBR ENTRY/EXIT 02408 M00S01975.1xy +++| LDD IL 02409 M00S01976.1xy +++| ZJN RPIX IF *PUT* NOT INTERLOCKED 02410 M00S01977.1xy +++| LDD PB 02411 M00S01978.1xy +++| ZJN RPI1 IF NO PREVIOUS BUFFER 02412 M00S01979.1xy +++| LDN 1 ACCOUNT FOR PREVIOUS BUFFER 02413 M00S01980.1xy +++| RPI1 ADD CC 02414 M00S01981.1xy +++| LMC 4000 SET *RELEASE INTERLOCK* FLAG 02415 M00S01982.1xy +++| STD CM+3 02416 M00S01983.1xy +++| LDD TB SET TOTAL BUFFER COUNT 02417 M00S01984.1xy +++| STD CM+4 02418 M00S01985.1xy +++| LDD PO 02419 M00S01986.1xy +++| STD CM+2 02420 M00S01987.1xy +++| LDN DCBS CLEAR UNIT INTERLOCK 02421 M00S01988.1xy +++| STD CM+1 02422 M00S01989.1xy +++| LDN 0 CLEAR COMPLETION COUNT BEFORE *CRQ* CALL 02423 M00S01990.1xy +++| STD CC 02424 M00S01991.1xy +++| MONITOR BIOM 02425 M00S01992.1xy +++|* LDN 0 02426 M00S01993.1xy +++| STD IL CLEAR *PUT* INTERLOCK FLAG 02427 M00S01994.1xy +++| STD PB CLEAR PREVIOUS BUFFER ORDINAL 02428 M00S01995.1xy +++| LDC CREQ UPDATE *CCT* TABLE 02429 M00S01996.1xy +++| RPIA EQU *-2 (*CCT* FWA SET BY *PRS*) 02430 M00S01997.1xy +++| CWD IL 02431 M00S01998.1xy +++| UJP RPIX RETURN 02432 M00S01999.1xy +++| RTM SPACE 4,25 02433 M00S02000.1xy +++|** RTM - REQUEST TRACK FLAW IF MEDIA ERROR. 02434 M00S02001.1xy +++|* 02435 M00S02002.1xy +++|* THIS ROUTINE DETERMINES IF THE ERROR RESULTED FROM A MEDIA 02436 M00S02003.1xy +++|* FAILURE. IF IT DID, *CPUMTR* WILL BE CALLED TO PLACE THE 02437 M00S02004.1xy +++|* LOGICAL TRACK NUMBER IN THE MST SO *1MV* CAN PERFORM A MEDIA 02438 M00S02005.1xy +++|* VERIFICATION WHEN THE TRACK IS RELEASED. AN ERROR LOG 02439 M00S02006.1xy +++|* MESSAGE IS ISSUED INFORMING THE OPERATOR THAT A MEDIA FAILURE 02440 M00S02007.1xy +++|* OCCURRED BUT THE TRACK HAS NOT YET BEEN FLAWED BY THE SYSTEM. 02441 M00S02008.1xy +++|* 02442 M00S02009.1xy +++|* ENTRY (CA - CA+3) = PHYSICAL ADDRESS. 02443 M00S02010.1xy +++|* (CB) = BUFFER ORDINAL. 02444 M00S02011.1xy +++|* (EC) = ERROR CODE. 02445 M00S02012.1xy +++|* (T5) = EST ORDINAL. 02446 M00S02013.1xy +++|* 02447 M00S02014.1xy +++|* USES T1, CM - CM+4. 02448 M00S02015.1xy +++|*
Line S02016 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02449 M01S02016.ns2769 ---|* CALLS C2D, C4D, IMS.
Line S00125 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02450 M01S00125.ns2769 +++|* CALLS C2D, IMB. 02451 M00S02017.1xy +++|* 02452 M00S02018.1xy +++|* MACROS MONITOR. 02453 M00S02019.1xy +++| 02454 M00S02020.1xy +++| 02455 M00S02021.1xy +++| RTM SUBR ENTRY/EXIT 02456 M00S02022.1xy +++| LDD EC 02457 M00S02023.1xy +++| LMK PARE 02458 M00S02024.1xy +++| NJN RTMX IF NOT MEDIA ERROR 02459 M00S02025.1xy +++| LDD T5 CONVERT AND STORE EST ORDINAL IN MESSAGE 02460 M00S02026.1xy +++| SHN -3 02461 M00S02027.1xy +++| RJM C2D 02462 M00S02028.1xy +++| STM RTMB+1 02463 M00S02029.1xy +++| LDD T5
Line S00001 Modification History | |
---|---|
M01 (Added by) | ns2505 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02464 M02S00001.253l688 ---| STD CM+1 STORE EST ORDINAL FOR *STBM*
Line S00004 Modification History | |
---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02465 M01S00004.253l688 +++| STD CM+1 STORE EST ORDINAL FOR *SMDM* 02466 M00S02030.1xy +++| LPN 7 02467 M00S02031.1xy +++| SHN 6 02468 M00S02032.1xy +++| ADC 2R0, 02469 M00S02033.1xy +++| STM RTMB+2 02470 M00S02034.1xy +++| LDD CA+1 02471 M00S02035.1xy +++| SHN 1 02472 M00S02036.1xy +++| ADC 4000 02473 M00S02037.1xy +++| STD CM+2 02474 M00S02038.1xy +++| LDD CA+2 PHYSICAL TRACK 02475 M00S02039.1xy +++| LPN 77 02476 M00S02040.1xy +++| STD T1 02477 M00S02041.1xy +++| SHN 1 02478 M00S02042.1xy +++| ADD T1 02479 M00S02043.1xy +++| ERRNZ PSPT-3 CODE DEPENDS ON VALUE 02480 M00S02044.1xy +++| ADD CA+3 02481 M00S02045.1xy +++| SBK PSLT 02482 M00S02046.1xy +++| MJN RTM1 IF FIRST LOGICAL TRACK OF CYLINDER 02483 M00S02047.1xy +++| AOD CM+2
Line S02048 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02484 M01S02048.ns2769 ---| RTM1 LDC RTMB+4 CONVERT AND STORE TRACK NUMBER IN MESSAGE 02485 M01S02049.ns2769 ---| STD T1 02486 M01S02050.ns2769 ---| LDD CM+2 02487 M01S02051.ns2769 ---| RJM C4D
Line S00126 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02488 M01S00126.ns2769 +++| RTM1 LDD CM+2 CONVERT AND STORE TRACK NUMBER IN MESSAGE 02489 M01S00127.ns2769 +++| SHN -6 CONVERT UPPER 6 BITS 02490 M01S00128.ns2769 +++| RJM C2D 02491 M01S00129.ns2769 +++| STM RTMB+4 STORE RESULT IN DISPLAY BUFFER 02492 M01S00130.ns2769 +++| LDD CM+2 CONVERT LOWER 6 BITS 02493 M01S00131.ns2769 +++| LPN 77 02494 M01S00132.ns2769 +++| RJM C2D 02495 M01S00133.ns2769 +++| STM RTMB+5 STORE RESULT IN DISPLAY BUFFER 02496 M00S02052.1xy +++| LDK SFTS SET SUBFUNCTION 02497 M00S02053.1xy +++| STD CM+3
Line S02054 Modification History | |
---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02498 M01S02054.253l688 ---| MONITOR STBM
Line S00005 Modification History | |
---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02499 M01S00005.253l688 +++| MONITOR SMDM 02500 M00S02055.1xy +++| LDD CM+1 02501 M00S02056.1xy +++| NJN RTM2 IF THIS TRACK FLAW ALREADY REQUESTED
Line S02057 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02502 M01S02057.271l716 ---| LDC RTML*10000+RTMA ISSUE ERROR LOG MESSAGE
Line S00025 Modification History | |
---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02503 M02S00025.ns2769 ---| LDC RTMAL*10000+RTMA ISSUE ERROR LOG MESSAGE
Line S02058 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02504 M01S02058.ns2769 ---| RJM IMS
Line S00134 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02505 M01S00134.ns2769 +++| LDC RTMA ISSUE ERROR LOG MESSAGE 02506 M01S00135.ns2769 +++| RJM IMB 02507 M00S02059.1xy +++| RTM2 UJP RTMX RETURN 02508 M00S02060.1xy +++| 02509 M00S02061.1xy +++|
Line S02062 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02510 M01S02062.271l716 ---|* ERROR LOG MESSAGE HEADER. 02511 M01S02063.271l716 ---| 02512 M01S02064.271l716 ---| RTMA VFD 36/0 RESERVED 02513 M01S02065.271l716 ---| VFD 12/RTML MESSAGE LENGTH INCLUDING HEADER 02514 M01S02066.271l716 ---| VFD 12/ELDY 02515 M01S02067.271l716 ---| 02516 M01S02068.271l716 ---| RTMB DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED* 02517 M01S02069.271l716 ---| 02518 M01S02070.271l716 ---| RTML EQU */5-RTMA/5 MESSAGE LENGTH
Line S00026 Modification History | |
---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02519 M01S00026.271l716 +++| RTMA VFD 24/0 RESERVED 02520 M01S00027.271l716 +++| VFD 12/1 ERRLOG ALERT FLAG 02521 M01S00028.271l716 +++| VFD 12/RTMAL MESSAGE LENGTH 02522 M01S00029.271l716 +++| VFD 12/ELDY ERRLOG DAYFILE 02523 M01S00030.271l716 +++| 02524 M01S00031.271l716 +++| RTMB DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.* 02525 M01S00032.271l716 +++| 02526 M01S00033.271l716 +++| .1 SET *-RTMA+4 02527 M01S00034.271l716 +++| RTMAL EQU .1/5 02528 M00S02071.1xy +++| SAS SPACE 4,10 02529 M00S02072.1xy +++|** SAS - SAVE ADAPTER STATUS. 02530 M00S02073.1xy +++|* 02531 M00S02074.1xy +++|* EXIT (A) .LT. 0, IF ERRORS READING STATUS. 02532 M00S02075.1xy +++|* 02533 M00S02076.1xy +++|* USES T1, CM - CM+4. 02534 M00S02077.1xy +++|* 02535 M00S02078.1xy +++|* CALLS FNC. 02536 M00S02079.1xy +++| 02537 M00S02080.1xy +++| 02538 M00S02081.1xy +++| SAS5 DCN CH+40 02539 M00S02082.1xy +++| LCN 0 INDICATE ERRORS OCCURRED 02540 M00S02083.1xy +++| 02541 M00S02084.1xy +++| SAS SUBR ENTRY/EXIT 02542 M00S02085.1xy +++| LDN SASAL+1 SET UP READ LOOP 02543 M00S02086.1xy +++| STD T1 02544 M00S02087.1xy +++| SAS1 SOD T1 02545 M00S02088.1xy +++| ZJN SAS4 IF END OF SAVE LOOP 02546 M00S02089.1xy +++| LDML SASA-1,T1 FUNCTION FOR REGISTER READ 02547 M00S02090.1xy +++| LMC 400000 INDICATE ADAPTER FUNCTION 02548 M00S02091.1xy +++| RJM FNC 02549 M00S02092.1xy +++| MJN SASX IF ERROR ENCOUNTERED 02550 M00S02093.1xy +++| SAS2 FJM SAS3,CH IF DATA PRESENT 02551 M00S02094.1xy +++| SBN 1 02552 M00S02095.1xy +++| ZJN SAS5 IF END OF DELAY 02553 M00S02096.1xy +++| UJN SAS2 LOOP WAITING FOR DATA 02554 M00S02097.1xy +++| 02555 M00S02098.1xy +++| SAS3 IAN CH 02556 M00S02099.1xy +++| STML CM-1,T1 SAVE REGISTER DATA 02557 M00S02100.1xy +++| DCN CH+40 02558 M00S02101.1xy +++| UJN SAS1 LOOP FOR NEXT REGISTER 02559 M00S02102.1xy +++| 02560 M00S02103.1xy +++| SAS4 LDDL CM+2 SAVE 16 BIT DATA IN BML MESSAGE 02561 M00S02104.1xy +++| STM BMLAS+4 02562 M00S02105.1xy +++| SHN -14 02563 M00S02106.1xy +++| STM BMLAS+3 02564 M00S02107.1xy +++| LDDL CM+1 02565 M00S02108.1xy +++| SHN 14 02566 M00S02109.1xy +++| STM BMLAS+2 02567 M00S02110.1xy +++| SHN -6 02568 M00S02111.1xy +++| SCN 77 02569 M00S02112.1xy +++| RAM BMLAS+3 02570 M00S02113.1xy +++| LDDL CM 02571 M00S02114.1xy +++| STM BMLAS+1 02572 M00S02115.1xy +++| SHN -14 02573 M00S02116.1xy +++| RAM BMLAS 02574 M00S02117.1xy +++| LJM SASX RETURN 02575 M00S02118.1xy +++| 02576 M00S02119.1xy +++| SASA CON 0 READ OPERATION STATUS 02577 M00S02120.1xy +++| CON 0 READ CONTROL REGISTER 02578 M00S02121.1xy +++| CON 0 READ ERROR STATUS REGISTER 02579 M00S02122.1xy +++| SASAL EQU *-SASA 02580 M00S02123.1xy +++| SCD SPACE 4,10 02581 M00S02124.1xy +++|** SCD - SET DRIVER DROPPED FLAG. 02582 M00S02125.1xy +++|* 02583 M00S02126.1xy +++|* THIS ROUTINE SETS A FLAG IN THE CONTROLWARE TABLE INDICATING 02584 M00S02127.1xy +++|* THAT THE DRIVER OF THIS CHANNEL HAS DROPPED. 02585 M00S02128.1xy +++|* 02586 M00S02129.1xy +++|* EXIT (A) = 0. 02587 M00S02130.1xy +++|* 02588 M00S02131.1xy +++|* USES CM+1 - CM+4. 02589 M00S02132.1xy +++|* 02590 M00S02133.1xy +++|* MACROS MONITOR. 02591 M00S02134.1xy +++| 02592 M00S02135.1xy +++| 02593 M00S02136.1xy +++| SCD SUBR ENTRY/EXIT 02594 M00S02137.1xy +++| LDD MA STORE *UTEM* PARAMETERS 02595 M00S02138.1xy +++| CWM SCDB,ON 02596 M00S02139.1xy +++| LDC ** 02597 M00S02140.1xy +++| SCDA EQU *-1 (CONTROLWARE TABLE ADDRESS) 02598 M00S02141.1xy +++| STD CM+4 02599 M00S02142.1xy +++| SHN -14 02600 M00S02143.1xy +++| STD CM+3 02601 M00S02144.1xy +++| LDN 1 02602 M00S02145.1xy +++| STD CM+1 02603 M00S02146.1xy +++| LDN 0 02604 M00S02147.1xy +++| STD CM+2 02605 M00S02148.1xy +++| MONITOR UTEM SET DRIVER DROP FLAG 02606 M00S02149.1xy +++| UJN SCDX RETURN 02607 M00S02150.1xy +++| 02608 M00S02151.1xy +++| 02609 M00S02152.1xy +++| SCDB VFD 1/0,5/0,6/1,6/,42/1 02610 M00S02153.1xy +++| SSF SPACE 4,15 02611 M00S02154.1xy +++|** SSF - SET SUSPECT FLAG. 02612 M00S02155.1xy +++|*
Line S02156 Modification History | |
---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 02613 M01S02156.ns2732 ---|* THIS ROUTINE SETS THE SUSPECT FLAG IN THE MST ENTRY VIA 02614 M01S02157.ns2732 ---|* AN *SEQM* MONITOR FUNCTION IF CERTAIN CRITERIA ARE MET. IT 02615 M01S02158.ns2732 ---|* ALSO SETS AN ERROR CODE IN THE MST THAT APPEARS ON THE *E,M* 02616 M01S02159.ns2732 ---|* DISPLAY.
Line S00173 Modification History | |
---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 02617 M01S00173.ns2732 +++|* THIS ROUTINE SETS THE SUSPECT FLAG AND THE *E,M* DISPLAY
Line S00174 Modification History | |
---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02618 M02S00174.ns2732a ---|* ERROR CODE IN THE MST ENTRY VIA *SEQM* FUNCTIONS FOLLOWING 02619 M02S00175.ns2732a ---|* THE FINAL RECOVERY ATTEMPT ON THE PRIMARY ACCESS, PROVIDED
Line S00010 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02620 M01S00010.ns2732a +++|* ERROR CODE IN THE MST ENTRY VIA *SEQM* FUNCTIONS, PROVIDED
Line S00176 Modification History | |
---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 02621 M01S00176.ns2732 +++|* THAT THE *SET SUSPECT* FLAG IS SET IN TABLE *TEPF* FOR THE 02622 M01S00177.ns2732 +++|* PARTICULAR TYPE OF ERROR ENCOUNTERED. 02623 M00S02160.1xy +++|* 02624 M00S02161.1xy +++|* ENTRY (EC) = ERROR CODE. 02625 M00S02162.1xy +++|* (RC) = RETRY COUNT. 02626 M00S02163.1xy +++|* (T5) = EST ORDINAL. 02627 M00S02164.1xy +++|* 02628 M00S02165.1xy +++|* USES CM+1 - CM+3. 02629 M00S02166.1xy +++|* 02630 M00S02167.1xy +++|* CALLS RTM. 02631 M00S02168.1xy +++|* 02632 M00S02169.1xy +++|* MACROS MONITOR. 02633 M00S02170.1xy +++| 02634 M00S02171.1xy +++| 02635 M00S02172.1xy +++| SSF SUBR ENTRY/EXIT
Line S02173 Modification History | |
---|---|
M01 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02636 M01S02173.ns2732a ---| LDD RC
Line S02174 Modification History | |
---|---|
M01 (Removed by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02637 M02S02174.ns2732a ---| LMK SURT
Line S00178 Modification History | |
---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02638 M02S00178.ns2732a ---| SBN 1 02639 M02S00179.ns2732a ---| SHN 1 02640 M02S00180.ns2732a ---| LMM TREC,EC
Line S00011 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02641 M01S00011.ns2732a +++| LDD ER 02642 M01S00012.ns2732a +++| NJN SSFX IF RECOVERY IN PROGRESS 02643 M01S00013.ns2732a +++| LDD EC 02644 M01S00014.ns2732a +++| SBK NRVE 02645 M01S00015.ns2732a +++| PJN SSF1 IF NO CONTROLWARE RELOAD 02646 M01S00016.ns2732a +++| LDM TREC,EC 02647 M01S00017.ns2732a +++| SHN -1 02648 M01S00018.ns2732a +++| ADN 1 02649 M01S00019.ns2732a +++| UJN SSF2 SEE IF TIME TO SET SUSPECT 02650 M01S00020.ns2732a +++| 02651 M01S00021.ns2732a +++| SSF1 LDK SURT 02652 M01S00022.ns2732a +++| SSF2 SBD RC 02653 M00S02175.1xy +++| NJN SSFX IF NOT TIME TO SET SUSPECT FLAG 02654 M00S02176.1xy +++| RJM RTM CHECK FOR MEDIA FAILURE 02655 M00S02177.1xy +++| LDM TEPF,EC 02656 M00S02178.1xy +++| SHN 21-7 02657 M00S02179.1xy +++| PJN SSFX IF SUSPECT FLAG NOT TO BE SET 02658 M00S02180.1xy +++| LDD T5 SET SUSPECT FLAG 02659 M00S02181.1xy +++| STD CM+1 02660 M00S02182.1xy +++| LDN SSES 02661 M00S02183.1xy +++| STD CM+2 02662 M00S02184.1xy +++| MONITOR SEQM 02663 M00S02185.1xy +++| LDD T5 SET ERROR CODE IN MST 02664 M00S02186.1xy +++| STD CM+1 02665 M00S02187.1xy +++| LDN STDE 02666 M00S02188.1xy +++| STD CM+2 02667 M00S02189.1xy +++| LDN SERS 02668 M00S02190.1xy +++| STD CM+3
Line S02191 Modification History | |
---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02669 M01S02191.253l688 ---| MONITOR STBM
Line S00006 Modification History | |
---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02670 M01S00006.253l688 +++| MONITOR SMDM
Line S02192 Modification History | |
---|---|
M01 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02671 M01S02192.ns2732a ---| UJN SSFX RETURN
Line S00023 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02672 M01S00023.ns2732a +++| UJP SSFX RETURN 02673 M00S02193.1xy +++| SUQ SPACE 4,30 02674 M00S02194.1xy +++|** SUQ - SCAN UNIT QUEUE. 02675 M00S02195.1xy +++|* 02676 M00S02196.1xy +++|* THIS ROUTINE SCANS THE *PUT* ENTRIES OF UNITS ACCESSED BY 02677 M00S02197.1xy +++|* THIS CHANNEL UNTIL IT HAS SCANNED THE ENTIRE TABLE OR FINDS 02678 M00S02198.1xy +++|* AN ENTRY ELIGIBLE FOR PROCESSING. 02679 M00S02199.1xy +++|* 02680 M00S02200.1xy +++|* ENTRY (TI) = CURRENT *TPOR* INDEX. 02681 M00S02201.1xy +++|* 02682 M00S02202.1xy +++|* EXIT (A) .EQ. 0 IF ENTIRE TABLE SCANNED AND NO ELIGIBLE 02683 M00S02203.1xy +++|* ENTRY FOUND. 02684 M00S02204.1xy +++|* .NE. 0 IF ENTRY SELECTED. 02685 M00S02205.1xy +++|* (CB) = CURRENT BUFFER ORDINAL. 02686 M00S02206.1xy +++|* (ER) = 1 IF ERROR RECOVERY IS IN PROGRESS. 02687 M00S02207.1xy +++|* (PO) = ORDINAL OF SELECTED *PUT* ENTRY. 02688 M00S02208.1xy +++|* (RC) = 0 IF ELIGIBLE ENTRY FOUND AND *RECOVERY IN 02689 M00S02209.1xy +++|* PROGRESS* FLAG IS CLEAR.
Line S02210 Modification History | |
---|---|
M01 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02690 M01S02210.ns2732a ---|* = N/2 WHERE N IS THE RETRY LIMIT FOR THE ERROR
Line S00024 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02691 M01S00024.ns2732a +++|* = N/2+1 WHERE N IS THE RETRY LIMIT FOR THE ERROR 02692 M00S02211.1xy +++|* CODE SET IN *EC* IF *RECOVERY IN PROGRESS* 02693 M00S02212.1xy +++|* FLAG IS SET. 02694 M00S02213.1xy +++|* (RW) = READ/WRITE FLAG. 02695 M00S02214.1xy +++|* TO *ERR* IF ERROR RECOVERY IS IN PROGRESS FOR 02696 M00S02215.1xy +++|* SELECTED BUFFER. 02697 M00S02216.1xy +++|* (TB) = TOTAL BUFFER COUNT. 02698 M00S02217.1xy +++|* 02699 M00S02218.1xy +++|* USES CB, EC, ER, PO, RC, RW, S1, TB, TI, CM - CM+4, 02700 M00S02219.1xy +++|* CN - CN+4, T1 - T5. 02701 M00S02220.1xy +++|* 02702 M00S02221.1xy +++|* CALLS ERR, PSR. 02703 M00S02222.1xy +++|* 02704 M00S02223.1xy +++|* MACROS CCBA, CPTA, PSR, SFA. 02705 M00S02224.1xy +++| 02706 M00S02225.1xy +++| 02707 M00S02226.1xy +++| SUQ8 RJM PSR PROCESS SPECIAL REQUESTS 02708 M00S02227.1xy +++| SUQ7 LDD TI 02709 M00S02228.1xy +++| LMN 1 02710 M00S02229.1xy +++| SUQA EQU *-1 02711 M00S02230.1xy +++| NJN SUQ1 IF NOT FINISHED WITH *PUT* SCAN 02712 M00S02231.1xy +++| 02713 M00S02232.1xy +++| SUQ SUBR ENTRY/EXIT 02714 M00S02233.1xy +++| SUQ1 AOD TI ADVANCE *TPOR* INDEX 02715 M00S02234.1xy +++| ERRNZ TPORE-1 CODE IS VALUE DEPENDENT 02716 M00S02235.1xy +++| LDM TPOR-1,TI 02717 M00S02236.1xy +++| NJN SUQ2 IF NOT END OF *TPOR* TABLE 02718 M00S02237.1xy +++| STD TI RESET INDEX 02719 M00S02238.1xy +++| UJN SUQ1 CONTINUE 02720 M00S02239.1xy +++|
Line S02240 Modification History | |
---|---|
M01 (Removed by) | ns2643 |
Seq # *Modification Id* Act ----------------------------+ 02721 M01S02240.ns2643 ---| SUQ2 SHN 14 SET CHANNEL BYTE INDEX 02722 M01S02241.ns2643 ---| STD S1 02723 M01S02242.ns2643 ---| SHN -14 SET *PUT* ORDINAL 02724 M01S02243.ns2643 ---| STD PO 02725 M01S02244.ns2643 ---| CPTA UNCT,A READ *PUT* ENTRY
Line S00004 Modification History | |
---|---|
M01 (Added by) | ns2643 |
Seq # *Modification Id* Act ----------------------------+ 02726 M01S00004.ns2643 +++| SUQ2 SHN 21 SET *PUT* ORDINAL 02727 M01S00005.ns2643 +++| STD PO 02728 M01S00006.ns2643 +++| SHN -21 02729 M01S00007.ns2643 +++| STD S1 SET CHANNEL BYTE INDEX 02730 M01S00008.ns2643 +++| CPTA UNCT READ *PUT* ENTRY 02731 M00S02245.1xy +++| CRD CM 02732 M00S02246.1xy +++| ADK PILL-UNCT 02733 M00S02247.1xy +++| CRD CN 02734 M00S02248.1xy +++| LDD CN+3 02735 M00S02249.1xy +++| LPN 76 02736 M00S02250.1xy +++| NJN SUQ8 IF SPECIAL REQUESTS PRESENT 02737 M00S02251.1xy +++| LDD CM 02738 M00S02252.1xy +++| SHN 21-13 02739 M00S02253.1xy +++| MJN SUQ7 IF UNIT INTERLOCK SET 02740 M00S02254.1xy +++| LDD CM+3
Line S02255 Modification History | |
---|---|
M01 (Removed by) | ns2643 |
Seq # *Modification Id* Act ----------------------------+ 02741 M01S02255.ns2643 ---| SUQ3 ZJN SUQ7 IF NO REQUEST IN QUEUE
Line S00009 Modification History | |
---|---|
M01 (Added by) | ns2643 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02742 M02S00009.ns2769 ---| SUQ3 ZJN SUQ3.1 IF NO REQUEST IN QUEUE
Line S02256 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02743 M01S02256.ns2769 ---| STD CB SAVE BUFFER ORDINAL
Line S00136 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02744 M01S00136.ns2769 +++| NJN SUQ3 IF REQUEST IN QUEUE 02745 M01S00137.ns2769 +++| SUQ2.1 UJN SUQ7 PROCESS NEXT *PUT* 02746 M01S00138.ns2769 +++| 02747 M01S00139.ns2769 +++| SUQ3 STD CB SAVE BUFFER ORDINAL 02748 M00S02257.1xy +++| CCBA IOLK,A READ *CBT* ENTRY 02749 M00S02258.1xy +++| CRD CN 02750 M00S02259.1xy +++| ADK HSLK-IOLK 02751 M00S02260.1xy +++| CRD T1 02752 M00S02261.1xy +++| SFA EST,CM+1 READ EST ENTRY 02753 M00S02262.1xy +++| ADK EQDE 02754 M00S02263.1xy +++| CRD CM 02755 M00S02264.1xy +++| LDM CM+1,S1 02756 M00S02265.1xy +++| SHN -11 02757 M00S02266.1xy +++| LPN 3
Line S02267 Modification History | |
---|---|
M01 (Removed by) | ns2502 |
Seq # *Modification Id* Act ----------------------------+ 02758 M01S02267.ns2502 ---| ZJN SUQ5 IF CHANNEL UP 02759 M01S02268.ns2502 ---| LPN 2 02760 M01S02269.ns2502 ---| ZJN SUQ4 IF CHANNEL IDLE
Line S00001 Modification History | |
---|---|
M01 (Added by) | ns2502 |
Seq # *Modification Id* Act ----------------------------+ 02761 M01S00001.ns2502 +++| STD T2 SAVE CHANNEL STATE INDICATOR 02762 M01S00002.ns2502 +++| LMN 3 02763 M01S00003.ns2502 +++| NJN SUQ4 IF CHANNEL NOT DOWN
Line S02270 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02764 M01S02270.ns2769 ---| SUQ3.1 LJM SUQ7 PROCESS NEXT *PUT*
Line S00140 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02765 M01S00140.ns2769 +++| SUQ3.1 UJN SUQ2.1 PROCESS NEXT *PUT* 02766 M00S02271.1xy +++| 02767 M00S02272.1xy +++| SUQ4 LDD T1 02768 M00S02273.1xy +++| SHN 0-12
Line S02274 Modification History | |
---|---|
M01 (Removed by) | ns2502 |
Seq # *Modification Id* Act ----------------------------+ 02769 M01S02274.ns2502 ---| ZJN SUQ3 IF NOT CHANNEL SPECIFIC REQUEST
Line S00004 Modification History | |
---|---|
M01 (Added by) | ns2502 |
Seq # *Modification Id* Act ----------------------------+ 02770 M01S00004.ns2502 +++| ZJN SUQ4.1 IF NOT CHANNEL SPECIFIC REQUEST
Line S02275 Modification History | |
---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02771 M01S02275.253l688 ---| LDD T1 02772 M01S02276.253l688 ---| LPN 77
Line S00007 Modification History | |
---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02773 M01S00007.253l688 +++| CCBA PAD4 GET CHANNEL FROM CBT ENTRY 02774 M01S00008.253l688 +++| CRD CM 02775 M01S00009.253l688 +++| LDD CM 02776 M01S00010.253l688 +++| SHN -6 02777 M00S02277.1xy +++| LMD IR+4
Line S02278 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02778 M01S02278.ns2769 ---| NJN SUQ3.1 IF OTHER CHANNEL SPECIFIED
Line S00005 Modification History | |
---|---|
M01 (Added by) | ns2502 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02779 M02S00005.ns2769 ---| UJN SUQ5 AVOID CHANNEL STATE CHECK 02780 M02S00006.ns2769 ---|
Line S00141 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02781 M01S00141.ns2769 +++| STD T2
Line S00007 Modification History | |
---|---|
M01 (Added by) | ns2502 |
Seq # *Modification Id* Act ----------------------------+ 02782 M01S00007.ns2502 +++| SUQ4.1 LDD T2 02783 M01S00008.ns2502 +++| NJN SUQ3.1 IF THIS CHANNEL IN IDLE STATE
Line S02279 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02784 M01S02279.ns2769 ---| SUQ5 LDD CN SET/CLEAR READ/WRITE FLAG
Line S00142 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02785 M01S00142.ns2769 +++| LDD CN SET/CLEAR READ/WRITE FLAG 02786 M00S02280.1xy +++| SHN 0-11 02787 M00S02281.1xy +++| LPN 1 02788 M00S02282.1xy +++| STD RW 02789 M00S02283.1xy +++| SHN 13-0 02790 M00S02284.1xy +++| ADN 1 02791 M00S02285.1xy +++| STD TB 02792 M00S02286.1xy +++| LDD T1 02793 M00S02287.1xy +++| SHN 0-13 02794 M00S02288.1xy +++| STD ER SET/CLEAR RECOVERY IN PROGRESS FLAG 02795 M00S02289.1xy +++| ZJN SUQ6 IF NOT ERROR RECOVERY 02796 M00S02290.1xy +++| LDD T1 SAVE ERROR CODE
Line S02291 Modification History | |
---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02797 M01S02291.253l688 ---| SHN -6 02798 M01S02292.253l688 ---| LPN 17
Line S00011 Modification History | |
---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02799 M01S00011.253l688 +++| LPN 77 02800 M00S02293.1xy +++| STD T1 02801 M00S02294.1xy +++| LMC 7777 COMPLEMENT ERROR CODE 02802 M00S02295.1xy +++| STD EC
Line S02296 Modification History | |
---|---|
M01 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02803 M01S02296.ns2732a ---| LDM TREC,T1 SET RETRY COUNT = LIMIT/2
Line S00025 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02804 M01S00025.ns2732a +++| LDM TREC,T1 SET RETRY COUNT = LIMIT/2+1 02805 M00S02297.1xy +++| SHN -1
Line S00026 Modification History | |
---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 02806 M01S00026.ns2732a +++| ADN 1
Line S02298 Modification History | |
---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 02807 M01S02298.ns2732 ---| SBN 1 02808 M00S02299.1xy +++| STD RC INITIALIZE RETRY COUNT
Line S00011 Modification History | |
---|---|
M01 (Added by) | ns2560 |
Seq # *Modification Id* Act ----------------------------+ 02809 M01S00011.ns2560 +++| LDN 0 INITIALIZE PASS COUNTER 02810 M01S00012.ns2560 +++| STM ERRA 02811 M00S02300.1xy +++| RJM ERR CALL ERROR PROCESSOR 02812 M00S02301.1xy +++|* LJM MST ERROR PROCESSOR RETURNS TO *MST* 02813 M00S02302.1xy +++| 02814 M00S02303.1xy +++| SUQ6 LDD TI SET SCAN LIMIT 02815 M00S02304.1xy +++| LMC LMNI 02816 M00S02305.1xy +++| STM SUQA 02817 M00S02306.1xy +++| LJM SUQX RETURN 02818 M00S02307.1xy +++| TEP SPACE 4,30 02819 M00S02308.1xy +++|** TEP - TERMINATE ERROR PROCESSING. 02820 M00S02309.1xy +++|* 02821 M00S02310.1xy +++|* THIS ROUTINE PERFORMS OPERATIONS NECESSARY TO RESTORE THE 02822 M00S02311.1xy +++|* DRIVER TO ITS NORMAL STATE (NON-ERROR PROCESSING). 02823 M00S02312.1xy +++|* 02824 M00S02313.1xy +++|* ENTRY (EC) = ERROR CODE. 02825 M00S02314.1xy +++|* (PO) = *PUT* ORDINAL. 02826 M00S02315.1xy +++|* (RS) = RECOVERY STATUS. 02827 M00S02316.1xy +++|* (RW) = READ/WRITE FLAG. 02828 M00S02317.1xy +++|* 02829 M00S02318.1xy +++|* EXIT (EC) = 0. 02830 M00S02319.1xy +++|* (ER) = 0. 02831 M00S02320.1xy +++|* (RC) = 0. 02832 M00S02321.1xy +++|* (RS) = RECOVERY STATUS. 02833 M00S02322.1xy +++|* 0 RECOVERED BY CONTROLLER. 02834 M00S02323.1xy +++|* 1 RECOVERED BY DRIVER. 02835 M00S02324.1xy +++|* 2 UNRESOLVED. 02836 M00S02325.1xy +++|* 3 UNRECOVERED. 02837 M00S02326.1xy +++|* 02838 M00S02327.1xy +++|* USES EC, ER, IL, RC, RS, S2, T1, T2, CM - CM+4. 02839 M00S02328.1xy +++|* 02840 M00S02329.1xy +++|* CALLS IBM, RHR, RPI. 02841 M00S02330.1xy +++|* 02842 M00S02331.1xy +++|* MACROS MONITOR. 02843 M00S02332.1xy +++| 02844 M00S02333.1xy +++|
Line S00143 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02845 M01S00143.ns2769 +++| TEP4 LDN 0 02846 M01S00144.ns2769 +++| STD EC CLEAR ERROR CODE 02847 M01S00145.ns2769 +++| STD ER CLEAR RECOVERY IN PROGRESS FLAG 02848 M01S00146.ns2769 +++| STD RC CLEAR RETRY COUNT 02849 M01S00147.ns2769 +++| STM TEPA CLEAR VERIFICATION/INTERLOCK REJECT FLAG 02850 M01S00148.ns2769 +++| 02851 M00S02334.1xy +++| TEP SUBR ENTRY/EXIT 02852 M00S02335.1xy +++| LDD RW 02853 M00S02336.1xy +++| SHN 1 02854 M00S02337.1xy +++| STD T1 02855 M00S02338.1xy +++| LDM TEPB,T1 RESTORE INSTRUCTIONS 02856 M00S02339.1xy +++| STD T2 02857 M00S02340.1xy +++| LDM TEPB+1,T1 02858 M00S02341.1xy +++| STI T2 02859 M00S02342.1xy +++| LDM TEPC,T1 02860 M00S02343.1xy +++| STD T2 02861 M00S02344.1xy +++| LDM TEPC+1,T1 02862 M00S02345.1xy +++| STI T2 02863 M00S02346.1xy +++| LDC ** 02864 M00S02347.1xy +++| TEPA EQU *-1 02865 M00S02348.1xy +++| NJP TEP4 IF OTHER DRIVER IS HANDLING ERROR 02866 M00S02349.1xy +++| LDD EC SAVE ERROR CODE IN CASE FUNCTION TIMEOUT 02867 M00S02350.1xy +++| STD S2 02868 M00S02351.1xy +++| RJM RHR RELEASE HARDWARE RESERVES 02869 M00S02352.1xy +++| LDD S2 RESTORE ERROR CODE 02870 M00S02353.1xy +++| STD EC 02871 M00S02354.1xy +++| LDD RS 02872 M00S02355.1xy +++| LMN 2 02873 M00S02356.1xy +++| NJN TEP2 IF NOT UNRESOLVED ERROR 02874 M00S02357.1xy +++| 02875 M00S02358.1xy +++|* ISSUING SUBFUNCTION *IOES* OF THE *BIOM* MONITOR FUNCTION 02876 M00S02359.1xy +++|* CAUSES ONE OF THE FOLLOWING TO OCCUR - 02877 M00S02360.1xy +++|* A. IF THE RECOVERY IN PROGRESS FLAG IS SET IN THE CBT 02878 M00S02361.1xy +++|* ENTRY, THE REQUEST WILL BE TERMINATED WITH STATUS 02879 M00S02362.1xy +++|* RETURNED TO THE PROGRAM THAT ISSUED THE REQUEST. 02880 M00S02363.1xy +++|* IN THIS CASE IT IS THE RESPONSIBILITY OF THIS 02881 M00S02364.1xy +++|* DRIVER TO ISSUE MESSAGES TO THE BML, ERROR LOG, JOB 02882 M00S02365.1xy +++|* DAYFILE AND SYSTEM DAYFILE INDICATING AN 02883 M00S02366.1xy +++|* UNRECOVERED ERROR OCCURRED. 02884 M00S02367.1xy +++|* B. IF THE RECOVERY IN PROGRESS FLAG IS CLEAR AND AN 02885 M00S02368.1xy +++|* ALTERNATE CHANNEL EXISTS (WITH AN ACTIVE DRIVER), 02886 M00S02369.1xy +++|* THE REQUEST WILL BE MODIFIED TO FORCE CONTINUATION 02887 M00S02370.1xy +++|* OF ERROR RECOVERY BY THE OTHER DRIVER. 02888 M00S02371.1xy +++|* C. IF THE RECOVERY IN PROGRESS FLAG IS CLEAR BUT 02889 M00S02372.1xy +++|* EITHER THERE IS NO ALTERNATE ACCESS PATH OR IT HAS 02890 M00S02373.1xy +++|* BEEN DOWNED, THE REQUEST WILL BE MODIFIED TO FORCE 02891 M00S02374.1xy +++|* CONTINUATION OF ERROR PROCESSING ON THIS CHANNEL. 02892 M00S02375.1xy +++| 02893 M00S02376.1xy +++| LDN SETS SET SUBFUNCTION 02894 M00S02377.1xy +++| STD CM+1 02895 M00S02378.1xy +++| LDD PO SET *PUT* ORDINAL 02896 M00S02379.1xy +++| STD CM+2 02897 M00S02380.1xy +++| LDN 1 02898 M00S02381.1xy +++| STD CM+3 02899 M00S02382.1xy +++| LDD EC SET ERROR CODE 02900 M00S02383.1xy +++| STD CM+4 02901 M00S02384.1xy +++| MONITOR BIOM 02902 M00S02385.1xy +++| STD IL CLEAR *PUT* INTERLOCK FLAG 02903 M00S02386.1xy +++| LDD CM+1 02904 M00S02387.1xy +++| ZJN TEP2 IF PROCESSING WILL RESUME ON OTHER CHANNEL 02905 M00S02388.1xy +++| AOD RS SET UNRECOVERED STATUS 02906 M00S02389.1xy +++| 02907 M00S02390.1xy +++|* ISSUE THE BML MESSAGE AND INCREMENT ERROR COUNTERS IF 02908 M00S02391.1xy +++|* APPROPRIATE FOR THIS ERROR TYPE AND RESOLUTION OF THE ERROR 02909 M00S02392.1xy +++|* HAS BEEN DETERMINED. 02910 M00S02393.1xy +++| 02911 M00S02394.1xy +++| TEP2 LDD RS 02912 M00S02395.1xy +++| LMN 2 02913 M00S02396.1xy +++| ZJN TEP3 IF UNRESOLVED ERROR 02914 M00S02397.1xy +++| RJM RPI RELEASE *PUT* INTERLOCK 02915 M00S02398.1xy +++| TEP3 RJM IBM ISSUE BML MESSAGE 02916 M00S02399.1xy +++| 02917 M00S02400.1xy +++|* CLEAR B-DISPLAY MESSAGE. 02918 M00S02401.1xy +++| 02919 M00S02402.1xy +++| LDK ZERL 02920 M00S02403.1xy +++| CRD CM 02921 M00S02404.1xy +++| LDD CP 02922 M00S02405.1xy +++| ADK MS2W 02923 M00S02406.1xy +++| CWD CM
Line S02407 Modification History | |
---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02924 M01S02407.ns2769 ---| TEP4 LDN 0 02925 M01S02408.ns2769 ---| STD EC CLEAR ERROR CODE 02926 M01S02409.ns2769 ---| STD ER CLEAR RECOVERY IN PROGRESS FLAG 02927 M01S02410.ns2769 ---| STD RC CLEAR RETRY COUNT 02928 M01S02411.ns2769 ---| STM TEPA CLEAR VERIFICATION/INTERLOCK REJECT FLAG 02929 M01S02412.ns2769 ---| LJM TEPX RETURN
Line S00149 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 02930 M01S00149.ns2769 +++| UJP TEP4 CONTINUE CLEARING AND RETURN 02931 M00S02413.1xy +++| 02932 M00S02414.1xy +++| 02933 M00S02415.1xy +++| TEPB BSS 0 02934 M00S02416.1xy +++| CON RIOC,ZJNI+RIO12-RIOC 02935 M00S02417.1xy +++| CON WIOC,ZJNI+WIO8-WIOC 02936 M00S02418.1xy +++| 02937 M00S02419.1xy +++| ERRNG RIO12-RIOC CODE DEPENDS ON VALUE 02938 M00S02420.1xy +++| ERRNG WIO8-WIOC CODE DEPENDS ON VALUE 02939 M00S02421.1xy +++| 02940 M00S02422.1xy +++| TEPC BSS 0 02941 M00S02423.1xy +++| CON RIOA,LDNI+FCRD 02942 M00S02424.1xy +++| CON WIOA,LDNI+FCWR 02943 M00S02425.1xy +++| WFT SPACE 4,25 02944 M00S02426.1xy +++|** WFT - WAIT FOR TRANSFER COMPLETE. 02945 M00S02427.1xy +++|* 02946 M00S02428.1xy +++|* ENTRY (RW) = READ/WRITE FLAG. 02947 M00S02429.1xy +++|* 02948 M00S02430.1xy +++|* EXIT (A) .LT. 0 IF ERROR ENCOUNTERED. 02949 M00S02431.1xy +++|* .EQ. 0 IF NO CONSECUTIVE REQUEST FOUND. 02950 M00S02432.1xy +++|* .GT. 0 IF CONSECUTIVE REQUEST FOUND. 02951 M00S02433.1xy +++|* 02952 M00S02434.1xy +++|* USES CB, PB, T1, CM - CM+4, CN - CN+4. 02953 M00S02435.1xy +++|* 02954 M00S02436.1xy +++|* CALLS CCS, FNC, FNN, IFI, IIC. 02955 M00S02437.1xy +++| 02956 M00S02438.1xy +++| 02957 M00S02439.1xy +++| WFT10 LDC FCCD CLEAR DMA MODE 02958 M00S02440.1xy +++| RJM FNN 02959 M00S02441.1xy +++| MJN WFTX IF ERROR ENCOUNTERED 02960 M00S02442.1xy +++| LDD NB 02961 M00S02443.1xy +++| 02962 M00S02444.1xy +++| WFT SUBR ENTRY/EXIT 02963 M00S02445.1xy +++| RJM IIC ISSUE I/O COMPLETION REQUEST IF NECESSARY 02964 M00S02446.1xy +++| RJM CCS CHECK FOR CONSECUTIVE REQUEST 02965 M00S02447.1xy +++| LDD CB ADVANCE BUFFER POINTERS 02966 M00S02448.1xy +++| STD PB 02967 M00S02449.1xy +++| LDD NB 02968 M00S02450.1xy +++| STD CB 02969 M00S02451.1xy +++| RJM IFI INITIALIZE FOR NEXT REQUEST 02970 M00S02452.1xy +++| LDK RTCL 02971 M00S02453.1xy +++| CRD CN 02972 M00S02454.1xy +++| LDD NB 02973 M00S02455.1xy +++| ZJN WFT1 IF NO CONSECUTIVE REQUEST 02974 M00S02456.1xy +++| LDD RW 02975 M00S02457.1xy +++| ZJN WFT1 IF READ OPERATION 02976 M00S02458.1xy +++| LDN HLEN/5 02977 M00S02459.1xy +++| STD T1 SET LENGTH OF HEADER 02978 M00S02460.1xy +++| CCBA PAD1 READ HEADER INTO BUFFER 02979 M00S02461.1xy +++| CRM BUFF,T1 02980 M00S02462.1xy +++| WFT1 LDC RTCL CHECK TIMEOUT ON TRANSFER 02981 M00S02463.1xy +++| CRD CM 02982 M00S02464.1xy +++| LDD CM+4 02983 M00S02465.1xy +++| SBD CN+4 02984 M00S02466.1xy +++| PJN WFT2 IF NO UNDERFLOW 02985 M00S02467.1xy +++| ADC 10000 02986 M00S02468.1xy +++| WFT2 SBN 60
Line S00001 Modification History | |
---|---|
M01 (Added by) | 1xy1 |
Seq # *Modification Id* Act ----------------------------+ 02987 M01S00001.1xy1 +++| SHN 21-13 ALLOW FOR CLOCK ADJUSTMENT 02988 M00S02469.1xy +++| PJN WFT4 IF TIMEOUT ON TRANSFER 02989 M00S02470.1xy +++| LDC FCRO READ OPERATIONAL STATUS 02990 M00S02471.1xy +++| RJM FNC 02991 M00S02472.1xy +++| PJN WFT2.2 IF NO ERROR PROCESSING FUNCTION 02992 M00S02473.1xy +++| WFT2.1 LMD EC 02993 M00S02474.1xy +++| UJN WFT4.1 PROCESS THE ERROR 02994 M00S02475.1xy +++| 02995 M00S02476.1xy +++| WFT2.2 LDC 1701 02996 M00S02477.1xy +++| WFT3 EQU *-1 02997 M00S02478.1xy +++| FJM WFT5,CH IF CHANNEL FULL 02998 M00S02479.1xy +++| NJN WFT3 IF NOT TIMEOUT 02999 M00S02480.1xy +++| WFT4 LDN CHFE INDICATE CHANNEL ERROR 03000 M00S02481.1xy +++| WFT4.1 LJM WFT9 PROCESS THE ERROR 03001 M00S02482.1xy +++| 03002 M00S02483.1xy +++| WFT5 IAN CH READ OPERATIONAL STATUS 03003 M00S02484.1xy +++| STD CM+1 03004 M00S02485.1xy +++| DCN CH+40
Line S02486 Modification History | |
---|---|
M01 (Removed by) | 1xy6 |
Seq # *Modification Id* Act ----------------------------+ 03005 M01S02486.1xy6 ---| SHN 21-2 CHECK IF TRANSFER HALTED 03006 M01S02487.1xy6 ---| MJN WFT6 IF TRANSFER HALTED 03007 M01S02488.1xy6 ---| SHN 21-0-21+2
Line S00001 Modification History | |
---|---|
M01 (Added by) | 1xy6 |
Seq # *Modification Id* Act ----------------------------+ 03008 M01S00001.1xy6 +++| SHN 21-0
Line S02489 Modification History | |
---|---|
M01 (Removed by) | 1xy1 |
Seq # *Modification Id* Act ----------------------------+ 03009 M01S02489.1xy1 ---| MJN WFT1 IF TRANSFER IN PROGRESS
Line S00002 Modification History | |
---|---|
M01 (Added by) | 1xy1 |
Seq # *Modification Id* Act ----------------------------+ 03010 M01S00002.1xy1 +++| MJP WFT1 IF TRANSFER IN PROGRESS 03011 M00S02490.1xy +++| WFT6 LDN CHPE 03012 M00S02491.1xy +++| SFM WFT9,CH IF CHANNEL PARITY ERROR 03013 M00S02492.1xy +++| LDC FCRT READ T REGISTER 03014 M00S02493.1xy +++| RJM FNC 03015 M00S02494.1xy +++| MJN WFT2.1 IF ERROR ENCOUNTERED 03016 M00S02495.1xy +++| LDC 1701 03017 M00S02496.1xy +++| WFT7 EQU *-1 03018 M00S02497.1xy +++| FJM WFT8,CH IF DATA PRESENT 03019 M00S02498.1xy +++| NJN WFT7 IF NOT END OF DELAY 03020 M00S02499.1xy +++| LDN CHFE INDICATE CHANNEL ERROR 03021 M00S02500.1xy +++| UJN WFT9 PROCESS THE ERROR 03022 M00S02501.1xy +++| 03023 M00S02502.1xy +++| WFT8 LDN 3 03024 M00S02503.1xy +++| IAM CM,CH 03025 M00S02504.1xy +++| LDN CHPE 03026 M00S02505.1xy +++| SFM WFT9,CH IF CHANNEL PARITY ERROR 03027 M00S02506.1xy +++| DCN CH+40
Line S00002 Modification History | |
---|---|
M01 (Added by) | 1xy6 |
Seq # *Modification Id* Act ----------------------------+ 03028 M01S00002.1xy6 +++| LDML WTRA+2 03029 M01S00003.1xy6 +++| ADC 40000 INCREMENT TRANSFER ADDRESS 03030 M01S00004.1xy6 +++| STDL CM+4 03031 M01S00005.1xy6 +++| SHN -20 03032 M01S00006.1xy6 +++| ADML WTRA+1 03033 M01S00007.1xy6 +++| STDL CM+3 03034 M01S00008.1xy6 +++| LMDL CM+1 03035 M01S00009.1xy6 +++| NJN WFT8.1 IF NOT THE CORRECT ADDRESS 03036 M01S00010.1xy6 +++| LDDL CM+2 03037 M01S00011.1xy6 +++| LMDL CM+4 03038 M01S00012.1xy6 +++| NJN WFT8.1 IF NOT THE CORRECT ADDRESS 03039 M00S02507.1xy +++| LDDL CM 03040 M00S02508.1xy +++| ZJP WFT10 IF BYTE COUNT IS ZERO
Line S02509 Modification History | |
---|---|
M01 (Removed by) | 1xy6 |
Seq # *Modification Id* Act ----------------------------+ 03041 M01S02509.1xy6 ---| LDN IDTE INDICATE INCOMPLETE DATA TRANSFER
Line S00013 Modification History | |
---|---|
M01 (Added by) | 1xy6 |
Seq # *Modification Id* Act ----------------------------+ 03042 M01S00013.1xy6 +++| WFT8.1 LDN IDTE INDICATE INCOMPLETE DATA TRANSFER 03043 M00S02510.1xy +++| WFT9 STD CM SAVE ERROR CODE 03044 M00S02511.1xy +++| LDD PB RESTORE CURRENT BUFFER ORDINAL 03045 M00S02512.1xy +++| STD CB 03046 M00S02513.1xy +++| LDN 0 AVOID COMPLETION OF CURRENT REQUEST 03047 M00S02514.1xy +++| STD PB 03048 M00S02515.1xy +++| LCN 0 03049 M00S02516.1xy +++| LMD CM COMPLEMENT ERROR CODE 03050 M00S02517.1xy +++| LJM WFTX RETURN 03051 M00S02518.1xy +++| WIO SPACE 4,40 03052 M00S02519.1xy +++|** WIO - PERFORM WRITE I/O OPERATIONS. 03053 M00S02520.1xy +++|* 03054 M00S02521.1xy +++|* ENTRY (CB) = CURRENT BUFFER ORDINAL. 03055 M00S02522.1xy +++|* (EP) = 0. 03056 M00S02523.1xy +++|* (PB) = 0. 03057 M00S02524.1xy +++|* 03058 M00S02525.1xy +++|* EXIT (PB) = ORDINAL OF LAST BUFFER PROCESSED. 03059 M00S02526.1xy +++|* 03060 M00S02527.1xy +++|* USES CB, EC, EP, NB, PB, T1. 03061 M00S02528.1xy +++|* 03062 M00S02529.1xy +++|* CALLS ERR, FNC, FNN, GGS, IFI, WFT, WTR. 03063 M00S02530.1xy +++|* 03064 M00S02531.1xy +++|* MACROS CCBA. 03065 M00S02532.1xy +++| 03066 M00S02533.1xy +++| 03067 M00S02534.1xy +++| WIO SUBR ENTRY/EXIT 03068 M00S02535.1xy +++| RJM IFI INITIALIZE FOR I/O 03069 M00S02536.1xy +++| LDN HLEN/5 03070 M00S02537.1xy +++| STD T1 SET LENGTH OF HEADER 03071 M00S02538.1xy +++| CCBA PAD1 READ HEADER INTO BUFFER 03072 M00S02539.1xy +++| CRM BUFF,T1 03073 M00S02540.1xy +++| WIO1 RJM WTR WRITE T PRIME REGISTER 03074 M00S02541.1xy +++| MJN WIO3 IF ERROR ENCOUNTERED 03075 M00S02542.1xy +++| LDN FCWR ISSUE WRITE FUNCTION 03076 M00S02543.1xy +++|* LDN FCCO (CONTROLLER ERROR RECOVERY IN PROGRESS) 03077 M00S02544.1xy +++| WIOA EQU *-1 03078 M00S02545.1xy +++| RJM FNN 03079 M00S02546.1xy +++| PJN WIO2 IF NO ERROR 03080 M00S02547.1xy +++| AOD EP SET PREVIOUS SECTOR ERROR FLAG 03081 M00S02548.1xy +++| UJN WIO3 CALL ERROR PROCESSOR 03082 M00S02549.1xy +++| 03083 M00S02550.1xy +++| WIO2 LDC FCDO+HLEN INITIATE THE DMA TRANSFER 03084 M00S02551.1xy +++| RJM FNC 03085 M00S02552.1xy +++| MJN WIO3 IF ERROR ENCOUNTERED 03086 M00S02553.1xy +++| LDN HLEN OUTPUT HEADER DATA 03087 M00S02554.1xy +++| OAM BUFF,CH 03088 M00S02555.1xy +++| ZJN WIO4 IF NO DATA TRANSFER ERROR 03089 M00S02556.1xy +++| LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 03090 M00S02557.1xy +++| STD EC 03091 M00S02558.1xy +++| WIO3 RJM ERR CALL ERROR PROCESSOR 03092 M00S02559.1xy +++| 03093 M00S02560.1xy +++| WIO4 DCN CH+40 03094 M00S02561.1xy +++| RJM WFT WAIT TRANSFER TO COMPLETE 03095 M00S02562.1xy +++| PJN WIO7 IF NO ERRORS ENCOUNTERED 03096 M00S02563.1xy +++| STD EC SET ERROR CODE 03097 M00S02564.1xy +++| WIO5 UJN WIO3 CALL ERROR PROCESSOR 03098 M00S02565.1xy +++| 03099 M00S02566.1xy +++| WIO7 ZJN WIO8 IF NO CONSECUTIVE REQUEST 03100 M00S02567.1xy +++|* UJN WIO8 (ERROR RECOVERY IN PROGRESS) 03101 M00S02568.1xy +++| WIOC EQU *-1 03102 M00S02569.1xy +++| LDN 0 CLEAR NEXT BUFFER ORDINAL 03103 M00S02570.1xy +++| STD NB 03104 M00S02571.1xy +++| LJM WIO1 PROCESS NEXT REQUEST 03105 M00S02572.1xy +++| 03106 M00S02573.1xy +++| WIO8 RJM GGS GET GENERAL STATUS 03107 M00S02574.1xy +++| ZJP WIOX IF NO ERROR 03108 M00S02575.1xy +++| LDD PB BACK UP TO PREVIOUS BUFFER 03109 M00S02576.1xy +++| STD CB 03110 M00S02577.1xy +++| LDN 0 AVOID BUFFER COMPLETION 03111 M00S02578.1xy +++| STD PB 03112 M00S02579.1xy +++| UJN WIO5 CALL ERROR PROCESSOR 03113 M00S02580.1xy +++| WTR SPACE 4,10 03114 M00S02581.1xy +++|** WTR - WRITE *T* REGISTER. 03115 M00S02582.1xy +++|* 03116 M00S02583.1xy +++|* ENTRY (UA - UA+1) = UEM ADDRESS/100B TO TRANSFER TO/FROM. 03117 M00S02584.1xy +++|* 03118 M00S02585.1xy +++|* EXIT (A) .LT. 0, IF CHANNEL ERROR. 03119 M00S02586.1xy +++|* 03120 M00S02587.1xy +++|* CALLS FNC. 03121 M00S02588.1xy +++| 03122 M00S02589.1xy +++| 03123 M00S02590.1xy +++| WTR SUBR ENTRY/EXIT 03124 M00S02591.1xy +++| LDD UA+1 03125 M00S02592.1xy +++| SHN 11 03126 M00S02593.1xy +++| SCN 7 03127 M00S02594.1xy +++| STML WTRA+2 FORM ABSOLUTE UEM ADDRESS 03128 M00S02595.1xy +++| LDD UA 03129 M00S02596.1xy +++| SHN 14 03130 M00S02597.1xy +++| LMD UA+1 03131 M00S02598.1xy +++| SHN 11-20 SET IN *T* REGISTER 03132 M00S02599.1xy +++| STM WTRA+1 03133 M00S02600.1xy +++| LDC FCWT ISSUE WRITE *T* REGISTER FUNCTION 03134 M00S02601.1xy +++| RJM FNC 03135 M00S02602.1xy +++| MJN WTRX IF ERROR ENCOUNTERED 03136 M00S02603.1xy +++| LDN 3 SET BLOCK LENGTH 03137 M00S02604.1xy +++| OAM WTRA,CH OUTPUT BUFFER PARAMETERS 03138 M00S02605.1xy +++| NJN WTR5 IF TRANSFER NOT COMPLETE 03139 M00S02606.1xy +++| WTR1 ADD ON 03140 M00S02607.1xy +++| EJM WTR4,CH IF DATA ACCEPTED 03141 M00S02608.1xy +++| NJN WTR1 IF TIMEOUT NOT COMPLETE 03142 M00S02609.1xy +++| WTR2 DCN CH+40 03143 M00S02610.1xy +++| LCN CHFE INDICATE *CHANNEL FAILURE* ERROR 03144 M00S02611.1xy +++| WTR3 STD EC 03145 M00S02612.1xy +++| WTR4 DCN CH+40 03146 M00S02613.1xy +++| UJP WTRX RETURN 03147 M00S02614.1xy +++| 03148 M00S02615.1xy +++| WTR5 LCN IDTE INDICATE *INCOMPLETE DATA TRANSFER* ERROR 03149 M00S02616.1xy +++| UJN WTR3 PROCESS THE ERROR 03150 M00S02617.1xy +++| 03151 M00S02618.1xy +++| WTRA BSS 0 *T* REGISTER BUFFER 03152 M00S02619.1xy +++| CON 0000 BYTE LENGTH OF I/O TRANSFER 03153 M00S02620.1xy +++| CON 0,0 UEM ADDRESS OF BUFFER 03154 M00S02621.1xy +++| WTC SPACE 4,25 03155 M00S02622.1xy +++|** WTC - WRITE CONTROL INFORMATION TO THE CBT. 03156 M00S02623.1xy +++|* 03157 M00S02624.1xy +++|* THIS ROUTINE WRITES THE LINKAGE BYTES AND SHORT PRU FLAGS 03158 M00S02625.1xy +++|* IN THE CBT ENTRY. 03159 M00S02626.1xy +++|* 03160 M00S02627.1xy +++|* ENTRY (BUFF) = HEADER DATA. 03161 M00S02628.1xy +++|* (UA - UA+1) = UEM ADDRESS. 03162 M00S02629.1xy +++|* 03163 M00S02630.1xy +++|* USES CM - CM+4, T1 - T4. 03164 M00S02631.1xy +++| 03165 M00S02632.1xy +++| 03166 M00S02633.1xy +++| WTC SUBR ENTRY/EXIT 03167 M00S02634.1xy +++| LDN 0 03168 M00S02635.1xy +++| ERRNZ PAD1 CODE DEPENDS ON VALUE 03169 M00S02636.1xy +++| STD T1 03170 M00S02637.1xy +++| LDC BUFF+3-4 03171 M00S02638.1xy +++| STD T2 03172 M00S02639.1xy +++| 03173 M00S02640.1xy +++|* GET SHORT PRU FLAGS, VALID DATA FLAGS AND LINKAGE BYTES FROM 03174 M00S02641.1xy +++|* SECTOR HEADER AND STORE THEM IN THE CBT ENTRY. 03175 M00S02642.1xy +++| 03176 M00S02643.1xy +++| WTC1 LDN 4 ADVANCE SECTOR BUFFER ADDRESS 03177 M00S02644.1xy +++| RAD T2 03178 M00S02645.1xy +++| CCBA PAD1 03179 M00S02646.1xy +++| ADD T1 03180 M00S02647.1xy +++| CRD CM 03181 M00S02648.1xy +++| STD T4 03182 M00S02649.1xy +++| SHN -14 03183 M00S02650.1xy +++| STD T3 03184 M00S02651.1xy +++| LDI T2 STORE SHORT PRU AND VALID DATA FLAGS 03185 M00S02652.1xy +++| STD CM+3 03186 M00S02653.1xy +++| AOD T2 03187 M00S02654.1xy +++| LDI T2 STORE LINKAGE BYTE 03188 M00S02655.1xy +++| STD CM+4 03189 M00S02656.1xy +++| LDD T3 03190 M00S02657.1xy +++| SHN 14 03191 M00S02658.1xy +++| LMD T4 03192 M00S02659.1xy +++| CWD CM 03193 M00S02660.1xy +++| AOD T1 INCREMENT WORD INDEX 03194 M00S02661.1xy +++| LMN PAD4+1 03195 M00S02662.1xy +++| NJN WTC1 IF NOT FINISHED 03196 M00S02663.1xy +++| UJN WTCX RETURN 03197 M00S02664.1xy +++| 1XY SPACE 4,10 03198 M00S02665.1xy +++|* COMMON DECKS. 03199 M00S02666.1xy +++| 03200 M00S02667.1xy +++| 03201 M00S02668.1xy +++|*CALL COMPC2D
Line S00150 Modification History | |
---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03202 M01S00150.ns2769 +++|*CALL COMPIMB 03203 M00S02669.1xy +++| TITLE SPECIAL REQUEST PROCESSORS. 03204 M00S02670.1xy +++| CBD SPACE 4,15 03205 M00S02671.1xy +++|** CBD - CONVERT BINARY CODED DECIMAL TO DISPLAY CODE. 03206 M00S02672.1xy +++|* 03207 M00S02673.1xy +++|* ENTRY (A) = 10/,8/ 2 BCD DIGITS. 03208 M00S02674.1xy +++|* (CM+1) = ADDRESS IN ERRLOG MESSAGE WHERE RESULT IS 03209 M00S02675.1xy +++|* TO BE STORED. 03210 M00S02676.1xy +++|* (CM+2) = ADDRESS IN BML MESSAGE WHERE RESULT IS TO 03211 M00S02677.1xy +++|* BE STORED. 03212 M00S02678.1xy +++|* 03213 M00S02679.1xy +++|* EXIT CONVERTED DIGITS ADDED TO ERRLOG AND BML MESSAGES. 03214 M00S02680.1xy +++|* (CM+1) AND (CM+2) INCREMENTED. 03215 M00S02681.1xy +++|* 03216 M00S02682.1xy +++|* USES T0. 03217 M00S02683.1xy +++| 03218 M00S02684.1xy +++| 03219 M00S02685.1xy +++| CBD SUBR ENTRY/EXIT 03220 M00S02686.1xy +++| LPC 377 UNPACK DIGITS 03221 M00S02687.1xy +++| SHN 16 SAVE HIGH ORDER DIGIT 03222 M00S02688.1xy +++| STD T0 03223 M00S02689.1xy +++| SCN 17 03224 M00S02690.1xy +++| SHN -2 POSITION LOW ORDER DIGIT 03225 M00S02691.1xy +++| LMD T0 MERGE HIGH ORDER DIGIT 03226 M00S02692.1xy +++| SHN 6 03227 M00S02693.1xy +++| ADC 2R00 CONVERT TO DISPLAY CODE 03228 M00S02694.1xy +++| STI CM+1 03229 M00S02695.1xy +++| STI CM+2 03230 M00S02696.1xy +++| AOD CM+1 03231 M00S02697.1xy +++| AOD CM+2 03232 M00S02698.1xy +++| UJN CBDX EXIT 03233 M00S02699.1xy +++| CDD SPACE 4,10 03234 M00S02700.1xy +++|** CDD - CONVERT TWO DIGITS TO DECIMAL DISPLAY CODE. 03235 M00S02701.1xy +++|* 03236 M00S02702.1xy +++|* ENTRY (A) = NUMBER TO CONVERT. 03237 M00S02703.1xy +++|* 03238 M00S02704.1xy +++|* EXIT (A) = DISPLAY CODE VALUE. 03239 M00S02705.1xy +++|* 03240 M00S02706.1xy +++|* USES T0 - T1. 03241 M00S02707.1xy +++| 03242 M00S02708.1xy +++| 03243 M00S02709.1xy +++| CDD2 ADN 10D+1R0 03244 M00S02710.1xy +++| SHN 14 POSITION UNITS 03245 M00S02711.1xy +++| ADD T0 03246 M00S02712.1xy +++| SHN 6 03247 M00S02713.1xy +++| 03248 M00S02714.1xy +++| CDD SUBR ENTRY/EXIT 03249 M00S02715.1xy +++| STD T1 SAVE NUMBER 03250 M00S02716.1xy +++| LDN 1R0 PRESET TENS 03251 M00S02717.1xy +++| STD T0 03252 M00S02718.1xy +++| CDD1 LDD T1 COUNT 10 03253 M00S02719.1xy +++| SBN 10D 03254 M00S02720.1xy +++| MJN CDD2 IF CONVERSION COMPLETE 03255 M00S02721.1xy +++| STD T1 03256 M00S02722.1xy +++| AOD T0 03257 M00S02723.1xy +++| UJN CDD1 LOOP TO END OF CONVERSION 03258 M00S02724.1xy +++| CSD SPACE 4,15 03259 M00S02725.1xy +++|** CSD - CONVERT SIX BCD DIGITS TO DISPLAY CODE. 03260 M00S02726.1xy +++|* 03261 M00S02727.1xy +++|* ENTRY (CM) = ADDRESS OF BCD DIGITS. 03262 M00S02728.1xy +++|* (CM+1) = STARTING ADDRESS IN ERRLOG MESSAGE WHERE 03263 M00S02729.1xy +++|* RESULT IS TO BE STORED. 03264 M00S02730.1xy +++|* (CM+2) = STARTING ADDRESS IN BML MESSAGE WHERE RESULT 03265 M00S02731.1xy +++|* IS TO BE STORED. 03266 M00S02732.1xy +++|* 03267 M00S02733.1xy +++|* EXIT DIGITS ADDED TO ERRLOG AND BML MESSAGES. 03268 M00S02734.1xy +++|* (CM - CM+2) EACH INCREMENTED TO POINT TO THE FIRST 03269 M00S02735.1xy +++|* BYTE AFTER THE ADDED DIGITS. 03270 M00S02736.1xy +++|* 03271 M00S02737.1xy +++|* USES CM. 03272 M00S02738.1xy +++|* 03273 M00S02739.1xy +++|* CALLS CBD. 03274 M00S02740.1xy +++| 03275 M00S02741.1xy +++| 03276 M00S02742.1xy +++| CSD SUBR ENTRY/EXIT 03277 M00S02743.1xy +++| LDI CM CONVERT BCD DIGITS ONE AND TWO 03278 M00S02744.1xy +++| SHN -4 03279 M00S02745.1xy +++| RJM CBD 03280 M00S02746.1xy +++| LDI CM CONVERT BCD DIGITS THREE AND FOUR 03281 M00S02747.1xy +++| LPN 17 03282 M00S02748.1xy +++| SHN 14 03283 M00S02749.1xy +++| LMM 1,CM 03284 M00S02750.1xy +++| SHN -10 03285 M00S02751.1xy +++| RJM CBD 03286 M00S02752.1xy +++| AOD CM 03287 M00S02753.1xy +++| LDI CM CONVERT BCD DIGITS FIVE AND SIX 03288 M00S02754.1xy +++| RJM CBD 03289 M00S02755.1xy +++| AOD CM 03290 M00S02756.1xy +++| UJN CSDX EXIT 03291 M00S02757.1xy +++| FIP SPACE 4,10 03292 M00S02758.1xy +++|*** FIP - FIRMWARE IDENTIFICATION PROCESSOR. 03293 M00S02759.1xy +++|* 03294 M00S02760.1xy +++|* ENTRY (IR+4) = CHANNEL. 03295 M00S02761.1xy +++|* 03296 M00S02762.1xy +++|* EXIT (A) .LT. 0 IF MASS STORAGE ERROR. 03297 M00S02763.1xy +++|*
Line S02764 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03298 M01S02764.271l716 ---|* CALLS CDD, C2D, DFM, GDS.
Line S00035 Modification History | |
---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03299 M01S00035.271l716 +++|* CALLS CDD, DFM, GDS. 03300 M00S02765.1xy +++| 03301 M00S02766.1xy +++| 03302 M00S02767.1xy +++| FIP SUBR ENTRY/EXIT 03303 M00S02768.1xy +++| RJM GDS GET DETAILED STATUS 03304 M00S02769.1xy +++| MJN FIPX IF ERROR
Line S02770 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03305 M01S02770.271l716 ---| 03306 M01S02771.271l716 ---|* ADD CHANNEL NUMBER TO THE ERRLOG AND BML MESSAGES. 03307 M01S02772.271l716 ---| 03308 M01S02773.271l716 ---| LDD IR+4 PUT CHANNEL IN MESSAGE 03309 M01S02774.271l716 ---| STM FIPB+2 03310 M01S02775.271l716 ---| LPN 37 03311 M01S02776.271l716 ---| RJM C2D 03312 M01S02777.271l716 ---| STM FIPA+2 03313 M00S02778.1xy +++| 03314 M00S02779.1xy +++|* ADD REVISION NUMBER TO ERRLOG AND BML MESSAGES. 03315 M00S02780.1xy +++| 03316 M00S02781.1xy +++| LDM DST+20 03317 M00S02782.1xy +++| SHN -6 03318 M00S02783.1xy +++| LPN 17 03319 M00S02784.1xy +++| RJM CDD
Line S02785 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03320 M01S02785.271l716 ---| STM FIPA+7
Line S00036 Modification History | |
---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03321 M01S00036.271l716 +++| STM FIPA+6 03322 M00S02786.1xy +++| STM FIPB+11 03323 M00S02787.1xy +++| LDC FIPA+ERLN+400000 ISSUE ERRLOG MESSAGE 03324 M00S02788.1xy +++| RJM DFM 03325 M00S02789.1xy +++| LDC FIPBL SET BML MESSAGE LENGTH 03326 M00S02790.1xy +++| STD CM+1 03327 M00S02791.1xy +++| LDC FIPB+BMLN+400000 ISSUE BML MESSAGE 03328 M00S02792.1xy +++| RJM DFM 03329 M00S02793.1xy +++| LJM FIPX RETURN 03330 M00S02794.1xy +++|
Line S02795 Modification History | |
---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03331 M01S02795.271l716 ---| FIPA DATA C* CCH00,MA464-D00.*
Line S00037 Modification History | |
---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03332 M01S00037.271l716 +++| FIPA DATA C*CH00 MA464-D00.* 03333 M00S02796.1xy +++| 03334 M00S02797.1xy +++| FIPB CON DM0401 MESSAGE ID 03335 M00S02798.1xy +++| CON HI0101 MESSAGE SYMPTOM 03336 M00S02799.1xy +++| CON 0 CHANNEL (OCTAL) 03337 M00S02800.1xy +++| CON 0 03338 M00S02801.1xy +++| CON 0 RESERVED FOR CDC 03339 M00S02802.1xy +++| DATA 10A MA464-DYY FIRMWARE REVISION LEVEL (DISPLAY CODE) 03340 M00S02803.1xy +++| FIPBL EQU *-FIPB BML MESSAGE LENGTH 03341 M00S02804.1xy +++| FLT SPACE 4,10 03342 M00S02805.1xy +++|** FLT - FLAW LOGICAL TRACK. 03343 M00S02806.1xy +++|* 03344 M00S02807.1xy +++|* ENTRY (T5) = EST ORDINAL. 03345 M00S02808.1xy +++|* (T6) = LOGICAL TRACK. 03346 M00S02809.1xy +++|* 03347 M00S02810.1xy +++|* EXIT LOGICAL TRACK FLAWED IF WITHIN TRT. 03348 M00S02811.1xy +++|* 03349 M00S02812.1xy +++|* USES CM+1 - CM+3. 03350 M00S02813.1xy +++|* 03351 M00S02814.1xy +++|* MACROS MONITOR. 03352 M00S02815.1xy +++| 03353 M00S02816.1xy +++| 03354 M00S02817.1xy +++| FLT SUBR ENTRY/EXIT 03355 M00S02818.1xy +++| LDD T6 CHECK IF TRACK WITHIN TRT 03356 M00S02819.1xy +++| STD CM+2 03357 M00S02820.1xy +++| ADC -NTDC NUMBER OF TRACKS 03358 M00S02821.1xy +++| PJN FLTX IF BEYOND TRT 03359 M00S02822.1xy +++| LDN STFS SELECT TRACK FLAW FUNCTION
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/1xy.001.txt ยท Last modified: by 127.0.0.1