Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOBING1

Package: Outpatient Pharmacy

Routine: PSOBING1


Information

PSOBING1 ;BHAM ISC/LC - bingo board utility routine ;11/09/17 20:19

Source Information

Source file <PSOBING1.m>

Entry Points

Name Comments DBIA/ICR reference
BEG
NEW
NEW1
STO
NOTE
STALK
HELP
BCRMV
BCRMV1
WARN
STORX ;Sto Rx # for each entry in 52.11
WTIME ;sto bingo wait time in 52
CREF ;check for deleted refills
REL
REL1
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),$P(^DPT(TDFN,0),"^")_" ("_TSSN_") was issued ticket # "_TIC,". Try again!",!
  • Line Location: NEW1+4
Function Call: WRITE
  • Prompt: !!,$C(7),Y(0,0)," is being edited!",!
  • Line Location: STO+0
Function Call: WRITE
  • Prompt: !!,?5,"NAME",?30,"SSN",?45,"ID",?50,"ORDER"
  • Line Location: NOTE+0
Function Call: WRITE
  • Prompt: !,?5,Z1,?30,Z4,?46,Z2,?52,Z3
  • Line Location: NOTE+1
Function Call: WRITE
  • Prompt: !!,"Please advise the patient that the above ID # and/or ORDER Letter"
  • Line Location: NOTE+2
Function Call: WRITE
  • Prompt: !,"will be displayed with his/her name on the Bingo Display",!!
  • Line Location: NOTE+3
Function Call: WRITE
  • Prompt: !!,$C(7),"** ",$P($G(^DPT(DFN,0)),"^")," is enrolled for ScripTalk.",!
  • Line Location: STALK+0
Function Call: WRITE
  • Prompt: !!?5,"Please review ScripTalk mapped device setup.",!!?5,"No ScripTalk label will print.",!!
  • Line Location: STALK+9
Function Call: WRITE
  • Prompt: !?5,"Using Mapped printer",!!
  • Line Location: STALK+11
Function Call: WRITE
  • Prompt: !!?5,"There is no Mapped printer and the Division printer is set for Manual.",!!?5,"You must manually queue the ScripTalk label(s) to print.",!
  • Line Location: STALK+13
Function Call: WRITE
  • Prompt: !
  • Line Location: STALK+14
Function Call: WRITE
  • Prompt: !!,"Wand the barcode of the Rx or manually key in",!,"the number below the barcode, the Rx number, or the",!,"patient name in the format - 'LASTNAME,FIRSTNAME'"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,"The barcode # should be of the format - 'NNN-NNNNNNN'"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: BCRMV+0
Function Call: WRITE
  • Prompt: !?7,$C(7)," INVALID STATION # !",!
  • Line Location: BCRMV+3
Function Call: WRITE
  • Prompt: !?7,$C(7)," NON-EXISTENT RX #"
  • Line Location: BCRMV+4
Function Call: WRITE
  • Prompt: !?7,$C(7)," IMPROPER BARCODE FORMAT"
  • Line Location: BCRMV+6
Function Call: WRITE
  • Prompt: !!,BNAME," isn't in the Bingo Board file.",$C(7)
  • Line Location: BCRMV1+4
Function Call: WRITE
  • Prompt: !!,BNAME," has already been removed from the display.",$C(7)
  • Line Location: BCRMV1+5
Function Call: WRITE
  • Prompt: !!,BNAME," is removed from the display."
  • Line Location: BCRMV1+8
Function Call: WRITE
  • Prompt: !!,$C(7),"Bingo record is incomplete!"
  • Line Location: WARN+0
Function Call: WRITE
  • Prompt: !!,"Bingo record removed.",!
  • Line Location: WARN+0
Function Call: WRITE
  • Prompt: !!,"The Rx for ",NAM," isn't in the Bingo Board",!,"file and must be entered manually.",$C(7)
  • Line Location: REL+5
Function Call: WRITE
  • Prompt: !!,NAM," is already in the display queue.",$C(7)
  • Line Location: REL+6
Function Call: WRITE
  • Prompt: !!,$C(7),NAM," was entered on "_Y_".",!,"It can't be displayed and is now deleted."
  • Line Location: REL+7
Function Call: WRITE
  • Prompt: !!,NAM," is from another division",!,"and must be displayed manually.",$C(7)
  • Line Location: REL+9
Function Call: WRITE
  • Prompt: !!,$C(7),NM," is being edited!",!
  • Line Location: REL1+2
Function Call: WRITE
  • Prompt: !!,NAM," added to the "_$P($G(^PS(59.3,$P(RX0,"^",3),0)),"^")_" display."
  • Line Location: REL1+5
Function Call: WRITE
  • Prompt: !,$C(7),"This patient is enrolled in ScripTalk and may benefit from",!,"a non-visual announcement that prescriptions are ready."
  • Line Location: REL1+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] Classic Fileman Calls
^PS(52.11 - [#52.11] Classic Fileman Calls
^PS(59.2 - [#59.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call