User Tools

Site Tools


cdc:nos2.source:opl.opl871:common:comktsa

Common COMKTSA

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.comktsa +++|          CTEXT  COMKTSA - TASK SYSTEM AREA DEFINITIONS.
00002  M00S00002.comktsa +++|          SPACE  4,10
00003  M00S00003.comktsa +++|          BASE   DECIMAL
Line S00004 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00004  M01S00004.281l803 ---|*         COMMENT  COPYRIGHT CONTROL DATA CORPORATION.  1980.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00005  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00006  M00S00005.comktsa +++| TSA      SPACE  4,10
00007  M00S00006.comktsa +++|***       TSA - TASK SYSTEM AREA DEFINITIONS.
00008  M00S00007.comktsa +++|*         G. W. PROPP.  80/04/15.
00009  M00S00008.comktsa +++| TSA      SPACE  4,10
00010  M00S00009.comktsa +++|***       *COMKTSA* PROVIDES THE DEFINITONS OF THE TASK SYSTEM AREA.
00011  M00S00010.comktsa +++|*         THE TASK SYSTEM AREA IS LOCATED IN NEGATIVE FIELD LENGTH
00012  M00S00011.comktsa +++|*         PRIOR TO THE RA OF THE TASK.  THIS DECK REQUIRES *COMKFLD*
00013  M00S00012.comktsa +++|*         AND *COMKSCD*.
00014  M00S00013.comktsa +++|          SPACE  4,10
00015  M00S00014.comktsa +++|*         TTSA - TABLE OF TASK SYSTEM AREA.
00016  M00S00015.comktsa +++|
00017  M00S00016.comktsa +++| TTSA     BSS    0           TABLE OF TASK SYSTEM AREA
00018  M00S00017.comktsa +++|          LOC    0
00019  M00S00018.comktsa +++| XJPC     BSS    20B         XJP PACKAGE
00020  M00S00019.comktsa +++| TSAC     BSS    0
00021  M00S00020.comktsa +++|          VFD    18/0
00022  M00S00021.comktsa +++|          VFD    12/0        TIME LIMIT IN XJP UNITS
00023  M00S00022.comktsa +++|          VFD    18/0
00024  M00S00023.comktsa +++|          VFD    12/0        TIME COUNT IN XJP UNITS
00025  M00S00024.comktsa +++|
00026  M00S00025.comktsa +++| ERXC     BSS    0           ERROR RETRY ADDRESS
00027  M00S00026.comktsa +++| ERRC     BSS    0           ERROR CODE
00028  M00S00027.comktsa +++|          VFD    24/0
00029  M00S00028.comktsa +++|          VFD    18/0        ERROR RETRY ADDRESS
00030  M00S00029.comktsa +++|          VFD    18/0        ERROR CODE
00031  M00S00030.comktsa +++|
00032  M00S00031.comktsa +++| RA1C     BSS    0
00033  M00S00032.comktsa +++|          VFD    12/0
00034  M00S00033.comktsa +++|          VFD    18/0        USER DEFINED I/O LIMIT
00035  M00S00034.comktsa +++|          VFD    12/0
00036  M00S00035.comktsa +++|          VFD    18/0        RA+1 COUNT
00037  M00S00036.comktsa +++|
00038  M00S00037.comktsa +++| BWCC     BSS    1           TASK BRANCH COUNT
00039  M00S00038.comktsa +++| TOWC     BSS    1           TERMINAL OUTPUT WORD COUNT
00040  M00S00039.comktsa +++| ROWC     BSS    1           WORDS OF TERMINAL OUTPUT SINCE ROLLOUT
00041  M00S00040.comktsa +++| SCRC     BSS    2           SCRATCH STORAGE
00042  M00S00041.comktsa +++| CB1C     BSS    1           COMMUNICATION BLOCK WORD 1
00043  M00S00042.comktsa +++| CB2C     BSS    1           COMMUNICATION BLOCK WORD 2
00044  M00S00043.comktsa +++| LRA1     BSS    1           LAST RA+1 CALL
00045  M00S00044.comktsa +++| RCL      BSS    1           RECALL STATUS WORD 1
00046  M00S00045.comktsa +++| RCLA     BSS    1           RECALL STATUS WORD 2
00047  M00S00046.comktsa +++|          BSS    2           WORKING STORAGE FOR RECOVERY PROCESSING
00048  M00S00047.comktsa +++| DMEC     BSS    1           DATA MANAGER ERROR CODE
00049  M00S00048.comktsa +++| JTSC     BSS    1           TASK ADDRESS OF START OF JOURNAL DATA
00050  M00S00049.comktsa +++|          BSS    3           WORDS DESTROYED BY JOURNAL FILE HEADER
00051  M00S00050.comktsa +++| DBNC     BSS    1           DATA BASE VALIDATION WORD
00052  M00S00051.comktsa +++| ROSC     BSS    1           ADDRESS OF ROLLOUT TABLE ENTRY
00053  M00S00052.comktsa +++| RTSC     BSS    1           REQUESTED TASK CHAIN OF FIRST *CALLRTN*
00054  M00S00053.comktsa +++| RRSC     BSS    2           ROLLOUT FILE RESERVATION BIT MASK
00055  M00S00054.comktsa +++| ORTC     BSS    2           PREVIOUS ROLLOUT TABLE ENTRY *CALLRTN*
00056  M00S00055.comktsa +++| RSCC     BSS    2+CPACL     SUBCP TABLE SAVE AREA
00057  M00S00056.comktsa +++| RSIC     BSS    1           WAITING ON *SIC* CHAIN WORD
00058  M00S00057.comktsa +++| TOTC     BSS    1           *TOTAL* DATA MANAGER STATUS WORD
00059  M00S00058.comktsa +++| AAMC     BSS    1           *AAM* FILE MANAGER STATUS WORD
00060  M00S00059.comktsa +++| CDFN     BSS    1           *CDCS* REQUEST IMAGE
00061  M00S00060.comktsa +++| WICB     BSS    4           *WAITINP* C.B. W3-W6 IMAGES
00062  M00S00061.comktsa +++| TSQN     BSS    1           QUARTER NANO-UNITS USED BY TASK
00063  M00S00062.comktsa +++| SECR     BSS    1           WORD 1 OF *SEND* REQUEST FOR *SECURE*
00064  M00S00063.comktsa +++| SECT     BSS    1           WORD 2 OF *SEND* REQUEST FOR *SECURE*
00065  M00S00064.comktsa +++| SECH     BSS    1           WORD 3 OF *SEND* REQUEST FOR *SECURE*
00066  M00S00065.comktsa +++| SECS     BSS    1           WORD 4 OF *SEND* REQUEST FOR *SECURE*
00067  M00S00066.comktsa +++| SML1     BSS    1           LAST WORD OF *SECURE* MESSAGE
00068  M00S00067.comktsa +++| SML2     BSS    1           LAST WORD PLUS ONE OF *SECURE* MESSAGE
00069  M00S00068.comktsa +++| SML3     BSS    1           LENGTH OF *SECURE* MESSAGE IN WORDS
00070  M00S00069.comktsa +++| RERU     BSS    1           *RERUN* REQUEST PARAMETERS
00071  M00S00070.comktsa +++| TRID     BSS    1           TRANSACTION IDENTIFIER FOR *TINVOKE*
00072  M00S00071.comktsa +++| RWTS     BSS    1           RETURN ADDRESS FROM *WFP*
00073  M00S00072.comktsa +++|          BSS    113B-*      INSURE *BCTN* IS IN WORD 113B
00074  M00S00073.comktsa +++| BCTN     BSS    1           TASK NAME FOR BATCH JOB
00075  M00S00074.comktsa +++|          ERRNZ  BCTN-113B   INSURE BCTN IS IN WORD 113B
00076  M00S00075.comktsa +++| BCTA     BSS    1           BATCH CONCURRENCY TABLE ADDRESS
00077  M00S00076.comktsa +++|          LOC    *O
00078  M00S00077.comktsa +++| .1       SET    *-TTSA+7    COMPUTE LENGTH OF TASK SYSTEM AREA
00079  M00S00078.comktsa +++| .2       SET    .1/10B
00080  M00S00079.comktsa +++| NUAPL    EQU    .2*10B      LENGTH OF TASK NEGATIVE FL
00081  M00S00080.comktsa +++|
00082  M00S00081.comktsa +++|          BASE   *
00083  M00S00082.comktsa +++|          ENDX
cdc/nos2.source/opl.opl871/common/comktsa.txt ยท Last modified: by 127.0.0.1