Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ZOSVKSOS

Package: Kernel

Routine: ZOSVKSOS Platform: Cache


Information

%ZOSVKSS ;OAK/KAK - Automatic INTEGRIT Routine (cont.) (Cache) ;5/9/07 10:44

Source Information

Source file <ZOSVKSOS.m>

Entry Points

Name Comments DBIA/ICR reference
RESTART ;-- called by routine C+6^%ZOSVKSE
;
CHK
CHKB
END
ERR ;-- code from routine CHECK0
ERROR
CM(X)
MB
CHECK1 ;-- code from routine CHECK1
CH
ER1 ; error: the first node in block D is $V(1,-5) and it should collate after the previous block's last node, which was LNP
ER3 ; error: pointer block BLK has a first pointer of C(1) [ The node is SUB(1) ] but the link from the previous lower level block is $P(A,",",3)#16777216
ER5 ; block B+D, which is pointed to by block BLK appears to be available in map block D - checking of this global will continue
ER6 ; error: pointer block BLK should have had a right link
; V BLK F I=1:2 Q:$V(I,-6)=""
; according to the lower level block $V(I-1,-5), which had a link to block $P(A,",",3)#16777216
ER7 ; error: the 1st byte of block D should have been zero - the pointer block was BLK
ER8 ; error: the lower block's first node didn't match the pointer node - node E+1\2 in pointer block BLK was: SUB(E) - the 1st node in the lower level block D was: $V(1,-5)
ER9 ; error: the link in block D is LL although the pointer block BLK specifies that C(E+2) should be the next block
ER10 ; error: node I+1\2 in block BLK points to itself - the node is: SUB(I)
ER12 ; error: block D, which is pointed to by pointer block BLK has a block type of $V(2043,0,1) whereas a block type of TL was expected
ER15 ; error: map block D does not have a correct map label - the pointer block was BLK
ER16 ; block D, which is pointed to by pointer block BLK has a block type of $V(2043,0,1) whereas a block type of 8 was expected since the pointer block say big data nodes are not present
; checking of this global will continue if $V(2043,0,1)=12
ER17 ; block D, which is pointed to by pointer block BLK has a block type of $V(2043,0,1),whereas a block type of 12 was expected since the pointer block says big data nodes are present
; checking of this global will continue if $V(2043,0,1)=8
ER18 ; node J+1\2 in big data block C(I), which is pointed to by block BLK says number of data blocks is N, but length of node is $L(X) rather than L
; this big string node will not be checked - checking of this global will continue
ER19 ; node J+1\2 in big data block C(I), which is pointed to by block BLK says it has R bytes in last block, which is illegal - checking of this global will continue
ER20 ; node J+1\2 in big data block C(I), which is pointed to by block BLK has data block BL which is also used as data block $P(B(BL-B,B),",",3) in node $P(B(BL-B,B),",",2)+1\2 of block $P(B(BL-B,B),",",1)
; checking of this global will continue
ERDK ; if D-BL error in lower block D - pointer block is BLK
; else error in pointer block D - last node in prev pntr block was LNP
MISC ; misc error

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "# ptrs = "_NP
  • Line Location: END+2
Function Call: WRITE
  • Prompt: ", # blks = "_(NBLK+LNBLK)_", # ptrs/blk = "_(NP\(NBLK+LNBLK))
  • Line Location: END+7
Function Call: WRITE
  • Prompt: ", eff = "_(((NBYTE+LNBYTE)*100)\((2036*NBLK)+(2048*LNBLK)))_"%"
  • Line Location: END+8
Function Call: WRITE
  • Prompt: "Routine level: # rtns = "_NP
  • Line Location: END+13
Function Call: WRITE
  • Prompt: "Data level: # blks = "_NP_", eff = "
  • Line Location: END+17
Function Call: WRITE
  • Prompt: (NB*100\(2036*NP))_"%"
  • Condition for execution: NP
  • Line Location: END+17
Function Call: WRITE
  • Prompt: "Long String level: # blks = "_LSNP_",eff = "
  • Line Location: END+19
Function Call: WRITE
  • Prompt: (LNB*100\(2048*LSNP))_"%"
  • Condition for execution: LSNP
  • Line Location: END+19
Info |  Source |  Entry Points |  Interaction Calls