User Tools

Site Tools


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

Common COMKTSA

1 Modification

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.comktsa +++|          CTEXT  COMKTSA - TASK SYSTEM AREA DEFINITIONS.
00002  M01S00002.comktsa +++|          SPACE  4,10
00003  M01S00003.comktsa +++|          BASE   DECIMAL
Line S00004 Modification History
M01 (Added by) comktsa
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00004  M02S00004.281l803 ---|*         COMMENT  COPYRIGHT CONTROL DATA CORPORATION.  1980.
00005  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00006  M01S00005.comktsa +++| TSA      SPACE  4,10
00007  M01S00006.comktsa +++|***       TSA - TASK SYSTEM AREA DEFINITIONS.
00008  M01S00007.comktsa +++|*         G. W. PROPP.  80/04/15.
00009  M01S00008.comktsa +++| TSA      SPACE  4,10
00010  M01S00009.comktsa +++|***       *COMKTSA* PROVIDES THE DEFINITONS OF THE TASK SYSTEM AREA.
00011  M01S00010.comktsa +++|*         THE TASK SYSTEM AREA IS LOCATED IN NEGATIVE FIELD LENGTH
00012  M01S00011.comktsa +++|*         PRIOR TO THE RA OF THE TASK.  THIS DECK REQUIRES *COMKFLD*
00013  M01S00012.comktsa +++|*         AND *COMKSCD*.
00014  M01S00013.comktsa +++|          SPACE  4,10
00015  M01S00014.comktsa +++|*         TTSA - TABLE OF TASK SYSTEM AREA.
00016  M01S00015.comktsa +++|
00017  M01S00016.comktsa +++| TTSA     BSS    0           TABLE OF TASK SYSTEM AREA
00018  M01S00017.comktsa +++|          LOC    0
00019  M01S00018.comktsa +++| XJPC     BSS    20B         XJP PACKAGE
00020  M01S00019.comktsa +++| TSAC     BSS    0
00021  M01S00020.comktsa +++|          VFD    18/0
00022  M01S00021.comktsa +++|          VFD    12/0        TIME LIMIT IN XJP UNITS
00023  M01S00022.comktsa +++|          VFD    18/0
00024  M01S00023.comktsa +++|          VFD    12/0        TIME COUNT IN XJP UNITS
00025  M01S00024.comktsa +++|
00026  M01S00025.comktsa +++| ERXC     BSS    0           ERROR RETRY ADDRESS
00027  M01S00026.comktsa +++| ERRC     BSS    0           ERROR CODE
00028  M01S00027.comktsa +++|          VFD    24/0
00029  M01S00028.comktsa +++|          VFD    18/0        ERROR RETRY ADDRESS
00030  M01S00029.comktsa +++|          VFD    18/0        ERROR CODE
00031  M01S00030.comktsa +++|
00032  M01S00031.comktsa +++| RA1C     BSS    0
00033  M01S00032.comktsa +++|          VFD    12/0
00034  M01S00033.comktsa +++|          VFD    18/0        USER DEFINED I/O LIMIT
00035  M01S00034.comktsa +++|          VFD    12/0
00036  M01S00035.comktsa +++|          VFD    18/0        RA+1 COUNT
00037  M01S00036.comktsa +++|
00038  M01S00037.comktsa +++| BWCC     BSS    1           TASK BRANCH COUNT
00039  M01S00038.comktsa +++| TOWC     BSS    1           TERMINAL OUTPUT WORD COUNT
00040  M01S00039.comktsa +++| ROWC     BSS    1           WORDS OF TERMINAL OUTPUT SINCE ROLLOUT
00041  M01S00040.comktsa +++| SCRC     BSS    2           SCRATCH STORAGE
00042  M01S00041.comktsa +++| CB1C     BSS    1           COMMUNICATION BLOCK WORD 1
00043  M01S00042.comktsa +++| CB2C     BSS    1           COMMUNICATION BLOCK WORD 2
00044  M01S00043.comktsa +++| LRA1     BSS    1           LAST RA+1 CALL
00045  M01S00044.comktsa +++| RCL      BSS    1           RECALL STATUS WORD 1
00046  M01S00045.comktsa +++| RCLA     BSS    1           RECALL STATUS WORD 2
00047  M01S00046.comktsa +++|          BSS    2           WORKING STORAGE FOR RECOVERY PROCESSING
00048  M01S00047.comktsa +++| DMEC     BSS    1           DATA MANAGER ERROR CODE
00049  M01S00048.comktsa +++| JTSC     BSS    1           TASK ADDRESS OF START OF JOURNAL DATA
00050  M01S00049.comktsa +++|          BSS    3           WORDS DESTROYED BY JOURNAL FILE HEADER
00051  M01S00050.comktsa +++| DBNC     BSS    1           DATA BASE VALIDATION WORD
00052  M01S00051.comktsa +++| ROSC     BSS    1           ADDRESS OF ROLLOUT TABLE ENTRY
00053  M01S00052.comktsa +++| RTSC     BSS    1           REQUESTED TASK CHAIN OF FIRST *CALLRTN*
00054  M01S00053.comktsa +++| RRSC     BSS    2           ROLLOUT FILE RESERVATION BIT MASK
00055  M01S00054.comktsa +++| ORTC     BSS    2           PREVIOUS ROLLOUT TABLE ENTRY *CALLRTN*
00056  M01S00055.comktsa +++| RSCC     BSS    2+CPACL     SUBCP TABLE SAVE AREA
00057  M01S00056.comktsa +++| RSIC     BSS    1           WAITING ON *SIC* CHAIN WORD
00058  M01S00057.comktsa +++| TOTC     BSS    1           *TOTAL* DATA MANAGER STATUS WORD
00059  M01S00058.comktsa +++| AAMC     BSS    1           *AAM* FILE MANAGER STATUS WORD
00060  M01S00059.comktsa +++| CDFN     BSS    1           *CDCS* REQUEST IMAGE
00061  M01S00060.comktsa +++| WICB     BSS    4           *WAITINP* C.B. W3-W6 IMAGES
00062  M01S00061.comktsa +++| TSQN     BSS    1           QUARTER NANO-UNITS USED BY TASK
00063  M01S00062.comktsa +++| SECR     BSS    1           WORD 1 OF *SEND* REQUEST FOR *SECURE*
00064  M01S00063.comktsa +++| SECT     BSS    1           WORD 2 OF *SEND* REQUEST FOR *SECURE*
00065  M01S00064.comktsa +++| SECH     BSS    1           WORD 3 OF *SEND* REQUEST FOR *SECURE*
00066  M01S00065.comktsa +++| SECS     BSS    1           WORD 4 OF *SEND* REQUEST FOR *SECURE*
00067  M01S00066.comktsa +++| SML1     BSS    1           LAST WORD OF *SECURE* MESSAGE
00068  M01S00067.comktsa +++| SML2     BSS    1           LAST WORD PLUS ONE OF *SECURE* MESSAGE
00069  M01S00068.comktsa +++| SML3     BSS    1           LENGTH OF *SECURE* MESSAGE IN WORDS
00070  M01S00069.comktsa +++| RERU     BSS    1           *RERUN* REQUEST PARAMETERS
00071  M01S00070.comktsa +++| TRID     BSS    1           TRANSACTION IDENTIFIER FOR *TINVOKE*
00072  M01S00071.comktsa +++| RWTS     BSS    1           RETURN ADDRESS FROM *WFP*
00073  M01S00072.comktsa +++|          BSS    113B-*      INSURE *BCTN* IS IN WORD 113B
00074  M01S00073.comktsa +++| BCTN     BSS    1           TASK NAME FOR BATCH JOB
00075  M01S00074.comktsa +++|          ERRNZ  BCTN-113B   INSURE BCTN IS IN WORD 113B
00076  M01S00075.comktsa +++| BCTA     BSS    1           BATCH CONCURRENCY TABLE ADDRESS
00077  M01S00076.comktsa +++|          LOC    *O
00078  M01S00077.comktsa +++| .1       SET    *-TTSA+7    COMPUTE LENGTH OF TASK SYSTEM AREA
00079  M01S00078.comktsa +++| .2       SET    .1/10B
00080  M01S00079.comktsa +++| NUAPL    EQU    .2*10B      LENGTH OF TASK NEGATIVE FL
00081  M01S00080.comktsa +++|
00082  M01S00081.comktsa +++|          BASE   *
00083  M01S00082.comktsa +++|          ENDX
cdc/nos2.source/opl.opl871/common/comktsa.txt ยท Last modified: by 127.0.0.1