Routine: SDSCUTL

Package	Total	Call Graph
VA Fileman	4	FILE^DICN FILE^DIE $$IENS^DILF ^DIR
Registration	3	^DGSEC (DEM,KVA)^VADPT FULL^VALM1
Integrated Billing	2	$$INSUR^IBBAPI ($$FIRST,$$THIRD)^IBRSUTL
Scheduling	2	$$GETOE^SDOE $$SC^SDSCAPI

Package	Total	Caller Graph
Scheduling	14	SDSCAPI SDSCCHK SDSCCLM SDSCEDT SDSCLST SDSCMSR SDSCNSCP SDSCOMP SDSCPRV SDSCRP1 SDSCRP2 SDSCRPT1 SDSCSSD SDSCUSR

Entry Points

Name	Comments	DBIA/ICR reference
CONT	; Standard press RETURN to continue prompt.
SCHNG(SDOE)	;Checks if a completed encounter SC value was changed.
ANCPKG(SCEIEN)	;check if visit came from an ancillary package & if to continue
NBTP(SDOE)	; Is third-party non-billable based on either clinic, stop code, or patient?
SCSEL()	;Prompts for the type of service connection records to review. ; Input: No input required ; Output: 1 - SC, 0 - NSC, 2 - All and "" (null)
NCTCL(SDCLIN)	;Checks if a non-count clinic
NBFP(SDOE)	; Is first-party non-billable based on either clinic, stop code, or patient?
SRV	; Ask for Clinic Service
UNLOCK(SCIEN)	;Unlocks an ASCD record. ; This function releases the lock on an ASCD record created by $$LOCK. ; Input: SCIEN - IEN of record in file #409.48
LOCK(SCIEN)	;Locks an ASCD record. ; This function locks an ASCD so as to prevent another process from ; editing the same record. ; Input: SCIEN - IEN of record in file #409.48
DIV	; Ask for Division
TYPE	; Select proper user type based on security key. ; called by routines: SDSCEDT,SDSCLST,SDSCMSR,SDSCRP1,SDSCSSD ; sets variables: SDTYPE,SDSCTAT,SDOPT,SDSCCR ; (should be killed by calling routines)
SENS(SDFN,SDFLG)	; Check for Sensitive Patient ; Input ; SDFN - Patient IEN ; SDFLG - '1' if called from ListMan edit ; - '0' if called from roll-and-scroll ; Returns ; '0' - OK to view (patient is not sensitive, user has key, or answered 'OK') ; '1' - not OK to view patient (patient is sensitive, user does not have key and answered 'NO')
STEDT(SDOE,SDTYPE,SDRFLG,SDSCC)	; Store the TRACK EDITS multiple for encounter ; Input: ; SDOE - Encounter IEN ; SDTYPE - Type of User - (Supervisor, Clinician, User) ; SDRFLG - Review flag var ; SDSCC - visit file service connected value (1/0)

External References

Name	Field # of Occurrence
^DGSEC	SENS+17
FILE^DICN	STEDT+17
FILE^DIE	STEDT+28, STEDT+37
$$IENS^DILF	STEDT+20
^DIR	SENS+21, CONT+4, ANCPKG+11, SCSEL+7
$$INSUR^IBBAPI	NBTP+6
$$FIRST^IBRSUTL	NBFP+4
$$THIRD^IBRSUTL	NBTP+4
$$GETOE^SDOE	NBFP+3, NBTP+3, ANCPKG+3
$$SC^SDSCAPI	STEDT+35
DEM^VADPT	SENS+13
KVA^VADPT	SENS+22
FULL^VALM1	SENS+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$E(VADM(1),1,25)_" ("_$E($P(VADM(2),U),6,9)_")",!! Line Location: SENS+14
Function Call: WRITE	Prompt: ! Line Location: SENS+21
Function Call: WRITE	Prompt: @IOF,!,"Encounter ",SDOE," (cont'd)" Line Location: CONT+6
Function Call: WRITE	Prompt: $C(7) Line Location: ANCPKG+5
Function Call: WRITE	Prompt: !,"Service Connected Encounters Review Selection" Line Location: SCSEL+4
Routine Call	DIE Line Location: STEDT+28 STEDT+37
Routine Call	DIR Line Location: SENS+21 CONT+4 ANCPKG+11 SCSEL+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	ANCPKG+4
^DG(40.8 - [#40.8]	DIV+3, DIV+4
^DGSL(38.1 - [#38.1]	SENS+11
^SC - [#44]	NCTCL+1
^SDSC(409.48 - [#409.48]	STEDT+12*, STEDT+13, SCHNG+7, LOCK+7, UNLOCK+6
^XUSEC("DG SENSITIVITY"	SENS+19
^XUSEC("SDSC CLINICAL"	TYPE+10
^XUSEC("SDSC SUPER"	TYPE+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	STEDT+11~, STEDT+14*, STEDT+20, ANCPKG+1~
DA(1	STEDT+14*
DD	STEDT+11~, STEDT+16!, STEDT+18!
DFN	SENS+12~, SENS+13*
DIC	SENS+12~, STEDT+11~, STEDT+14*
DIC("P"	STEDT+15*
DIC(0	SENS+16, STEDT+15
DIE	STEDT+11~, STEDT+14*
DIR	SENS+21~, CONT+1~, ANCPKG+1~, SCSEL+3~
DIR("A"	DIV+4, DIV+6, DIV+8, SRV+4, CONT+3, ANCPKG+6, ANCPKG+7, ANCPKG+8, ANCPKG+9, SCSEL+6
DIR("B"	DIV+7, ANCPKG+10, SCSEL+6*
DIR(0	SENS+21, DIV+7, SRV+4, CONT+2, ANCPKG+10, SCSEL+5
>> DIRUT	SCSEL+7
DLAYGO	STEDT+11~, STEDT+15*
DO	STEDT+11~, STEDT+16!, STEDT+18!
DT	STEDT+21
DTOUT	CONT+1~, CONT+5
DUOUT	CONT+1~, CONT+5
DUZ	TYPE+5, TYPE+10, SENS+19, STEDT+22
ERR	STEDT+11~, STEDT+34!
IOF	CONT+6
PCEIEN	ANCPKG+1~, ANCPKG+3*, ANCPKG+4
SCEIEN	ANCPKG~, ANCPKG+2, ANCPKG+3
SCIEN	LOCK~, LOCK+7, UNLOCK~, UNLOCK+6
>> SCLN	DIV+5, DIV+6, DIV+7
SDANS	SENS+9~, SENS+10, SENS+18, SENS+23
SDCLIN	NCTCL~, NCTCL+1
SDCOV	NBTP+1~, NBTP+6*, NBTP+7
SDFLG	SENS~, SENS+14, SENS+15
SDFN	SENS~, SENS+11, SENS+13, SENS+16
SDIENS	STEDT+11~, STEDT+20*, STEDT+21, STEDT+22, STEDT+23, STEDT+26, STEDT+27
SDN	DIV+1~, DIV+2, DIV+3, DIV+4, DIV+5
SDOE	NBFP~, NBFP+2, NBFP+3, NBFP+4, NBTP~, NBTP+2, NBTP+3, NBTP+4, STEDT~, STEDT+10 , STEDT+12, STEDT+13, STEDT+14, STEDT+35, STEDT+36, CONT+6, SCHNG~, SCHNG+6, SCHNG+7
SDOE0	NBFP+1~, NBFP+3, NBTP+1~, NBTP+3
SDOEDT	NBFP+1~, NBFP+3, NBTP+1~, NBTP+3, NBTP+6
>> SDOPT	TYPE+4, TYPE+7, TYPE+12, TYPE+16*
SDORG	SCHNG+5~, SCHNG+9, SCHNG+10, SCHNG+11
SDPAT	NBFP+1~, NBFP+3, NBTP+1~, NBTP+3, NBTP+6
SDPD	STEDT+11~, STEDT+34!
SDPD(	STEDT+21, STEDT+22, STEDT+23, STEDT+26, STEDT+27, STEDT+36
>> SDQFLG	CONT+5*
SDRFLG	STEDT~, STEDT+26, STEDT+33
SDSCC	STEDT~, STEDT+27
>> SDSCCR	TYPE+8, TYPE+13, TYPE+17*
>> SDSCTAT	TYPE+4, TYPE+7, TYPE+12, TYPE+16*
SDTYPE	TYPE+4, TYPE+7, TYPE+12, TYPE+16*, STEDT~, STEDT+23
SDUSR	SCHNG+5~, SCHNG+9*, SCHNG+11
SDVAL	SCHNG+5~, SCHNG+7*, SCHNG+8, SCHNG+9
SDVBA	STEDT+11~, STEDT+35*, STEDT+36
TDIR	SRV+1~, SRV+2, SRV+3, SRV+4
U	NBFP+3, NBTP+3, SENS+11, SENS+14, STEDT+13, STEDT+36, NCTCL+1, SCHNG+9, SCHNG+11
VADM	SENS+12~
VADM(1	SENS+14
VADM(2	SENS+14
X	SENS+12~, STEDT+11~, STEDT+13*, STEDT+14, CONT+1~, ANCPKG+1~
Y	SENS+12~, SENS+16*, SENS+18, CONT+1~, ANCPKG+1~, ANCPKG+12, SCSEL+8

Customize PDF page

Package: Scheduling

Routine: SDSCUTL

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 14

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Local Variables

Legend: