Routine: PSBOXA

Package	Total	Call Graph
VA Fileman	3	DD^%DT NOW^%DTC $$GET1^DIQ
Barcode Medication Administration	1	(CLEAN,PSJ1)^PSBVT
IHS Patient	1	$$HRN^AUPNPAT
Kernel	1	$$FMADD^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
PGTOT(X)	;Keep track of lines and PAGE Number...
EN	; UNKNOWN Action Status Report - creation!
HDR	; Create Report Header
WRTRPT	; Actually "WRITE" the report to output device
FTR	; Create Report Footer
BLDRPT	;

External References

Name	Field # of Occurrence
DD^%DT	EN+4, EN+14
NOW^%DTC	EN+4
$$HRN^AUPNPAT	BLDRPT+14
$$GET1^DIQ	EN+11, BLDRPT+10, BLDRPT+11, BLDRPT+14, BLDRPT+15, BLDRPT+19, BLDRPT+20, BLDRPT+21, HDR+19
CLEAN^PSBVT	BLDRPT+10
PSJ1^PSBVT	BLDRPT+10
$$FMADD^XLFDT	EN+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"BCMA UNKNOWN ACTION STATUS REPORT" Line Location: HDR+20
Function Call: WRITE	Prompt: ?PSBPGRM,PSBPG Line Location: HDR+20
Function Call: WRITE	Prompt: !,"Date/Time: "_PSBDTTM,!,"Report Date Range: Start Date: "_Y1_" Stop Date: "_Y2 Line Location: HDR+21
Function Call: WRITE	Prompt: !,PSBDIVN,?(IOM-($L("Total UNKNOWN entries found: "_+PSBTOT)+5)),"Total UNKNOWN entries found: "_+PSBTOT Line Location: HDR+22
Function Call: WRITE	Prompt: !!,?5,"This is a report of entries, created within the given date range," Line Location: HDR+23
Function Call: WRITE	Prompt: !,?5,"in the BCMA Medication Log File with UNKNOWN Action Status data." Line Location: HDR+24
Function Call: WRITE	Prompt: !,?5,"These entries can be corrected using the BCMA GUI ""Edit Med Log""." Line Location: HDR+25
Function Call: WRITE	Prompt: !!,$TR($J("",IOM)," ","="),!! Line Location: HDR+26
Function Call: WRITE	Prompt: ! Line Location: FTR+2
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","="),! Line Location: FTR+3
Function Call: WRITE	Prompt: !,PSBDTTM,!,"BCMA UNKNOWN ACTION STATUS REPORT - footer -" Line Location: FTR+4
Function Call: WRITE	Prompt: ?PSBPGRM,PSBPG,! Line Location: FTR+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^PSB(53.79 - [#53.79]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSB(53.79 - [#53.79]	EN+7, EN+8, EN+9, EN+10, EN+11, EN+12

Label References

Name	Line Occurrences
$$PGTOT	BLDRPT+11, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19, BLDRPT+20, BLDRPT+21, BLDRPT+22
BLDRPT	EN+15
FTR	WRTRPT+5, WRTRPT+9, WRTRPT+12
HDR	WRTRPT+3, WRTRPT+7, WRTRPT+9
WRTRPT	EN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN+4
DUZ("AG"	BLDRPT+14
DUZ(2	BLDRPT+14, HDR+18
IOF	HDR+14
IOM	HDR+17, HDR+22, HDR+26, FTR+3
IOSL	FTR+2, PGTOT+7
>> PSBDFN	BLDRPT+14, BLDRPT+15
>> PSBDIVN	HDR+19*, HDR+22
>> PSBDTSP	EN+3*, EN+8, EN+14
>> PSBDTST	EN+2*, EN+8, EN+14
>> PSBDTTM	EN+4*, HDR+21, FTR+4
PSBLIST	EN+5*, EN+13!, BLDRPT+4
PSBLIST(	EN+10, EN+12*, BLDRPT+8
>> PSBLNTOT	EN+6, BLDRPT+11, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19, BLDRPT+20, BLDRPT+21 , BLDRPT+22, PGTOT+2, PGTOT+3, PGTOT+4, PGTOT+5, PGTOT+6, PGTOT+7*
>> PSBMORE	PGTOT+4, PGTOT+5, PGTOT+6, PGTOT+7*
>> PSBOITX	BLDRPT+17
>> PSBONX	BLDRPT+16
PSBOUTP	BLDRPT+2!
PSBOUTP(	BLDRPT+11, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19, BLDRPT+20, BLDRPT+21, BLDRPT+22 , WRTRPT+4, WRTRPT+8, WRTRPT+10, WRTRPT+11
PSBOUTP(""	WRTRPT+2, WRTRPT+4, HDR+16
PSBOUTP(0	BLDRPT+6*
>> PSBPG	HDR+16*, HDR+17, HDR+20, FTR+5
>> PSBPGNUM	EN+6, BLDRPT+3, BLDRPT+5, BLDRPT+7, WRTRPT+6, WRTRPT+9, HDR+16, PGTOT+4, PGTOT+7*, PGTOT+8
>> PSBPGRM	HDR+17*, HDR+20, FTR+5
>> PSBRPT(	EN+2, EN+3
>> PSBRPT(0	EN+11, HDR+18*, HDR+19
>> PSBSCH	BLDRPT+18
>> PSBTOT	EN+6, EN+12, EN+13, HDR+22
>> PSBTOT1	BLDRPT+7, BLDRPT+9, BLDRPT+11
>> PSBX1	EN+6, EN+7, EN+8, EN+9, BLDRPT+3, BLDRPT+8, BLDRPT+10, BLDRPT+11, BLDRPT+19, BLDRPT+20 , BLDRPT+21, WRTRPT+8*, WRTRPT+9, WRTRPT+10, WRTRPT+11
>> PSBX2	EN+8, EN+9, WRTRPT+10, WRTRPT+11
>> PSBX3	EN+9*, EN+10, EN+11, EN+12
U	EN+2, EN+3, EN+11, HDR+18, HDR+19
X	PGTOT~, PGTOT+2, PGTOT+3
>> Y	EN+4, EN+14
>> Y1	EN+14*, HDR+21
>> Y2	EN+14*, HDR+21

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBOXA

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: