Routine: APCHS2J

Name	Line Occurrences
Function Call: WRITE	Prompt: APCHSET,! Line Location: PAST+5
Function Call: WRITE	Prompt: APCHSET,! Line Location: PEND+1
Function Call: WRITE	Prompt: ?20,APCHSVNT,! Line Location: ONEVIS+12
Function Call: WRITE	Prompt: APCHSET,! Line Location: L1+0
Function Call: WRITE	Prompt: ?2,APCHSDAT,?11,APCHSVT,APCHSAM,?20,APCHSCN Line Location: L1+1
Function Call: WRITE	Prompt: " (",APCHSTST,")" Condition for execution: APCHSTST]"" Line Location: L1+1
Function Call: WRITE	Prompt: ?37,"* DNKA *" Condition for execution: $P(APCHSN,U,2)["N" Line Location: L1+2
Function Call: WRITE	Prompt: ! Line Location: L1+2

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SCHENC+2, SCHENC+5, SCHENC+6, PAST+3, PEND+2, ONEVIS
^SC - [#44]	ONEVIS+7, ONEVIS+9
^TMP($J	PAST+1!, PAST+4, PAST+6, PAST+7!, ADDONE+1*, ADDONE+2!

Name	Field # of Occurrence
^(	PAST+6, ADDONE+2!, ONEVIS+9
^(0	ONEVIS+9

Name	Field # of Occurrence
>> APCHSAM	ONEVIS+3, ONEVIS+5, L1+1
>> APCHSBRK	SCHENC+3
>> APCHSCKP	SCHENC+3, PAST+5, PEND+1, ONEVIS+12, L1
APCHSCN	SCHENCX!, ONEVIS+7*, L1+1
APCHSCP	SCHENCX!, ONEVIS+7*, ONEVIS+9
>> APCHSCVD	ONEVIS+4
APCHSDAT	SCHENCX!, PAST+2, PEND+2, ONEVIS+4, L1, L1+1
>> APCHSDLM	PAST+2
APCHSET	SCHENCX!, PAST+5, PEND+1, L1
APCHSHP	SCHENCX!
APCHSI	SCHENC+5, SCHENCX!, PAST+2, ADDONE+1, ADDONE+2, ONEVIS+6, ONEVIS+10
APCHSIVD	SCHENCX!, PAST+6, ADDONE, ADDONE+1
APCHSJ	SCHENCX!, ADDONE+2, ONEVIS+6, ONEVIS+10*
APCHSN	SCHENCX!, ONEVIS*, ONEVIS+1, ONEVIS+2, ONEVIS+6, ONEVIS+7, ONEVIS+10, L1+2
>> APCHSNDM	ADDONE+2, ONEVIS+4*
>> APCHSNPG	SCHENC+3, ONEVIS+12, L1
>> APCHSPAT	SCHENC+2, SCHENC+5, SCHENC+6, PAST+3, PEND+2, ONEVIS, ONEVIS+9
APCHSPVD	SCHENCX!, ONEVIS+4*, L1
>> APCHSQ	PAST+3, PAST+6, PEND+2, ONEVIS+9
>> APCHSQIT	SCHENC+3, PAST+5, PAST+6, PEND+1, PEND+2, ONEVIS+12, L1
APCHSTST	SCHENCX!, ONEVIS+6, ONEVIS+8, ONEVIS+9, ONEVIS+10, L1+1
APCHSVD1	SCHENCX!, PAST+2*, PAST+3
APCHSVDT	SCHENCX!, PAST+3, PAST+6, ADDONE, ADDONE+1, PEND+2*, ONEVIS, ONEVIS+4, ONEVIS+5, ONEVIS+9
APCHSVN	SCHENCX!, ONEVIS+9*
APCHSVNT	SCHENCX!, ONEVIS+8, ONEVIS+9, ONEVIS+12
APCHSVT	SCHENCX!, ONEVIS+5*, L1+1
DT	SCHENC+5, SCHENC+6, PAST+3, PEND+2
U	ONEVIS+1, ONEVIS+2, ONEVIS+6, ONEVIS+7, ONEVIS+9, ONEVIS+10, L1+2
Y	SCHENCX!, ONEVIS+4*

Information

Name	Comments	DBIA/ICR reference
SCHENC	; ********** SCHEDULED ENCOUNTERS * 2/44 W/ CHART REQ AND WALK INS********** ; <SETUP>
ONEVIS
ADDONE
PAST	;
PEND	;
L1
SCHENCX