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 |  Local Variables |  All
Print Page as PDF
Routine: PSBMLEN1

Package: Barcode Medication Administration

Routine: PSBMLEN1


Information

PSBMLEN1 ;BIRMINGHAM/EFC-BCMA MEDICATION LOG FUNCTIONS ;Mar 2004

Source Information

Source file <PSBMLEN1.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA Fileman 8 ^%DT  NOW^%DTC  ^DDS  HLP^DDSUTL  YN^DICN  ^DIK  D^DIQ  ^DIR  
Barcode Medication Administration 5 RPC^PSBML  VAL^PSBMLVAL  ($$GETADMIN,$$GETFREQ)^PSBVDLU1  SCANFAIL^PSBVDLU3  (CLEAN,PSJ1)^PSBVT  
Inpatient Medications 1 ENE^PSJBCMA4  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSBMLEN  

Entry Points

Name Comments DBIA/ICR reference
FILE ; Call the med log RPC to file it and DDS to edit it
SCANFAIL ;File an MSF record
FORUM
NEW(Y) ; Create the new entry
FDATE ;Check Admin Time for future date/time.

External References

Name Field # of Occurrence
^%DT NEW+60
NOW^%DTC NEW+4, NEW+60, FDATE+2
^DDS FILE+13
HLP^DDSUTL FDATE+3
YN^DICN NEW+9, NEW+20, NEW+29, NEW+72
^DIK FILE+16, FILE+24
D^DIQ NEW+60, NEW+71
^DIR NEW+33, NEW+67, NEW+69, FILE+8
RPC^PSBML FILE+2
VAL^PSBMLVAL NEW+25
$$GETADMIN^PSBVDLU1 NEW+10, NEW+61
$$GETFREQ^PSBVDLU1 NEW+10
SCANFAIL^PSBVDLU3 SCANFAIL+12
CLEAN^PSBVT NEW+3
PSJ1^PSBVT NEW+3
ENE^PSJBCMA4 NEW+54

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NEW+3
Function Call: WRITE
  • Prompt: !,"Order: ",PSBONX
  • Line Location: NEW+13
Function Call: WRITE
  • Prompt: !,"Medication: ",PSBOITX
  • Line Location: NEW+14
Function Call: WRITE
  • Prompt: !,"Dosage: ",PSBDOSE
  • Line Location: NEW+15
Function Call: WRITE
  • Prompt: !,"Schedule: ",PSBSCH
  • Line Location: NEW+16
Function Call: WRITE
  • Prompt: !,"Admin Times: ",$S(PSBODSCH:"(Odd Sched.)",1:PSBADST)
  • Line Location: NEW+17
Function Call: WRITE
  • Prompt: !!,"Brief Administration History: ",!
  • Line Location: NEW+26
Function Call: WRITE
  • Prompt: !,?5,PSB(I)
  • Line Location: NEW+26
Function Call: WRITE
  • Prompt: !,"This operation is NOT AVAILABLE in PSB READ ONLY mode.",!
  • Line Location: NEW+27
Function Call: WRITE
  • Prompt: !,"This operation is NOT AVAILABLE in PSB READ ONLY mode.",!
  • Line Location: NEW+28
Function Call: WRITE
  • Prompt: !!,"Sorry, Reason is required, No Entry Made!"
  • Line Location: NEW+34
Function Call: WRITE
  • Prompt: !,$J($S(X=1:X,1:X-1),2),". ",$S(X=1:$P(PSB(X),"^",2),1:PSB(X))
  • Line Location: FILE+6
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: FDATE+3
Routine Call
  • DDS
  • Line Location:
    • FILE+13
