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

Package: Drug Accountability

Routine: PSANDCUT


Information

PSANDCUT ;BIRM/MFR - NDC Utility ;07/01/08

Source Information

Source file <PSANDCUT.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Pharmacy Data Management 1 ($$GETNDC,$$NDCFMT)^PSSNDCUT  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSARDCU1  

Entry Points

Name Comments DBIA/ICR reference
NDCEDT(DRG,NDC) ; Allows editing of the Rx NDC code
; Input: (o) DRG - Drug IEN (#50)
; (o) NDC - Default NDC Number/Return parameter
ASK ; Ask for NDC
DEL ; Ask again after deleted
END
NDCHLP ; Help Text for the NDC Code Selection

External References

Name Field # of Occurrence
^DIR DEL+1
$$GETNDC^PSSNDCUT NDCEDT+13
$$NDCFMT^PSSNDCUT NDCEDT+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Deleted!"
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: " ",NDC
  • Line Location: DEL+8
Function Call: WRITE
  • Prompt: !?10,"Select one of the following NDC(s) below:",!
  • Line Location: NDCHLP+2
Function Call: WRITE
  • Prompt: !?15,$J(I,2)," - ",^TMP($J,"PSANDCFM",I)
  • Line Location: NDCHLP+5
Function Call: WRITE
  • Prompt: !?12,"<No NDC(s) available for this drug>"
  • Line Location: NDCHLP+6
Function Call: WRITE
  • Prompt: !!?10,"Or enter it manually in case the correct"
  • Line Location: NDCHLP+7
Function Call: WRITE
  • Prompt: !?10,"NDC is not on the list above."
  • Line Location: NDCHLP+8
Routine Call
  • DIR
  • Line Location:
    • DEL+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] NDCEDT+19, NDCEDT+20
^TMP($J NDCEDT+6!, NDCEDT+10*, NDCEDT+14, NDCEDT+15*, NDCEDT+21, NDCEDT+22*, NDCEDT+23*, ASK+2, DEL+4, DEL+5
, END!, NDCHLP+3, NDCHLP+4, NDCHLP+5

Label References

Name Line Occurrences
DEL DEL+1
END DEL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN NDCEDT+5~
DIR NDCEDT+5~, ASK+1~, ASK+2!
DIR("?" ASK+3*
DIR("A" ASK+2*
DIR("B" ASK+2*!, DEL+1!
DIR(0 ASK+2*
DIROUT ASK+1~, DEL+2
DIRUT ASK+1~, DEL+2
DRG NDCEDT~, NDCEDT+13, NDCEDT+19, NDCEDT+20
DRGNAM NDCEDT+5~
I NDCEDT+5~, NDCHLP+1~, NDCHLP+4*, NDCHLP+5
IDX NDCEDT+5~, NDCEDT+9*, NDCEDT+10*, NDCEDT+15*, NDCEDT+22*, NDCEDT+23
NDC NDCEDT~, NDCEDT+10, NDCEDT+13*, NDCEDT+14, NDCEDT+15, DEL+1*, DEL+2*, DEL+4*, DEL+5*, DEL+6*
, DEL+7*, DEL+8
PID NDCEDT+5~
PRPT NDCEDT+5~
SNDC NDCEDT+5~, NDCEDT+20*, NDCEDT+21, NDCEDT+22, NDCEDT+23
SYN NDCEDT+5~, NDCEDT+18*, NDCEDT+19*, NDCEDT+20
X NDCEDT+5~, DEL+1, DEL+2
Y NDCEDT+5~, ASK+1~, DEL+3, DEL+4, DEL+5, DEL+6, DEL+7
Z NDCEDT+5~, NDCEDT+20*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All