Routine: SCAPU1

Package	Total	Call Graph
VA Fileman	2	BLD^DIALOG $$GET1^DIQ
Authorization Subscription	1	$$SUBCLASS^USRLM
Scheduling	1	INIT^SCAPMCU1

Package

Total

Call Graph

BLD^DIALOG $$GET1^DIQ

$$SUBCLASS^USRLM

INIT^SCAPMCU1

Package	Total	Caller Graph
Scheduling	23	SCAPMC1 SCAPMC11 SCAPMC12 SCAPMC13 SCAPMC2 SCAPMC23 SCAPMC24 SCAPMC25 SCAPMC26 SCAPMC29 SCAPMC3 SCAPMC30 SCAPMC34 SCAPMC4 SCAPMC5 SCAPMC8 SCAPMC8C SCAPMC8P SCAPMC9 SCAPMCU1 SCMCCV6 SCMCLK SCMCTSK1

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
QTOKUSR
DTCHKQ
OKUSRCL(USRARRAY,CHECK)	; see if input user class array says 'check' is ok
ERR(SEQ,ERNUM,PARMS,OUTPUT,SCER)	;-- process errors
DTCHK(BEGINDT,ENDDT,INCL,ACTDT,INACTDT)	; -- given activation/inactivation dates and begin & end dates and include flag was it active?
DTCHK2(SCDATES,ACTDT,INACTDT)	;given scdates array was it active?
OKARRAY(ARRAY,CHECK)	; see if input array says 'check' should be used ; DOES NOT change any varriables - $$okarray(.xx,.yy) is safe... ; if array is null OR undefined it is ok ; if @array@(check) is defined it is ok ; if @array@('exclude') is defined results switch ; RETURNS: 1: Yes use/0: No don't

FileNo	Call Tags
^DI(.84 - [#.84]	GET1^DIQ

Name	Line Occurrences
$$DTCHK	DTCHK2+3
DTCHKQ	DTCHK+13, DTCHK+16, DTCHK+18, DTCHK+20, DTCHK+22, DTCHK+24
QTOKUSR	OKUSRCL+3, OKUSRCL+4

Name	Field # of Occurrence
ACTDT	DTCHK2~, DTCHK2+3, DTCHK~, DTCHK+13, DTCHK+18, DTCHK+22
ARRAY	OKARRAY~, OKARRAY+6
BEGINDT	DTCHK~, DTCHK+13, DTCHK+16, DTCHK+22
CHECK	OKARRAY~, OKARRAY+6, OKUSRCL~, OKUSRCL+3, OKUSRCL+8, OKUSRCL+11
ENDDT	DTCHK~, DTCHK+13, DTCHK+18, DTCHK+24
ERNUM	ERR~, ERR+2, ERR+3, ERR+6, ERR+7
INACTDT	DTCHK2~, DTCHK2+3, DTCHK~, DTCHK+16, DTCHK+24
INCL	DTCHK~, DTCHK+20
OK	DTCHK+11~, DTCHK+12, DTCHK+14, DTCHK+20, DTCHK+25, DTCHKQ
OUTPUT	ERR~, ERR+7
PARMS	ERR~, ERR+7
SCBEGIN	DTCHK2+1~, DTCHK2+3
SCDATES	DTCHK2~
SCEND	DTCHK2+1~, DTCHK2+3
SCER	ERR~, ERR+4, ERR+7
SCER(	ERR+6*
SCINCL	DTCHK2+1~, DTCHK2+3
SCOK	OKUSRCL+1~, OKUSRCL+2, OKUSRCL+3, OKUSRCL+7, OKUSRCL+8, OKUSRCL+10, OKUSRCL+11, QTOKUSR
SCU	OKUSRCL+1~, OKUSRCL+5, OKUSRCL+8, OKUSRCL+11*
SEQ	ERR~, ERR+5*, ERR+6
USRARRAY	OKUSRCL~, OKUSRCL+3, OKUSRCL+4, OKUSRCL+6, OKUSRCL+8, OKUSRCL+11

Information