Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSBOXA

Package: Barcode Medication Administration

Routine: PSBOXA


Information

PSBOXA ;BIRMINGHAM/EFC-MEDICATION LOG ;Mar 2004

Source Information

Source file <PSBOXA.m>

Call Graph

Call Graph

Call Graph Total: 6

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

Entry Points

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

External References

Name Field # of Occurrence
DD^%DT EN+4, EN+14
NOW^%DTC EN+4
$$HRN^AUPNPAT BLDRPT+12
$$GET1^DIQ EN+11, BLDRPT+10, BLDRPT+11, BLDRPT+12, BLDRPT+13, BLDRPT+17, BLDRPT+18, BLDRPT+19, 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+12, BLDRPT+13, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19, BLDRPT+20
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+12
DUZ(2 BLDRPT+12, HDR+18
IOF HDR+14
IOM HDR+17, HDR+22, HDR+26, FTR+3
IOSL FTR+2, PGTOT+7
>> PSBDFN BLDRPT+12, BLDRPT+13
>> 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+12, BLDRPT+13, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19
, BLDRPT+20, PGTOT+2*, PGTOT+3*, PGTOT+4*, PGTOT+5, PGTOT+6, PGTOT+7*
>> PSBMORE PGTOT+4*, PGTOT+5, PGTOT+6*, PGTOT+7*
>> PSBOITX BLDRPT+15
>> PSBONX BLDRPT+14
PSBOUTP BLDRPT+2!
PSBOUTP( BLDRPT+11*, BLDRPT+12*, BLDRPT+13*, BLDRPT+14*, BLDRPT+15*, BLDRPT+16*, BLDRPT+17*, BLDRPT+18*, BLDRPT+19*, BLDRPT+20*
, 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+16
>> 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+17, BLDRPT+18
, BLDRPT+19, 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
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All