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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSOBGMGR

Package: Outpatient Pharmacy

Routine: PSOBGMGR


Information

PSOBGMGR ;BHAM ISC/LC - BINGO BOARD MANAGER ;2/15/06 1:03pm

Source Information

Source file <PSOBGMGR.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 6 NOW^%DTC  ^DIC  ^DIE  ^DIK  ^DIR  ^DIWP  
Kernel 3 ^%ZISC  ENDR^%ZISS  H^XUS  
Outpatient Pharmacy 3 (DEV,INDX,WAIT)^PSOBGMG1  (ASTOP,INIJ,STRTM)^PSOBGMG2  ^PSOLSET  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Outpatient Pharmacy 5 PSO BINGO ENTER/EDIT DISPLAY  PSO BINGO PURGE  PSO BINGO START  PSO BINGO STOP  PSOBGMG1  

Entry Points

Name Comments DBIA/ICR reference
DISP
STOPIT
CNT
CODE
END
DISPEX
BEGI
STOPEX
ERASE
PRG
ALL
ATICCHK(DV,TK) ;check ATIC xref if points to non-existent recs, then cleanup
; Return 0 - if no cleanup
; 1 - if had to cleanup
;
END1
TEXT ;display text about setting up dedicated device
TEST
TICKET
TICKDV
ANAME
PUR
DISPEX1

External References

Name Field # of Occurrence
NOW^%DTC ANAME+2, TICKET+2
^%ZISC END1+2
ENDR^%ZISS BEGI+1
^DIC BEGI+2, STOPIT, DISP+1, ERASE+4
^DIE DISP+3
^DIK TEST+1, PRG+2, TEXT+11, PUR
^DIR STOPIT+2, PRG, DISP+5, ERASE+2, ALL+1
^DIWP TEXT+8
DEV^PSOBGMG1 BEGI+7, TICKDV
INDX^PSOBGMG1 ANAME+10, ANAME+13
WAIT^PSOBGMG1 ANAME+3, TICKET+3
ASTOP^PSOBGMG2 ANAME+2, TICKET+2
INIJ^PSOBGMG2 DISP+6
STRTM^PSOBGMG2 DISP+6
^PSOLSET CODE
H^XUS END1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Please check Device Type and try again"
  • Line Location: BEGI+0
Function Call: WRITE
  • Prompt: !,"Board has already been started!",$C(7)
  • Line Location: BEGI+3
Function Call: WRITE
  • Prompt: !?2,TOP,NOTES,!?2,BOT,NOTES
  • Line Location: ANAME+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ANAME+5
Function Call: WRITE
  • Prompt: TOP,TTX,!?1,BOT,TTX,!
  • Line Location: ANAME+6
Function Call: WRITE
  • Prompt: TOP,FTX
  • Line Location: ANAME+7
Function Call: WRITE
  • Prompt: BOT,FTX,!
  • Line Location: ANAME+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ANAME+11
Function Call: WRITE
  • Prompt: TOP,TTX,!?1,BOT,TTX,!
  • Line Location: ANAME+11
Function Call: WRITE
  • Prompt: TOP,FTX
  • Line Location: ANAME+12
Function Call: WRITE
  • Prompt: BOT,FTX,!
  • Line Location: ANAME+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ANAME+14
Function Call: WRITE
  • Prompt: TOP,TTX,!?1,BOT,TTX,!
  • Line Location: ANAME+14
Function Call: WRITE
  • Prompt: TOP,FTX
  • Line Location: ANAME+15
Function Call: WRITE
  • Prompt: BOT,FTX,!
  • Line Location: ANAME+15
Function Call: WRITE
  • Prompt: !?2,TOP,NOTES,!?2,BOT,NOTES
  • Line Location: TICKET+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TICKET+5
Function Call: WRITE
  • Prompt: TOP,TTX,!?1,BOT,TTX,!
  • Line Location: TICKET+6
Function Call: WRITE
  • Prompt: TOP,FTX
  • Line Location: TICKET+7
Function Call: WRITE
  • Prompt: BOT,FTX,!
  • Line Location: TICKET+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TICKET+13
Function Call: WRITE
  • Prompt: TOP,TTX,!?1,BOT,TTX,!
  • Line Location: TICKET+13
Function Call: WRITE
  • Prompt: TOP,FTX
  • Line Location: TICKET+14
Function Call: WRITE
  • Prompt: BOT,FTX,!
  • Line Location: TICKET+14
