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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PSN503D

Package: National Drug File

Routine: PSN503D


Information

PSN503D ;BIR/DMA-post install routine to load data ; 06 Dec 2016 12:35 PM

Source Information

Source file <PSN503D.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 5 FILE^DICN  (,FILE,UPDATE)^DIE  (,ENALL)^DIK  $$ROOT^DILFD  $$GET1^DIQ  
Kernel 4 ^%ZTLOAD  $$FMTE^XLFDT  UPDATE^XPDID  $$PATCH^XPDUTL  
National Drug File 2 ^PSNCLEAN  ING^PSNXREF  
Adverse Reaction Tracking 1 EN2^GMRAUIX0  
MailMan 1 ^XMD  
Pharmacy Data Management 1 PSN^PSSHUIDG  

Entry Points

Name Comments DBIA/ICR reference
WORD
MESSAGE
GROUP
DRUGFILE ;
REINDEX ;Make sure APC xref is correct
MORE ;REINDEXING
QUIT ;
LOAD ;GET DOSE STUFF
LOAD1 ;BUILD THE MESSAGE

External References

Name Field # of Occurrence
^%ZTLOAD DRUGFILE+28
FILE^DICN PSN503D+22
^DIE DRUGFILE+8, DRUGFILE+10, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15, DRUGFILE+23
FILE^DIE PSN503D+21, PSN503D+52
UPDATE^DIE PSN503D+40
^DIK PSN503D+32
ENALL^DIK REINDEX+9
$$ROOT^DILFD PSN503D+19, PSN503D+28, PSN503D+46
$$GET1^DIQ PSN503D+21
EN2^GMRAUIX0 REINDEX+1
^PSNCLEAN MORE+11
ING^PSNXREF PSN503D+54
PSN^PSSHUIDG DRUGFILE+28
$$FMTE^XLFDT DRUGFILE+7, LOAD1+6
^XMD GROUP+6, GROUP+16, DRUGFILE+23
UPDATE^XPDID PSN503D+23, PSN503D+41, PSN503D+53, DRUGFILE+16, QUIT+1
$$PATCH^XPDUTL DRUGFILE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.8 - [#120.8] Classic Fileman Calls
^PSDRUG - [#50] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( PSN503D+36, PSN503D+49
^GMR(120.8 - [#120.8] REINDEX+3, REINDEX+4, REINDEX+5!
^PS(50.416 - [#50.416] MORE+2!*, MORE+5, MORE+6, MORE+7, MORE+8
^PS(50.605 - [#50.605] DRUGFILE+14
^PS(50.607 - [#50.607] LOAD+1
^PS(56 - [#56] MORE+4!, MORE+9*
^PSDRUG - [#50] DRUGFILE+5, DRUGFILE+9!, DRUGFILE+10, DRUGFILE+11!, DRUGFILE+12, DRUGFILE+15, LOAD+1, LOAD+2, LOAD+3, LOAD+4
LOAD+5
^PSNDF(50.68 - [#50.68] PSN503D+31, PSN503D+32, DRUGFILE+6, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15
^TMP("PSN" PSN503D+10!, DRUGFILE+18!, QUIT+4!, LOAD1+1*, LOAD1+2*, LOAD1+3*, LOAD1+5*, LOAD1+6*, LOAD1+7*
^TMP("PSNN" PSN503D+10!, PSN503D+42*, PSN503D+54, QUIT+4!
^TMP($J PSN503D+10!, MESSAGE!*, GROUP+8!*, DRUGFILE+2!, DRUGFILE+7*, DRUGFILE+28, QUIT+4!, LOAD+1*, LOAD+2*, LOAD+3*
LOAD+4*, LOAD+5*, LOAD1+5, LOAD1+6, LOAD1+7
^XMB("NETNAME" GROUPGROUP+10, DRUGFILE+20
^XUSEC("PSNMGR" GROUP+1, GROUP+11, DRUGFILE+21

Label References

Name Line Occurrences
@( DRUGFILE+25
LOAD DRUGFILE+9
LOAD1 DRUGFILE+18
MORE REINDEX+1

Naked Globals

Name Field # of Occurrence
^( DRUGFILE+10*, DRUGFILE+15*, MORE+2, MORE+4, LOAD+2*, LOAD+3*, LOAD+4*, LOAD+5*, LOAD1+6, LOAD1+7
^("DOS1" DRUGFILE+9!, DRUGFILE+11!
^("DOS2" DRUGFILE+9!, DRUGFILE+11!
^("I" DRUGFILE+5
^("ND" DRUGFILE+5
^("POST" DRUGFILE+25
^(0 MORE+4, LOAD1+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CL PSN503D+7~, QUIT+2!
CLA PSN503D+7~, DRUGFILE+5*, QUIT+2!
CLASS REINDEX+2~, REINDEX+5*
CMOP PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
CT PSN503D+7~, WORD*, WORD+1*, QUIT+2!
DA PSN503D+7~, PSN503D+20*, PSN503D+21, PSN503D+22, PSN503D+32*, PSN503D+38*, PSN503D+40, PSN503D+54*, GROUP+1*, GROUP+11*
DRUGFILE+4*, DRUGFILE+5*, DRUGFILE+7, DRUGFILE+9, DRUGFILE+10, DRUGFILE+11, DRUGFILE+12, DRUGFILE+15, DRUGFILE+21*, DRUGFILE+23*
REINDEX+2~, MORE+2*, MORE+4*, MORE+9, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4, LOAD+5
DA(1 PSN503D+32*, PSN503D+54*, REINDEX+6*
DA1 PSN503D+7~, QUIT+2!, LOAD+2*, LOAD+3*, LOAD+4*, LOAD+5*
DD PSN503D+22!
DIA PSN503D+7~, PSN503D+19*, PSN503D+20, PSN503D+28*, PSN503D+29, PSN503D+31, PSN503D+32, PSN503D+36, PSN503D+37, PSN503D+42
PSN503D+46*, PSN503D+47, PSN503D+49, PSN503D+50, QUIT+2!
DIC PSN503D+7~, PSN503D+22*, QUIT+2!
DIC("DR" PSN503D+22*
DIC(0 PSN503D+22*
DIE PSN503D+7~, DRUGFILE+8*!, DRUGFILE+10*!, DRUGFILE+13*, DRUGFILE+14*, DRUGFILE+15*!, DRUGFILE+23*, QUIT+2!
DIFROM GROUP+6~, GROUP+16~, DRUGFILE+23~
DIK PSN503D+7~, PSN503D+32*, REINDEX+2~, REINDEX+7*, QUIT+2!
DIK(1 REINDEX+8*
DINUM PSN503D+7~, PSN503D+22*, QUIT+2!
DO PSN503D+22!
DR PSN503D+7~, DRUGFILE+8*!, DRUGFILE+10*!, DRUGFILE+13*, DRUGFILE+14*, DRUGFILE+15*!, DRUGFILE+23*, QUIT+2!
DT DRUGFILE+5
DUZ GROUP+2, GROUP+12, DRUGFILE+22
FDA PSN503D+7~, PSN503D+20!, PSN503D+29!, PSN503D+47!, QUIT+2!
FDA( PSN503D+21*, PSN503D+40*, PSN503D+52*
FILE PSN503D+7~, PSN503D+17*, PSN503D+19*, PSN503D+21, PSN503D+25*, PSN503D+28*, PSN503D+29, PSN503D+31, PSN503D+42, PSN503D+44*
PSN503D+46*, PSN503D+47, QUIT+2!
FLDS PSN503D+7~, PSN503D+29*, PSN503D+31, PSN503D+34, PSN503D+47*, PSN503D+48, PSN503D+51*, PSN503D+52, QUIT+2!
GE PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
GMRAIEN REINDEX+2~, REINDEX+4*, REINDEX+5
GROOT PSN503D+7~, PSN503D+17*, PSN503D+19, PSN503D+25*, PSN503D+28, PSN503D+44*, PSN503D+46, QUIT+2!
GROOT1 PSN503D+7~, PSN503D+19*, PSN503D+28*, PSN503D+46*, QUIT+2!
IEN PSN503D+29!, PSN503D+47!
IEN( PSN503D+40*
IENS PSN503D+7~, PSN503D+20!, PSN503D+29*, PSN503D+31, PSN503D+37*, PSN503D+38, PSN503D+40, PSN503D+47*, PSN503D+50*, PSN503D+52
QUIT+2!
IN PSN503D+7~, DRUGFILE+5*, DRUGFILE+7*, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4, LOAD+5
INA PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
IND PSN503D+7~, DRUGFILE+10*, DRUGFILE+15*, QUIT+2!
INDX PSN503D+7~, DRUGFILE+7*, DRUGFILE+18*, QUIT+2!, LOAD+1, LOAD+2, LOAD+3, LOAD+4, LOAD+5, LOAD1+2
LOAD1+5, LOAD1+6, LOAD1+7
INV PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
J PSN503D+7~, PSN503D+36*, PSN503D+37*, PSN503D+49*, PSN503D+50*, QUIT+2!, LOAD+1*, LOAD+2*, LOAD+3*, LOAD+4*
LOAD+5*, LOAD1+3*, LOAD1+6*, LOAD1+7*
JJ PSN503D+7~, PSN503D+19*, PSN503D+28*, PSN503D+46*, PSN503D+54*, QUIT+2!
K PSN503D+7~, MORE+2*, QUIT+2!
LI PSN503D+7~, PSN503D+36*, PSN503D+37*, PSN503D+49*, PSN503D+50*, QUIT+2!
LINE PSN503D+7~, DRUGFILE+18*, QUIT+2!, LOAD1+1*, LOAD1+2*, LOAD1+3*, LOAD1+5*, LOAD1+6*, LOAD1+7*
NA PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, MORE+5*, MORE+6*, MORE+7*, MORE+8*, QUIT+2!, LOAD+1, LOAD+2
LOAD+3, LOAD+4, LOAD+5, LOAD1+5*, LOAD1+6*, LOAD1+7
NAME PSN503D+7~, WORD+1*, QUIT+2!
ND PSN503D+7~, DRUGFILE+12*, DRUGFILE+13, QUIT+2!
NEW PSN503D+7~, PSN503D+19*, PSN503D+21, PSN503D+22, PSN503D+28*, PSN503D+40, PSN503D+46*, PSN503D+52, QUIT+2!
NFI PSN503D+7~, DRUGFILE+13*, QUIT+2!
POST PSN503D+7~, DRUGFILE+25*, QUIT+2!
PR PSN503D+7~, DRUGFILE+5*, DRUGFILE+6, DRUGFILE+7, DRUGFILE+11, DRUGFILE+12*, DRUGFILE+13, DRUGFILE+14, DRUGFILE+15, QUIT+2!
PSN PSN503D+7~, DRUGFILE+3*, DRUGFILE+9, DRUGFILE+11, QUIT+2!
PSN1 PSN503D+7~, DRUGFILE+3*, DRUGFILE+10, MORE+4!*, MORE+5, MORE+6, MORE+9*, QUIT+2!
PSN1( MORE+5*, MORE+6*, MORE+9
PSN11 PSN503D+7~, MORE+6*, QUIT+2!
PSN2 MORE+4!*, MORE+7, MORE+8, MORE+9*
PSN2( MORE+7*, MORE+8*, MORE+9
PSN21 PSN503D+7~, MORE+8*, QUIT+2!
PSNCPCNT PSN503D+27~, PSN503D+31*, PSN503D+32*
PSNDF PSN503D+7~, PSN503D+12*, QUIT+2!
R1 PSN503D+7~, QUIT+2!
ROOT PSN503D+7~, PSN503D+19*, PSN503D+22, PSN503D+28*, PSN503D+29*, PSN503D+36*, PSN503D+40, PSN503D+46*, PSN503D+47*, PSN503D+49*
PSN503D+52, QUIT+2!
ROOT1 PSN503D+7~, WORD*, WORD+1, DRUGFILE+4*, DRUGFILE+7, QUIT+2!
ROOT2 PSN503D+7~, WORD*, WORD+1*, DRUGFILE+4*, DRUGFILE+7, QUIT+2!
ROOT3 PSN503D+7~, WORD+1*, DRUGFILE+4*, DRUGFILE+11, QUIT+2!
SUB REINDEX+2~, REINDEX+3*, REINDEX+4, REINDEX+5, REINDEX+6
SUBS PSN503D+7~, QUIT+2!
TREC PSN503D+8~, PSN503D+12*, PSN503D+23*, PSN503D+41*, PSN503D+53*, DRUGFILE+16*
U REINDEX+4
VAC PSN503D+7~, DRUGFILE+14*, QUIT+2!
VAIN PSN503D+7~, DRUGFILE+6*, DRUGFILE+7, QUIT+2!
VAPN PSN503D+7~, DRUGFILE+5*, DRUGFILE+7, QUIT+2!
X PSN503D+8~, PSN503D+22*, GROUP*, GROUP+10*, DRUGFILE+5*, DRUGFILE+7*, DRUGFILE+20*, MORE+2*, QUIT+3!, LOAD+1*
LOAD+3*, LOAD+5*, LOAD1+6*
XMDUZ PSN503D+8~, GROUP+5*, GROUP+15*, DRUGFILE+19*, QUIT+3!
XMSUB PSN503D+8~, GROUP+4*, GROUP+14*, DRUGFILE+19*, QUIT+3!
XMTEXT PSN503D+8~, GROUP+6*, GROUP+16*, DRUGFILE+19*, QUIT+3!
XMY PSN503D+8~, GROUP!, GROUP+10!, DRUGFILE+20!, QUIT+3!
XMY( GROUP+1*, GROUP+2*, GROUP+11*, GROUP+12*, DRUGFILE+21*, DRUGFILE+22*
XMY("G." GROUP*, GROUP+10*, DRUGFILE+20*
XMZ PSN503D+8~, DRUGFILE+23, QUIT+3!
>> XPDGREF PSN503D+12, PSN503D+17, PSN503D+25, PSN503D+44, WORDMESSAGEGROUPGROUP+8, GROUP+10, DRUGFILE+4
DRUGFILE+20, DRUGFILE+25, LOAD1+3
>> XPDIDTOT PSN503D+12*, QUIT+1
XUMF PSN503D+8~, PSN503D+13*, QUIT+3!
ZTDESC PSN503D+9~, DRUGFILE+28*, QUIT+3!
ZTDTH PSN503D+9~, DRUGFILE+28*, QUIT+3!
ZTIO PSN503D+9~, DRUGFILE+28*, QUIT+3!
ZTRTN PSN503D+9~, DRUGFILE+28*, QUIT+3!
ZTSAVE PSN503D+9~, QUIT+3!
ZTSAVE("^TMP($J,""^""," DRUGFILE+28*

Marked Items

Name Field # of Occurrence
$T(EN2^GMRAUIX0 REINDEX+1
$T(PSN^PSSHUIDG DRUGFILE+28
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All