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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PSSLDEDT

Package: Pharmacy Data Management

Routine: PSSLDEDT


Information

PSSLDEDT ;BIR/RTR-Edit Local Possible Dosage Unit/Dosage ;06/23/07

Source Information

Source file <PSSLDEDT.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  ^DIE  ^DIR  
National Drug File 1 ($$DFSU,$$OVRIDE,OVRIDE)^PSNAPIS  

Entry Points

Name Comments DBIA/ICR reference
EDT ;Edit New Local Possible Dosages Fields Numeric Dose and Dose Unit
EDTX ;
UL ;unlock drug
TEST(PSSLVTST) ;See if drug need Dose Unit and Numeric Dose defined

External References

Name Field # of Occurrence
^DIC EDTX+4
^DIE EDTX+43
^DIR EDTX+45
$$DFSU^PSNAPIS TEST+9
$$OVRIDE^PSNAPIS TEST+3
OVRIDE^PSNAPIS TEST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EDTX+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EDTX+5
Function Call: WRITE
  • Prompt: !!,"This drug is not matched to NDF and therefore will be excluded from dosing",!,"checks."
  • Line Location: EDTX+11
Function Call: WRITE
  • Prompt: !!,"Another person is editing this drug.",!
  • Line Location: EDTX+12
Function Call: WRITE
  • Prompt: $G(PSSLVSXX)_" "_$G(PSSLVUNX)
  • Line Location: EDTX+21
Function Call: WRITE
  • Prompt: " "_$G(PSSLVUNX)
  • Line Location: EDTX+23
Function Call: WRITE
  • Prompt: " Unit: "_$G(PSSLVUNX)
  • Line Location: EDTX+36
Function Call: WRITE
  • Prompt: !!,"No local possible dosages exist for this drug."
  • Line Location: TEST+4
Routine Call
  • DIC
  • Line Location:
    • EDTX+4
Routine Call
  • DIE
  • Line Location:
    • EDTX+43
Routine Call
  • DIR
  • Line Location:
    • EDTX+45

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.606 - [#50.606] TEST+11, TEST+12, TEST+13, TEST+16
^PS(50.607 - [#50.607] EDTX+10
^PS(50.7 - [#50.7] TEST+10
^PS(51.24 - [#51.24] EDTX+41, EDTX+51
^PSDRUG - [#50] EDTX+6, EDTX+7, EDTX+12, EDTX+32, EDTX+46, UL+1, TEST+4, TEST+10

Label References

Name Line Occurrences
$$TEST EDTX+8
EDTX EDTX+9, EDTX+12, EDTX+53
UL EDTX+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDT+1~, EDTX+42!*, EDTX+43!
DA(1 EDTX+42*
DIC EDT+1~, EDTX+4!*
DIC("A" EDTX+4*
DIC(0 EDTX+4*
DIDEL EDT+2~, EDTX+42!
DIE EDT+1~, EDTX+42!*, EDTX+43!
>> DILOCKTM EDTX+12
DIR EDT+2~, EDTX+44!, EDTX+45!
DIR("?" EDTX+44*
DIR("A" EDTX+44*
DIR("B" EDTX+44*
DIR(0 EDTX+44*
DIROUT EDT+1~
DIRUT EDT+1~
DR EDT+1~, EDTX+42!*, EDTX+43!
DTOUT EDT+1~, EDTX+4!, EDTX+5, EDTX+42!, EDTX+43, EDTX+45
DUOUT EDT+1~, EDTX+4!, EDTX+5, EDTX+45
PSSLVAF6 EDT+2~, EDTX+2!, EDTX+47*, EDTX+48
PSSLVBF6 EDT+2~, EDTX+2!, EDTX+47*, EDTX+48
PSSLVCNT EDT+1~, EDTX+1!, EDTX+31*, EDTX+33, EDTX+38*
PSSLVDF EDT+1~, EDTX+1!, TEST+9*, TEST+10*, TEST+11, TEST+12, TEST+13, TEST+16
PSSLVDOV TEST+1~, TEST+2*, TEST+3*, TEST+11, TEST+12, TEST+16
PSSLVFLG EDT+1~, EDTX+1!, EDTX+16*, EDTX+18*, EDTX+33
PSSLVGG1 EDT+2~, EDTX+2!, EDTX+19*, EDTX+21, EDTX+23
PSSLVGG2 EDT+2~, EDTX+2!, EDTX+19*, EDTX+21, EDTX+23
PSSLVGG3 EDT+2~, EDTX+2!, EDTX+19*, EDTX+26, EDTX+28
PSSLVGG4 EDT+2~, EDTX+2!, EDTX+19*, EDTX+26, EDTX+28
PSSLVGG5 EDT+2~, EDTX+2!, EDTX+34*, EDTX+36
PSSLVGG6 EDT+2~, EDTX+2!, EDTX+34*, EDTX+36
PSSLVIEN EDT+1~, EDTX+1!, EDTX+6*, EDTX+7, EDTX+8, EDTX+12, EDTX+32, EDTX+42, EDTX+46, UL+1
PSSLVLCX EDT+1~, EDTX+1!, EDTX+46*, EDTX+47, EDTX+48, EDTX+49, EDTX+50, EDTX+51
PSSLVLOC EDT+1~, EDTX+1!, EDTX+32*, EDTX+39, EDTX+40, EDTX+41, EDTX+47, EDTX+48
PSSLVLP EDT+1~, EDTX+1!, EDTX+32*, EDTX+42, EDTX+46
PSSLVLPN EDT+1~, EDTX+1!
PSSLVND1 EDT+1~, EDTX+1!, EDTX+6*, EDTX+11, EDTX+13, TEST+3, TEST+9
PSSLVND3 EDT+1~, EDTX+1!, EDTX+6*, EDTX+11, EDTX+13, TEST+3, TEST+9
PSSLVNDF EDT+1~, EDTX+1!, EDTX+10, EDTX+13, TEST+9*
PSSLVOK EDT+1~, EDTX+1!, EDTX+8*, EDTX+9
PSSLVOUT EDT+1~, EDTX+1!, EDTX+3*, EDTX+32, EDTX+43, EDTX+45*, EDTX+53
PSSLVSTN EDT+1~, EDTX+1!, EDTX+7*, EDTX+14*, EDTX+17, EDTX+19, EDTX+26, EDTX+27, EDTX+33, EDTX+34
, EDTX+35
PSSLVSXX EDT+1~, EDTX+1!, EDTX+13*, EDTX+15*, EDTX+17, EDTX+19, EDTX+21, EDTX+22, EDTX+33, EDTX+34
, EDTX+35
PSSLVSZZ EDT+1~, EDTX+1!, EDTX+13*
PSSLVTST EDT+1~, EDTX+1!, TEST~, TEST+4, TEST+10
PSSLVUNT EDT+1~, EDTX+1!, EDTX+7*, EDTX+10
PSSLVUNX EDT+1~, EDTX+1!, EDTX+10*, EDTX+19, EDTX+21, EDTX+23, EDTX+24, EDTX+26, EDTX+28, EDTX+29
, EDTX+33, EDTX+34, EDTX+36, EDTX+37
PSSLVZR EDT+1~, EDTX+1!, EDTX+6*, TEST+5
X EDT+1~
Y EDT+1~, EDTX+5, EDTX+6, EDTX+42!, EDTX+43, EDTX+45

Marked Items

Name Field # of Occurrence
$T(OVRIDE^PSNAPIS TEST+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All