Function Call: WRITE
  • Prompt: !!,$C(7),"Board has already been stopped."
  • Line Location: STOPIT+1
Function Call: WRITE
  • Prompt: !!,"No data purged."
  • Line Location: STOPIT+2
Function Call: WRITE
  • Prompt: !!,"Board Stopped!!",!!
  • Line Location: STOPIT+3
Function Call: WRITE
  • Prompt: !!,"There are no entries to purge from the display group.",!
  • Line Location: CNT+1
Function Call: WRITE
  • Prompt: !!,$C(7),CNT1," entries still remain in the display group.",!
  • Line Location: CNT+2
Function Call: WRITE
  • Prompt: !!,"No data purged."
  • Line Location: PRG+0
Function Call: WRITE
  • Prompt: !!,"Purging data. Please wait."
  • Line Location: PRG+1
Function Call: WRITE
  • Prompt: " Purge complete!",!
  • Line Location: PRG+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !!,$C(7),"This display group has been started.",!,"It must be stopped before you can edit it."
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !!,"In order to automatically start and stop the bingo board monitor,"
  • Line Location: TEXT+1
Function Call: WRITE
  • Prompt: !,"a dedicated device must be setup by your IRM Service.",!!
  • Line Location: TEXT+2
Function Call: WRITE
  • Prompt: "Once a dedicated device is setup, the bingo board can be scheduled"
  • Line Location: TEXT+3
Function Call: WRITE
  • Prompt: !,"to automatically start and/or stop at user-defined times."
  • Line Location: TEXT+4
Function Call: WRITE
  • Prompt: !!,"Enter 'NO' at the DISPLAY SETUP HELP TEXT prompt to not display this help text.",!
  • Line Location: TEXT+5
Function Call: WRITE
  • Prompt: !!,"All data has been purged!"
  • Line Location: ERASE+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: ERASE+1
Function Call: WRITE
  • Prompt: !!,$C(7),"*** THIS WILL PURGE ALL BINGO BOARD PATIENT DATA FOR ALL DISPLAY GROUPS. ***",!!
  • Line Location: ALL+0
Function Call: WRITE
  • Prompt: !!,"No data purged!"
  • Line Location: ALL+1
Function Call: WRITE
  • Prompt: " Purge complete.",!
  • Line Location: PUR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END1+2
Routine Call
  • DIE
  • Line Location:
    • DISP+3
Routine Call
  • DIC
  • Line Location:
    • BEGI+2
    • STOPIT
    • DISP+1
    • ERASE+4