Routine Call
  • DIR
  • Line Location:
    • NEW+33
    • NEW+67
    • NEW+69
    • FILE+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSB(53.79 - [#53.79] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSB(53.79 - [#53.79] NEW+54, FILE+11, FILE+12, FILE+14, FILE+15, FILE+16!, FILE+18, FILE+19, FILE+20, FILE+21
, FILE+22, FILE+23, FILE+24!, FILE+27*, FILE+31*, SCANFAIL+2, SCANFAIL+3, SCANFAIL+5, SCANFAIL+6, SCANFAIL+7
, SCANFAIL+8, SCANFAIL+9, SCANFAIL+10
^TMP("PSB" NEW+11!*, NEW+62, NEW+63, FORUM+20!
^XUSEC("PSB INSTRUCTOR" NEW+28
^XUSEC("PSB READ ONLY" NEW+18, NEW+27
^XUSEC("PSB STUDENT" NEW+28

Label References

Name Line Occurrences
FILE NEW+53, FORUM+19
SCANFAIL FILE+32

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % NEW+5, NEW+9*, NEW+20*, NEW+29*, NEW+72*, FDATE+3
>> %DT NEW+59*
>> %DT("A" NEW+59*
>> %DT("B" NEW+60*
>> %DT(0 NEW+60*!
>> A FILE+15*, FILE+23*
>> AADT FILE+15*, FILE+16, FILE+23*, FILE+24
>> DA NEW+54, FILE+10*, FILE+11, FILE+12, FILE+14, FILE+15, FILE+16, FILE+18, FILE+19, FILE+20
, FILE+22, FILE+23, FILE+24, FILE+27, SCANFAIL+2, SCANFAIL+3, SCANFAIL+5, SCANFAIL+6, SCANFAIL+7, SCANFAIL+8
, SCANFAIL+9, SCANFAIL+10
>> DDSBR FDATE+3*
>> DDSERROR FDATE+3*
>> DDSFILE FILE+10*
>> DDSPARM FILE+10*
>> DFN NEW+3, NEW+10, NEW+25, NEW+40, NEW+61, FORUM+5, FILE+15*, FILE+16, FILE+23*, FILE+24
>> DIK FILE+16*, FILE+24*
>> DILOCKTM FILE+14
DIR NEW+31!, NEW+67!, NEW+68!, FILE+8!
DIR("A" NEW+31*, NEW+68*
DIR(0 NEW+31*, NEW+67*, NEW+68*, FILE+8*
>> DR FILE+11*, FILE+12*
DUZ NEW+18, NEW+27, NEW+28
>> I NEW+26*
IOF NEW+3, NEW+6, FILE+5
PSB NEW+1~, NEW+25, FILE+1~, FILE+2, FILE+3
PSB( NEW+26, FILE+6
PSB(" " NEW+26
PSB(0 FILE+3*, FILE+6
PSB(1 NEW+26, FILE+3*, FILE+4, FILE+10
>> PSBADA( NEW+51, FORUM+17
PSBADST NEW+1~, NEW+10*, NEW+11, NEW+17
PSBAUDIT FILE+1~, FILE+9*
>> PSBCNTNU NEW+19*
>> PSBDDA( NEW+50, FORUM+16
>> PSBDFN FILE+21, FILE+22
>> PSBDOSE NEW+15, NEW+39, FORUM+4
>> PSBDOSEF NEW+37*, NEW+50, FORUM+1*, FORUM+2*, FORUM+16
>> PSBDT NEW+10
>> PSBDTX NEW+60*, NEW+61, NEW+70*, NEW+71, FORUM+10
PSBFREQ NEW+1~, NEW+10*, NEW+12, NEW+61
>> PSBIEN FILE+28, FILE+30
>> PSBIEN(1 FILE+28, FILE+30
>> PSBINCX FILE+3
>> PSBINDX NEW+49*, NEW+50*, NEW+51*, NEW+52*, FORUM+15*, FORUM+16*, FORUM+17*, FORUM+18*
>> PSBMMEN NEW+2*, FILE+9, FILE+32
>> PSBODSCH NEW+12*, NEW+17, NEW+61, NEW+65
>> PSBOIT NEW+44, FORUM+9
>> PSBOITX NEW+14
>> PSBONX NEW+10, NEW+13, NEW+25, NEW+41, NEW+48, NEW+61, NEW+66, FORUM+6, FORUM+14, FILE+21
, FILE+22
>> PSBOSP NEW+5
>> PSBOST NEW+10, NEW+61
PSBPRM SCANFAIL+1~, SCANFAIL+12
PSBPRM(0 SCANFAIL+4*
PSBPRM(1 SCANFAIL+11*
PSBREC NEW+1~, FILE+2
PSBREC( NEW+50*, NEW+51*, NEW+52*, FORUM+16*, FORUM+17*, FORUM+18*
PSBREC(0 NEW+40*, NEW+54, FORUM+5*
PSBREC(1 NEW+41*, NEW+54, FORUM+6*
PSBREC(2 NEW+42*, NEW+54, FORUM+7*
PSBREC(3 NEW+43*, FORUM+8*
PSBREC(4 NEW+44*, FORUM+9*
PSBREC(5 NEW+45*, FORUM+10*
PSBREC(6 NEW+35*, FORUM+11*
PSBREC(7 NEW+46*, FORUM+12*
PSBREC(8 NEW+47*, FORUM+13*
PSBREC(9 NEW+48*, FORUM+14*
PSBRSLT SCANFAIL+1~, SCANFAIL+12
PSBSAVE FILE+1~, FILE+9*, FILE+14, FILE+17
>> PSBSCH NEW+16
>> PSBSCHT NEW+24, NEW+26, NEW+30, NEW+42, NEW+58, FORUM+7
>> PSBSCTMX NEW+61*, NEW+65
>> PSBSOLA( NEW+52, FORUM+18
PSBTIMX FDATE+1~, FDATE+2*, FDATE+3
>> PSBVARD NEW+39*, FORUM+4*
PSBX SCANFAIL+1~, SCANFAIL+2*, SCANFAIL+4
PSBX1 SCANFAIL+1~, SCANFAIL+3*, SCANFAIL+4, SCANFAIL+5, SCANFAIL+7, SCANFAIL+9
PSBX2 SCANFAIL+1~, SCANFAIL+6*, SCANFAIL+8*, SCANFAIL+9, SCANFAIL+10*, SCANFAIL+11
>> PSBXUIT FILE+21*, FILE+25*, FILE+26, FILE+29
>> PSBXX NEW+62*, NEW+63
>> PSBY FILE+19*, FILE+20
>> PSBYX FILE+21*, FILE+22
>> PSBYZ FILE+22*
U NEW+50, NEW+54, FORUM+16, FILE+10, FILE+11, FILE+12, FILE+15, FILE+18, FILE+20, FILE+22
, FILE+23, FILE+27, FILE+31, SCANFAIL+4, SCANFAIL+5, SCANFAIL+6, SCANFAIL+7, SCANFAIL+8, SCANFAIL+9, SCANFAIL+10
>> X NEW+26*, NEW+50*, NEW+51*, NEW+52*, NEW+60, NEW+63*, NEW+64*, NEW+68, FORUM+16*, FORUM+17*
, FORUM+18*, FILE+6*, FILE+30*, FILE+31, FILE+32, FDATE+2
Y NEW~, NEW+3, NEW+30, NEW+34, NEW+35, NEW+60, NEW+63*, NEW+64, NEW+69, NEW+71*
, NEW+72, FILE+31*
Y(0 NEW+70
>> Z NEW+64*, FILE+31*
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 |  Local Variables |  All