Routine: BSDNS2

Package	Total	Call Graph
Kernel	4	^%ZISC ($$FMTE,$$HTFM)^XLFDT $$REPEAT^XLFSTR DISP^XQORM1
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
VA Fileman	3	C^%DTC ^DIC $$GET1^DIQ
IHS Changes To ADT	2	($$BROWSE,$$READ,MSG,ZIS)^BDGF $$HRCN^BDGF2
IHS Changes To Scheduling	1	($$CONF,$$DIV,$$PRIN,CLINIC)^BSDU

Entry Points

Name	Comments	DBIA/ICR reference
HELP	; -- help code
PAT	;-- select patients to show or all
HDR	; -- header code
PAD(D,L)	; -- SUBRTN to pad length of data ; -- D=data L=length
SP(N)	; -- SUBRTN to pad N number of spaces
HDG	;Print report header
EXPND	; -- expand code
PRINT	; -- print list to paper
LIMIT(NUM,LMT,MODE)	; returns 1 if number within limit for mode ; +NUM=# of no-shows for patient ; LMT=# no-shows needed to be included ; MODE=(F:facility, P:principal clinic C:clinic)
LMT(CLN)	; return time limit for clinic
LASTNOS(PAT,CLINIC,DATE)	; -- returns appt display line
INIT	; -- init variables and list array
ASK	; ask user questions
HELP2	;EP; help for limit category
EN	; -- main entry point for BSDRM FREQUENT NOSHOWS
PDATA(DFN,CLINIC,BEGDT,ENDT)	;EP; -- called to calculate # noshows for patient ; will count patient's no-shows in this clinic & principal clinic ; date range for search is based on division and clinic parameters
START	;EP; -- re-entry for printing to paper
MODEMSG(MODE)	; return mode in external format
SET(LINE,NUM)	; put display line into display array
BYPC	;-- sort everything by clinic
BYPAT	;-- sort by patient
EXIT	; -- exit code
HELP3	;EP; help for display other info question
HELP1	;EP; help for number limit question

External References