Routine Call
  • DIR
  • Line Location:
    • STOPIT+2
    • PRG
    • DISP+5
    • ERASE+2
    • ALL+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.11 - [#52.11] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DILOCKTM" DISP+2
^PS(52.11 - [#52.11] TEST, ANAME+9, TICKET+9, CNT, PRG+2, ATICCHK+5, ATICCHK+8, ATICCHK+9!, ATICCHK+10!, ATICCHK+11!
, ATICCHK+12!, ATICCHK+13!, ATICCHK+15, ATICCHK+16, ATICCHK+17!, ERASE, PUR
^PS(59 - [#59] CODE+1
^PS(59.3 - [#59.3] BEGI+3, BEGI+4, BEGI+6*, ANAME, ANAME+1, ANAME+2*, ANAME+4, ANAME+5, ANAME+9, ANAME+17
, ANAME+18, TICKET, TICKET+1, TICKET+2*, TICKET+4, TICKET+5, TICKET+9, TICKET+17, STOPIT+1, STOPIT+3*
, DISP+1, DISP+2, DISP+3, DISP+5, TEXT+8, TEXT+9*, TEXT+10, TEXT+11, END
^UTILITY($J TEXT+8!, TEXT+9, DISPEX!

Label References

Name Line Occurrences
$$ATICCHK TICKET+11
ALL ERASE+4
ANAME ANAME+18
CNT ERASE+4
DISP CODE+2, DISP+3, TEXT+12
DISPEX DISP+1
DISPEX1 DISP+2, DISP+3, DISP+5, DISP+6
END CODE, BEGI+3, BEGI+6, BEGI+7, ANAME, ANAME+5, ANAME+18, TICKDV, TICKET, TICKET+5
, TICKET+17
END1 ERASE+2
ERASE CODE+2, ERASE+4, ALL+1, PUR+1
PRG STOPIT+2
STOPEX STOPIT+2, CNT+1, PRG
STOPIT CODE+2
TICKDV BEGI+6
TICKET TICKET+19

Naked Globals

Name Field # of Occurrence
^( TEST+1, TEXT+8, TEXT+9
^(0 TEXT+9*
^(3 BEGI+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ANAME+2, TICKET+2, END1+1!
%ZIS END1+1!
ADA BEGI+2*, BEGI+3, BEGI+4, BEGI+6, ANAME, ANAME+1, ANAME+2, ANAME+4, ANAME+5, ANAME+9
, ANAME+17, ANAME+18, TICKET, TICKET+1, TICKET+2, TICKET+4, TICKET+5, TICKET+9, TICKET+11, TICKET+17
, STOPIT*, STOPIT+1, STOPIT+3, CNT, PRG+2, STOPEX!, DISP+1*, DISPEX!, ERASE+4*, END
, END1!
AGROUP END1!
AS STOPEX!, ERASE+2*, ERASE+4
AWT END1+1!
AWT1 END1+1!
AWT2 END1+1!
BBH END1+1!
BBM END1+1!
BIG END1!
BIGO END1!
BOT BEGI+1*, ANAME+4, ANAME+6, ANAME+7, ANAME+11, ANAME+12, ANAME+14, ANAME+15, ANAME+17, TICKET+4
, TICKET+6, TICKET+7, TICKET+13, TICKET+14, TICKET+16, END1!
CNT CNT*, STOPEX!, END1!
CNT1 CNT*, CNT+1, CNT+2, STOPEX!, END1!
COLM BEGI+4*, ANAME+8, ANAME+10, ANAME+13, ANAME+16, ANAME+17, TICKET+8, TICKET+14, TICKET+15, TICKET+16
, TICKET+17, TICKET+18, END1!
DA TEST+1*, BEGI+2*, STOPIT*, PRG+2*, STOPEX!, DISP!, DISP+1*, DISP+2, DISP+3, DISP+5
, TEXT+8, TEXT+9, TEXT+10, TEXT+11*, DISPEX!, PUR*, PUR+1!, END1!
DA(1 TEXT+11*
DEV END1+1!
DGP CODE+1*, BEGI+2, STOPIT, ERASE+3, END1!
DIC BEGI+1!, BEGI+2*!, STOPIT!*, DISP!, DISP+1*!, ERASE+4*!
DIC("B" BEGI+2*, STOPIT*, ERASE+3*
DIC(0 BEGI+2*, STOPIT*, DISP+1*, ERASE+4*
DIE BEGI+2*, STOPIT*, DISP+1*, DISPEX1!
DIE("NO^" DISP+2*
DIK TEST*, TEST+2!, PRG+2*, STOPEX!, TEXT+11*, PUR*, PUR+1!
DIR STOPIT+2!, PRG!, DISP+5!, DISPEX1!, ERASE+1!, ERASE+2!, ALL+1!, PUR+1!
DIR("?" ERASE+2*
DIR("A" STOPIT+2*, PRG*, DISP+5*, ERASE+1*, ALL+1*
DIR("B" STOPIT+2*, PRG*, DISP+5*, ALL+1*
DIR(0 STOPIT+2*, PRG*, DISP+5*, ERASE+1*, ALL+1*
DIRUT STOPIT+2, PRG, STOPEX!, DISP+3, DISP+5, ERASE+2, ALL+1
DIWF TEXT+8*, END1!
DIWL TEXT+8*, END1!
DIWR TEXT+8*, END1!
DLAYGO DISP+1*, END1+1!
DR DISP!, DISP+2*, DISPEX1!, END1!
DT TEST+1
DTOUT END1+1!
DV ATICCHK~, ATICCHK+4, ATICCHK+5, ATICCHK+9, ATICCHK+11, ATICCHK+13, ATICCHK+15, ATICCHK+16, ATICCHK+17, END1+1!
DWT BEGI+4*, ANAME+3, ANAME+6, ANAME+7, ANAME+8, ANAME+11, ANAME+12, ANAME+14, ANAME+15, TICKET+3
, TICKET+6, TICKET+7, TICKET+8, TICKET+13, TICKET+14, END1+1!
DX ANAME+6*, ANAME+7*, ANAME+11*, ANAME+12*, ANAME+14*, ANAME+15*, ANAME+17*, TICKET+6*, TICKET+7*, TICKET+13*
, TICKET+14*, TICKET+16*, END1+1!
DY ANAME+6*, ANAME+7*, ANAME+11*, ANAME+12*, ANAME+14*, ANAME+15*, ANAME+17*, TICKET+6*, TICKET+7*, TICKET+13*
, TICKET+14*, TICKET+16*, END1+1!
EDT DISP+5*, DISP+6, DISPEX1!
EN END1+1!
FLAG CODE+2, STOPEX!, DISPEX!, END1!
FLG BEGI*, END1!
FTX BEGI+5*, ANAME+7, ANAME+12, ANAME+15, TICKET+7, TICKET+14, END1!
GROUP END1!
IODHLB BEGI+1!
IODHLT BEGI+1!
IOF ANAME+4, ANAME+5, ANAME+11, ANAME+14, TICKET+4, TICKET+5, TICKET+13, END1+2
IORVOFF BEGI+1!
IORVON BEGI+1!
IOST(0 BEGI
IOXY ANAME+6, ANAME+7, ANAME+11, ANAME+12, ANAME+14, ANAME+15, ANAME+17, TICKET+6, TICKET+7, TICKET+13
, TICKET+14, TICKET+16, END1+1!
LAST TEXT+10~*, TEXT+11, DISPEX!
LNODE TEXT+9*, TEXT+11, DISPEX!
NAME ANAME+9*, ANAME+17, END1!
NODE TEXT+8*, TEXT+9*, TEXT+10*, DISPEX!
NODE1 TEXT+9*, DISPEX!
>> NODV BEGI+7, TICKDV
NOTE ANAME+4*, TICKET+4*, END1!
NOTES ANAME+4*, TICKET+4*, END1!
NTXT END1+1!
NUM END1+1!
NWT BEGI+4*, END1+1!
P52 ATICCHK+5~*, ATICCHK+8, ATICCHK+9, ATICCHK+10, ATICCHK+11, ATICCHK+12, ATICCHK+13, ATICCHK+17
PA ATICCHK+14~, ATICCHK+15*, ATICCHK+16, ATICCHK+17
PAI ATICCHK+14~, ATICCHK+16*, ATICCHK+17
POP END1+1!
>> PSOPAR CODE
>> PSOSITE CODE+1
PSOUT BEGI*, END1!
QT ATICCHK+5~*, ATICCHK+8*, ATICCHK+18
REC ERASE*!
ROLL BEGI*, END1!
STOP BEGI+6*, ANAME+2*, ANAME+18, TICKET+2*, STOPIT+3*, STOPEX!, END*, END1+2!, END1+3!
TASK END1+1!
TCK BEGI+6*, END1!
TEST TEST*, TEST+1, TEST+2!
TEST1 TEST+1*, TEST+2!
TICK TICKET+9*, TICKET+11, TICKET+16, END1!
TK ATICCHK~, ATICCHK+4, ATICCHK+5, ATICCHK+9, ATICCHK+11, ATICCHK+12
TOP BEGI+1*, ANAME+4, ANAME+6, ANAME+7, ANAME+11, ANAME+12, ANAME+14, ANAME+15, ANAME+17, TICKET+4
, TICKET+6, TICKET+7, TICKET+13, TICKET+14, TICKET+16, END1!
TTX ANAME+6, ANAME+11, ANAME+14, TICKET+6, TICKET+13, END1+1!
VOFF BEGI+1*, END1!
VON BEGI+1*, END1!
WTT END1+1!
X BEGI+1*, TEXT+8*, DISPEX!, END1!
X1 END1!
Y BEGI+2, STOPIT, STOPIT+2, PRG, STOPEX!, DISP+1, DISP+5, DISPEX!, ERASE+2!, ERASE+4!
, ALL+1, END1!
ZH BEGI*, ANAME+8*, ANAME+12*, ANAME+13, ANAME+15*, ANAME+16*, ANAME+17*, TICKET+8*, TICKET+14*, TICKET+15*
, TICKET+16*, TICKET+18, END1!
>> ZTREQ END*
ZV BEGI*, ANAME, ANAME+8*, ANAME+10, ANAME+12*, ANAME+13, ANAME+15*, ANAME+16*, ANAME+17*, TICKET
, TICKET+8*, TICKET+12, TICKET+14*, TICKET+15*, TICKET+16*, TICKET+17, TICKET+18, END1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All