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

Package: Controlled Substances

Routine: PSDFT


Information

PSDFT ;B'ham ISC/JPW,LTL - File NDES Info ; 26 June 95

Source Information

Source file <PSDFT.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 5 ^%DT  NOW^%DTC  ^DIC  ^DIE  IX^DIK  
MailMan 3 KILL^XM  XMZ^XMA2  ^XMD  
Health Level Seven 2 ($$FMDATE,$$FMNAME)^HLFNC  EN1^HLTRANS  
Controlled Substances 1 ^PSDFILM  
Registration 1 INP^VADPT  

Entry Points

Name Comments DBIA/ICR reference
END
ERR ;err log update
EDIT ;edit new transaction in 58.81
UPDATE ;update 58.8 and 58.81
ADD ;find entry number in 58.81
FIND9
EDIT9 ;edit error log
FIND
LOOP ;loop thru data from DFT message
OP

External References

Name Field # of Occurrence
^%DT LOOP+19
NOW^%DTC UPDATE+3
^DIC FIND+1, FIND9+1
^DIE EDIT9+1
IX^DIK EDIT+6
$$FMDATE^HLFNC LOOP+18
$$FMNAME^HLFNC LOOP+14
EN1^HLTRANS LOOP+41
^PSDFILM EDIT9+2
INP^VADPT EDIT+3
KILL^XM LOOP+22, LOOP+25, LOOP+37
XMZ^XMA2 LOOP+25
^XMD LOOP+37

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: EDIT+7
Routine Call
  • DIE
  • Line Location:
    • EDIT9+1
Routine Call
  • DIC
  • Line Location:
    • FIND+1
    • FIND9+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSD(58.81 - [#58.81] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" LOOP+19
^DIC(42 - [#42] LOOP+6
^DIC(45.7 - [#45.7] EDIT+4
^DPT - [#2] LOOP+14, LOOP+33
^HL(772 - [#772] LOOP+2, LOOP+3, LOOP+18
^PSD(58.8 - [#58.8] LOOP+5, LOOP+16, LOOP+29, UPDATE+2, UPDATE+4, UPDATE+5
^PSD(58.81 - [#58.81] ADD+1, FIND*, FIND+2, EDIT+1*, EDIT+4*, EDIT+5*
^PSD(58.89 - [#58.89] ERR+1, FIND9*, FIND9+2
^PSDRUG - [#50] LOOP+34
^VA(200 - [#200] LOOP+10, LOOP+12, LOOP+31, LOOP+32
^XUSEC("PSD ERROR" LOOP+27

Label References

Name Line Occurrences
FIND FIND
FIND9 FIND9
UPDATE LOOP+39

Naked Globals

Name Field # of Occurrence
^(0 UPDATE+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END!, UPDATE+3
%DT LOOP+19*, END!
%H END!
%I END!
BAL END!, UPDATE+4*, EDIT+1
CQTY END!
DA END!, EDIT+6!*, EDIT9+1!*
>> DFN EDIT+3*
DIC END!, FIND+1!*, FIND9+1!*
DIC(0 FIND+1*, FIND9+1*
DIE END!, EDIT9+1!*
DIK END!, EDIT+6!*
>> DILOCKTM UPDATE+2, ADD+1, ERR+1
DINUM END!, FIND+1*, FIND9+1*
DLAYGO END!, FIND+1!*, FIND9+1!*
DR END!, EDIT9+1!*
DUZ LOOP+26
>> HLDA LOOP+2, LOOP+3, LOOP+18
>> HLECH LOOP+4, LOOP+10, LOOP+12, LOOP+16
>> HLEVN LOOP+41*
>> HLFS LOOP+4, LOOP+7, LOOP+9, LOOP+11, LOOP+13, LOOP+14, LOOP+15, LOOP+17, LOOP+18, LOOP+41
>> HLSDATA(1 LOOP+41
>> HLSDATA(2 LOOP+41*
JJ END!
LQTY END!
NAOU LOOP+1~, LOOP+4*, LOOP+5, LOOP+6, EDIT9+1
NAOU(1 LOOP+5*, LOOP+6, LOOP+16, LOOP+29, UPDATE+2, UPDATE+4, UPDATE+5, EDIT+1
NAOUN END!
NODE END!
NUR1 LOOP+1~, LOOP+9*, LOOP+10, LOOP+31, EDIT+4
NUR1(1 LOOP+9*, LOOP+10
NUR2 LOOP+1~, LOOP+11*, LOOP+12, LOOP+17*, LOOP+32, EDIT+4
NUR2(1 LOOP+11*, LOOP+12
OK END!
OQTY END!
ORD END!
PAT LOOP+1~, LOOP+13*, LOOP+14, LOOP+33, END+1!, EDIT+3, EDIT+4
PATL END+1!
PSD LOOP+1~, LOOP+22~, LOOP+26*, LOOP+27*, END+1!, EDIT+6!
PSD(3 EDIT+4
PSDER END+1!, FIND9*, FIND9+1, EDIT9+1
PSDFT1 LOOP+1~, LOOP+3*, LOOP+7, LOOP+9, LOOP+15, LOOP+17
PSDM LOOP+1~, LOOP+39
PSDM( LOOP+12*, LOOP+28*, LOOP+29*, LOOP+30*, LOOP+31*, LOOP+32*, LOOP+33*, LOOP+34*, LOOP+35*, LOOP+36*
PSDM(0 LOOP+21
PSDM(1 LOOP+6*
PSDM(2 LOOP+8*
PSDM(3 LOOP+10*, LOOP+31
PSDM(4 LOOP+14*, LOOP+33
PSDM(5 LOOP+16*, LOOP+34
PSDM(6 LOOP+20*, LOOP+35
PSDPID LOOP+1~, LOOP+2*, LOOP+13, LOOP+14
PSDPN END+1!
PSDPV1 LOOP+1~, LOOP+2*, LOOP+4
PSDR LOOP+15*, LOOP+16, LOOP+34, END+1!, UPDATE+2, UPDATE+4, UPDATE+5, EDIT+1
PSDREC END+1!, FIND*, FIND+1, EDIT+1, EDIT+4, EDIT+5, EDIT+6, EDIT9+1
PSDRN END+1!
PSDT LOOP+18*, LOOP+19, END+1!, EDIT+1, EDIT9+1
PSDT(1 LOOP+19*, LOOP+20, LOOP+35
PSDTN END+1!, UPDATE+3*
PSDTYP LOOP+1~, LOOP+7*, LOOP+8, LOOP+12, LOOP+30, LOOP+32
PSDTYP(1 LOOP+7*, LOOP+8, LOOP+17, LOOP+30, EDIT+1, EDIT+4
PSDZPM LOOP+1~, LOOP+3*, LOOP+11
QTY LOOP+17*, LOOP+34, LOOP+38*, LOOP+39, END+1!, UPDATE+4, EDIT+1, EDIT+4
U LOOP+5, LOOP+6, LOOP+29, LOOP+31, LOOP+32, LOOP+33, LOOP+34, EDIT+4
VAERR EDIT+6!
>> VAROOT EDIT+3*
WQTY END+1!
X LOOP+19*, END+1!, FIND+1*, FIND9+1*
>> XMDUZ LOOP+24*
>> XMSUB LOOP+23*
>> XMTEXT LOOP+37*
>> XMY( LOOP+26*, LOOP+27*
>> XMZ LOOP+25
Y LOOP+19*, LOOP+20, END+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All