Name	Field # of Occurrence
C^%DTC	PDATA+13, PDATA+19
^%ZISC	PRINT+6
$$BROWSE^BDGF	ASK+27
$$READ^BDGF	ASK+18, ASK+19, ASK+21, ASK+23, ASK+25
MSG^BDGF	HELP1+1, HELP1+2, HELP1+3, HELP2+1, HELP2+2, HELP2+3, HELP2+4, HELP3+1, HELP3+2
ZIS^BDGF	ASK+28
$$HRCN^BDGF2	BYPC+15, BYPAT+3
$$CONF^BSDU	HDR+1
$$DIV^BSDU	PDATA+7, LMT+2
$$PRIN^BSDU	INIT+8
CLINIC^BSDU	ASK+3
^DIC	PAT+2
$$GET1^DIQ	INIT+9, INIT+19, PDATA+7, PDATA+9, LMT+2, LMT+4
EN^VALM	EN+2
TERM^VALM0	EN+1
CLEAR^VALM1	EN+1, EN+3
$$FMTE^XLFDT	HDR+2, HDR+3, HDG+3, LASTNOS+2
$$HTFM^XLFDT	HDG+3
$$REPEAT^XLFSTR	HDG+6, PAD+2
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,^TMP("BSDNS2",$J,BSDN,0) Line Location: PRINT+5
Function Call: WRITE	Prompt: @IOF Line Location: HDG+2
Function Call: WRITE	Prompt: !?20,"FREQUENT NO-SHOWS REPORT",?55,"Printed: ",BSDT Line Location: HDG+4
Function Call: WRITE	Prompt: !,VALMHDR(I) Line Location: HDG+5
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",80) Line Location: HDG+6
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+2
Routine Call	DIC Line Location: PAT+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^SC - [#44]	GET1^DIQ
^BSDSC - [#9009017.2]	GET1^DIQ
^BSDPAR - [#9009020.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	INIT+18, PDATA+14, PDATA+15, PDATA+20, PDATA+21, PDATA+24, PDATA+28
^SC - [#44]	INIT+14, INIT+15, INIT+16, PDATA+4, PDATA+5, LASTNOS+4, LASTNOS+5, LASTNOS+6
^SC("AIHSPC"	INIT+7, PDATA+28
^TMP("BSDNS2"	INIT+1!, PRINT+3, PRINT+5, EXIT+1!, SET+2*
^TMP("BSDNS21"	INIT+1!, INIT+20, INIT+24, INIT+25, BYPC+2, BYPC+6, BYPC+11, BYPC+13, BYPC+14, BYPAT+2 , BYPAT+3, BYPAT+6, BYPAT+8, BYPAT+9

Label References

Name	Line Occurrences
$$LASTNOS	PDATA+25
$$LIMIT	INIT+23
$$LMT	BYPC+3, BYPC+7, BYPAT+3
$$MODEMSG	HDR+4
$$PAD	BYPC+3, BYPC+15, BYPC+16, BYPAT+3, BYPAT+10, BYPAT+11, SP+1
$$PDATA	INIT+22
$$SP	HDR+1, HDR+2, HDR+4, BYPC+15, BYPC+19, BYPAT+10, BYPAT+14
BYPAT	INIT+30
BYPC	INIT+29
EN	ASK+27
EXIT	PRINT+6
HDG	PRINT+2, PRINT+4
HDR	HDG+5
INIT	START+1
PAT	PAT+7
PRINT	START+1
SET	BYPC+4, BYPC+8, BYPC+18, BYPC+19, BYPC+20, BYPAT+4, BYPAT+13, BYPAT+14, BYPAT+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APPDT	PDATA+3~, PDATA+13, PDATA+14, PDATA+15, PDATA+19, PDATA+20, PDATA+21, PDATA+24, PDATA+25, PDATA+28
APPT	INIT+5~, INIT+13, INIT+14, INIT+15, INIT+16, INIT+18, INIT+22, INIT+24, INIT+25
BEGDT	PDATA~, PDATA+13, PDATA+19
BSDAR	INIT+2~*, INIT+6
BSDBD	ASK+1~, ASK+18*, HDR+2, INIT+13, INIT+14
BSDCP	ASK+2~
BSDED	ASK+1~, ASK+19*, HDR+3, INIT+13, INIT+22
>> BSDINFO	ASK+25*, BYPC+19, BYPAT+14
>> BSDLMT	ASK+21*, HDR+4, INIT+23, HELP2+2, HELP2+3, HELP2+4
>> BSDMODE	ASK+23*, HDR+4, INIT+23, INIT+24, INIT+25, INIT+29, INIT+30
BSDN	PRINT+1~, PRINT+2, PRINT+3, PRINT+5
BSDP	ASK+2~, PAT+3*, PAT+6
BSDP(	PAT+6*
BSDPCNT	ASK+2~, PAT+5*, PAT+6
>> BSDQ	ASK+3
BSDSEEN	ASK+1~
BSDSUB	ASK+1~
BSDT	PRINT+1~, HDG+3*, HDG+4
BSDTT	ASK+1~
CLINIC	PDATA~, PDATA+4, PDATA+5, PDATA+9, PDATA+24, PDATA+25, LASTNOS~, LASTNOS+4, LASTNOS+5, LASTNOS+6
CLN	INIT+5~, INIT+6*, INIT+7, INIT+8, INIT+9, INIT+14, INIT+15, INIT+16, INIT+22, LMT~ , LMT+4
CLNCD	PDATA+3~, PDATA+5*, PDATA+29
>> CLNCNT	PDATA+6, PDATA+29, PDATA+32
CLNM	INIT+5~, INIT+9, INIT+20, INIT+24, INIT+25, BYPC+6, BYPC+7, BYPC+11, BYPC+13, BYPC+14
>> CLNNM	BYPAT+7, BYPAT+8, BYPAT+9, BYPAT+10
COUNTS	BYPC+1~, BYPC+14, BYPC+16, BYPC+17, BYPC+19, BYPAT+1~, BYPAT+9, BYPAT+11, BYPAT+12, BYPAT+14
D	PAD~, PAD+2
DATE	LASTNOS~, LASTNOS+2, LASTNOS+4, LASTNOS+5, LASTNOS+6
DFN	INIT+5~, INIT+16, INIT+18, INIT+19, INIT+20, INIT+22, INIT+24, INIT+25, BYPC+12, BYPC+13* , BYPC+14, BYPC+15, BYPAT+6*, BYPAT+8, BYPAT+9, PDATA~, PDATA+14, PDATA+15, PDATA+20, PDATA+21 , PDATA+24, PDATA+25, PDATA+28
>> DIC	PAT+1*
>> DIC("A"	PAT+1*
>> DIC(0	PAT+1*
DUZ(2	BYPC+15, BYPAT+3
>> END	INIT+13*
ENDT	PDATA~, PDATA+14, PDATA+20
I	BYPC+17, BYPAT+12, HDG+1~, HDG+5*
IEN	INIT+5~, INIT+15*, INIT+16
IO	PRINT+1
IOF	HDG+2
IOSL	PRINT+4
L	PAD~, PAD+2
LASTNOS	PDATA+3~, PDATA+25*, PDATA+32
LINE	BYPC+1~, BYPC+3, BYPC+4, BYPC+7, BYPC+8, BYPC+15, BYPC+16, BYPC+17, BYPC+18, BYPAT+1~ , BYPAT+3, BYPAT+4, BYPAT+10, BYPAT+11, BYPAT+12*, BYPAT+13, PDATA+3~, SET~, SET+2
LMT	PDATA+3~, PDATA+7, PDATA+8, PDATA+10, PDATA+13, LIMIT~, LIMIT+4, LIMIT+5, LIMIT+6, LIMIT+7 , LIMIT+8, LMT+1~, LMT+2, LMT+3, LMT+5
LMT2	PDATA+3~, PDATA+9, PDATA+10, PDATA+19, LMT+1~, LMT+4*, LMT+5
MODE	LIMIT~, LIMIT+4, LIMIT+5, LIMIT+6, LIMIT+7, LIMIT+8, MODEMSG~, MODEMSG+1, MODEMSG+2
N	SP~, SP+1
NOCLN	PDATA+3~, PDATA+6, PDATA+25, PDATA+32
NOSHOWS	INIT+5~, INIT+22*, INIT+23, INIT+24, INIT+25
NUM	LIMIT~, LIMIT+4, LIMIT+5, LIMIT+6, LIMIT+7, LIMIT+8, SET~, SET+1*, SET+2
PAT	BYPAT+2*, BYPAT+3, BYPAT+6, BYPAT+8, BYPAT+9, LASTNOS~, LASTNOS+5
PATNM	INIT+5~, INIT+19, INIT+20, INIT+24, INIT+25, BYPC+10, BYPC+11*, BYPC+13, BYPC+14, BYPC+15
PC	INIT+5~, INIT+8, INIT+20, INIT+24, BYPC+2, BYPC+3, BYPC+6, BYPC+11, BYPC+13, BYPC+14
PCNT	PDATA+3~, PDATA+6, PDATA+28, PDATA+32
POP	ASK+1~
PRINC	PDATA+3~, PDATA+4*, PDATA+28
TOTL	PDATA+3~, PDATA+6, PDATA+16, PDATA+32
U	ASK+21, ASK+23, ASK+25, INIT+18, INIT+24, INIT+25, BYPC+16, BYPC+17, BYPC+19, BYPAT+11 , BYPAT+12, BYPAT+14, PDATA+4, PDATA+5, PDATA+15, PDATA+21, PDATA+32, LASTNOS+5, LASTNOS+7, LIMIT+5 , LIMIT+6, LIMIT+8
VALMCNT	EN+1~, INIT+1*, BYPC+4, BYPC+8, BYPC+18, BYPC+19, BYPC+20, BYPAT+4, BYPAT+13, BYPAT+14 , BYPAT+15
>> VALMHDR(	HDG+5
>> VALMHDR(1	HDR+1*
>> VALMHDR(2	HDR+2, HDR+3
>> VALMHDR(3	HDR+4*
VAUTC	ASK+1~, INIT+2
VAUTD	ASK+1~
X	INIT+5~, INIT+18, HDG+1~, HDG+3, HELP+1, PDATA+3~, PDATA+13, PDATA+15, PDATA+19, PDATA+21* , LASTNOS+1~, LASTNOS+2, LASTNOS+7, LASTNOS+8
X1	PDATA+3~, PDATA+13, PDATA+19
X2	PDATA+3~, PDATA+13, PDATA+19
Y	ASK+1~, ASK+27, PAT+3, PAT+4, LASTNOS+1~, LASTNOS+4, LASTNOS+5, LASTNOS+6
Z	LASTNOS+1~, LASTNOS+4, LASTNOS+6*, LASTNOS+7

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDNS2

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: