Routine: BSDWLV

Information

BSDWLV ; IHS/ITSC/LJF, WAR - VIEW WAITING LIST ENTRY ; [ 01/09/2003 1:44 PM ]

Source Information

Source file <BSDWLV.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
IHS Changes To ADT	2	$$CONF^BDGF ($$DEAD,$$DOD,$$HRCN)^BDGF2
Kernel	2	$$REPEAT^XLFSTR DISP^XQORM1
IHS Patient	1	KILL^AUPNPAT
Scheduling	1	$$PCLINE^SDPPTEM
VA Fileman	1	($$GET1,GETS)^DIQ

Caller Graph

Caller Graph Total: 8

Package	Total	Caller Graph
IHS Changes To Scheduling	5	BSDAM BSDDPA BSDWLE BSDWLE2 BSDWLL
Health Summary Components	1	BHSENCS
Mental Health Social Services	1	AMHGRAP
Patient Care Component	1	APCHS2D

Entry Points

Name	Comments	DBIA/ICR reference
SET(DATA,NUM)	; put data line into display array
EN	;EP; -- main entry point for BSDRM WAIT LIST VIEW ; variables already set coming into this routine: ; BSDN = ien of patient multiple in Waiting List File ; BSDWLN = clinic ien in file
HDR	; -- header code
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
SP(N)	; -- SUBRTN to pad N number of spaces
EXPND	; -- expand code
INIT	; -- init variables and list array
WLDATA(PAT,TYPE,BSDOUT)	; EP - return wait list info in BSDOUT array
EXIT	; -- exit code
ONWL(PAT,TYPE)	; EP - returns 1 if patient active on at least one waiting list
HELP	; -- help code

External References

Name	Field # of Occurrence
KILL^AUPNPAT	EXIT+1
$$CONF^BDGF	HDR+2
$$DEAD^BDGF2	HDR+9
$$DOD^BDGF2	HDR+9
$$HRCN^BDGF2	HDR+5
$$GET1^DIQ	HDR+4, HDR+6, HDR+7, INIT+4, INIT+9, INIT+10, INIT+20, INIT+21, INIT+22, INIT+35 , INIT+36, WLDATA+16, WLDATA+21
GETS^DIQ	WLDATA+18
$$PCLINE^SDPPTEM	HDR+10
EN^VALM	EN+6
TERM^VALM0	EN+5
CLEAR^VALM1	EN+5, EN+7
$$REPEAT^XLFSTR	PAD+2
DISP^XQORM1	HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: for Line Location: ONWL+2
Routine Call	VALM Line Location: EN+6

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^BSDWL - [#9009017.1]	GET1^DIQ
9009017.11	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BSDWL - [#9009017.1]	INIT+28, INIT+29, ONWL+6, ONWL+9, WLDATA+11
^BSDWL("AB"	ONWL+3, ONWL+5, ONWL+8, WLDATA+9, WLDATA+10
^BSDWL(0	WLDATA+3
^DD(2	INIT+15
^DD(9009017.11	INIT+8, INIT+34
^SC - [#44]	ONWL+6
^TMP("BSDWLV"	INIT+2!, SET+2*, EXIT+1!

Name	Line Occurrences
$$ONWL	WLDATA+4
$$PAD	HDR+5, HDR+6, HDR+7, INIT+9, INIT+21, INIT+22, INIT+35, SP+1, WLDATA+20, WLDATA+21 , WLDATA+22
$$SP	HDR+2, HDR+9, INIT+4, WLDATA+22, WLDATA+23
SET	INIT+4, INIT+11, INIT+24, INIT+27, INIT+29, INIT+32, INIT+37

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ADDDT	WLDATA+16*, WLDATA+17, WLDATA+25, WLDATA+29
BSDATA	WLDATA+6~, WLDATA+15!
BSDATA(	WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+28, WLDATA+29
BSDI	INIT+1~, INIT+7, INIT+8, INIT+9, INIT+10, INIT+14, INIT+15, INIT+21, INIT+22, INIT+28* , INIT+29, INIT+33*, INIT+34, INIT+35, INIT+36
BSDN	INIT+9, INIT+10, INIT+20, INIT+28, INIT+29, INIT+35, INIT+36, EXIT+1!
BSDOUT	WLDATA~
BSDOUT(	WLDATA+25, WLDATA+29
BSDOUT(0	WLDATA+3, WLDATA+4, WLDATA+17, WLDATA+31, WLDATA+33
>> BSDWLN	INIT+4, INIT+9, INIT+10, INIT+20, INIT+28, INIT+29, INIT+35, INIT+36
>> CNT	WLDATA+28*, WLDATA+29
CNTA	WLDATA+6~, WLDATA+7, WLDATA+13, WLDATA+25, WLDATA+29
D	PAD~, PAD+2
DATA	SET~, SET+2
DFN	HDR+4, HDR+5, HDR+6, HDR+7, HDR+9, HDR+10, INIT+20~*, INIT+21, INIT+22
DT	HDR+10
DUZ(2	HDR+5
FILE	WLDATA+6~, WLDATA+15*, WLDATA+16, WLDATA+18, WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+28, WLDATA+29
FOUND	ONWL+4~, ONWL+5, ONWL+8, ONWL+10, ONWL+11, WLDATA+6~, WLDATA+9*
IEN	ONWL+4~, ONWL+8, ONWL+9, WLDATA+6~, WLDATA+10, WLDATA+11, WLDATA+15
IENS	WLDATA+6~, WLDATA+15*, WLDATA+16, WLDATA+18, WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+25, WLDATA+28 , WLDATA+29
>> IORVOFF	HDR+4, HDR+9
>> IORVON	HDR+4, HDR+9
L	PAD~, PAD+2
LINE	INIT+1~, INIT+8, INIT+9, INIT+10, INIT+11, INIT+15, INIT+21, INIT+22, INIT+24, INIT+34* , INIT+35, INIT+36, INIT+37, WLDATA+6~, WLDATA+19, WLDATA+20, WLDATA+21, WLDATA+22, WLDATA+23*, WLDATA+25
N	SP~, SP+1
NUM	SET~, SET+1*, SET+2
PAT	ONWL~, ONWL+3, ONWL+5, ONWL+8, WLDATA~, WLDATA+4, WLDATA+9, WLDATA+10
TYPE	ONWL~, ONWL+6, WLDATA~, WLDATA+4
U	INIT+8, INIT+15, INIT+34, ONWL+6, ONWL+9, WLDATA+11, WLDATA+25, WLDATA+29
VALMCNT	EN+5~, INIT+2*, INIT+4, INIT+11, INIT+24, INIT+27, INIT+29, INIT+32, INIT+37
>> VALMHDR(1	HDR+2*
>> VALMHDR(2	HDR+7*
>> VALMHDR(3	HDR+9, HDR+10
WL	ONWL+4~, ONWL+5, ONWL+6, ONWL+8, ONWL+9, WLDATA+6~, WLDATA+9, WLDATA+10, WLDATA+11, WLDATA+15 , WLDATA+21
X	HDR+1~, HDR+4, HDR+5, HDR+6, HDR+7, INIT+1~, INIT+4, HELP+1*

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDWLV

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: