Routine: APSP1008

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),! Line Location: APSP1008+3
Function Call: WRITE	Prompt: ?10,$S('XT3:"Routine not in UCI",XT3'=Y:"Calculated "_$C(7)_Y_", off by "_(Y-XT3),1:"ok") Line Location: CONT+0
Function Call: WRITE	Prompt: !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),! Line Location: ONE+0
Function Call: WRITE	Prompt: !,"Check a subset of routines:" Line Location: ONE+1
Function Call: WRITE	Prompt: ! Line Location: ONE+2

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RSEL"	ONE+1
^%ZOSF("RSUM"	CONT
^%ZOSF("TEST"	CONT
^UTILITY($J	ONE+1!