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

Package: Controlled Substances

Routine: PSDNTT1


Information

PSDNTT1 ;BIR/BJW-Transfer Green Sheet - Receive this NAOU ; 17 JUL 97

Source Information

Source file <PSDNTT1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 5 NOW^%DTC  ^DIC  FILE^DICN  ^DIE  IX^DIK  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Controlled Substances 1 PSDNTT  

Entry Points

Name Comments DBIA/ICR reference
END
EDIT ;edit new transaction in 58.81
DIE ;create the order request in 58.8
DRUG ;add drug and inactivate it
ADD ;find entry number in 58.81
COMP ;completed msg
MSG ;send mail message
BAL ;update naou to balance
COM ;complete order and transaction
FIND

External References

Name Field # of Occurrence
NOW^%DTC COM+1
^DIC FIND+1
FILE^DICN DIE+6, DRUG+2
^DIE DIE+10, DRUG+3
IX^DIK EDIT+10
^XMD MSG+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Accessing ",PSDRGN," information...",!!
  • Line Location: COM+2
Function Call: WRITE
  • Prompt: !!,"Updating your records now..."
  • Line Location: COM+4
Function Call: WRITE
  • Prompt: "order..."
  • Line Location: DIE+5
Function Call: WRITE
  • Prompt: "transaction..."
  • Line Location: DIE+11
Function Call: WRITE
  • Prompt: "done.",!!
  • Line Location: COMP+1
Function Call: WRITE
  • Prompt: ?2,!,"*** The status of your Green Sheet #"_PSDPN_" is now",!,?2,$S($P($G(^PSD(58.82,STAT,0)),"^")]"":$P(^(0),"^"),1:"UNKNOWN")_" ***",!
  • Line Location: COMP+3
Routine Call
  • DIE
  • Line Location:
    • DIE+10
    • DRUG+3
Routine Call
  • DIC
  • Line Location:
    • FIND+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" COM+1
^PSD(58.8 - [#58.8] COM+3, DIE+3, DIE+4*, DIE+8, EDIT+5, EDIT+12*, BAL+1, BAL+3*, BAL+4, DRUG+1
^PSD(58.81 - [#58.81] ADD+1, FIND*, FIND+2, EDIT+4, EDIT+6*, EDIT+7*, EDIT+8*, EDIT+9*, EDIT+13*, COMP+2
^PSD(58.82 - [#58.82] COMP+3
^TMP("PSDNTMSG" MSG+1!*, MSG+2*, MSG+3*, MSG+4*, MSG+5*, MSG+8!
^XUSEC("PSDMGR" MSG+7

Label References

Name Line Occurrences
DIE DIE+4
DRUG COM+3
END COMP+4
FIND FIND

Naked Globals

Name Field # of Occurrence
^(0 DIE+3*, COMP+3, DRUG+1*
^(7 EDIT+13*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % COM+1
>> AOU COM+3, DIE+3, DIE+4, DIE+6, DIE+7, DIE+8, EDIT+5, EDIT+6, EDIT+12, EDIT+13
, BAL+1, BAL+3, BAL+4, DRUG+1, DRUG+2, DRUG+3
>> AOUN MSG+4
DA DIE+6!, DIE+7*, EDIT+10!*, DRUG+2!, DRUG+3!*
DA(1 DIE+6*, DIE+7*, DRUG+2*, DRUG+3*
DA(2 DIE+6*, DIE+7*
DD DIE+6!, DRUG+2!
DIC DIE+6!*, FIND+1!*, DRUG+2!*
DIC(0 DIE+6*, FIND+1*, DRUG+2*
DIE DIE+6!*, DIE+10!, DRUG+2!*, DRUG+3!
DIK EDIT+10!*
>> DILOCKTM ADD+1, BAL+1
>> DINUM DIE+6*, FIND+1*, DRUG+2*
DLAYGO FIND+1!*
DO DIE+6!, DRUG+2!
DR DIE+6!, DIE+9*, DIE+10!, DRUG+3!*
>> EXP DIE+9, EDIT+6
>> FLAG COM+1*, COMP+4, DRUG+4*
>> JJ MSG+7*
>> LOT DIE+9, EDIT+6
>> MFG DIE+9, EDIT+6
>> PAT EDIT+8
>> PSDA EDIT+8, EDIT+13
>> PSDOUT DRUG+2*
>> PSDPN DIE+9, EDIT+6, COMP+3, MSG+3
>> PSDREC FIND*, FIND+1, EDIT+4, EDIT+6, EDIT+7, EDIT+8, EDIT+9, EDIT+10, EDIT+12, COMP+2
>> PSDRG COM+3, DIE+3, DIE+4, DIE+6, DIE+7, EDIT+6, EDIT+12, BAL+1, BAL+3, BAL+4
, DRUG+2, DRUG+3
>> PSDRGN COM+2, MSG+3
>> PSDRN DIE+4*, DIE+6, DIE+7, EDIT+6, EDIT+12
>> PSDS DIE+9, EDIT+6
>> PSDSP DIE+9
>> PSDT COM+1*, DRUG+3
>> PSDUZ DIE+9, EDIT+7, EDIT+13
>> QTY DIE+9
>> RECD COM+1*, DIE+9, EDIT+6, EDIT+7, EDIT+13
>> RECDT COM+1*, MSG+1
>> RQTY DIE+9, EDIT+6, EDIT+7, BAL+3
>> STAT DIE+8*, DIE+9, EDIT+5*, EDIT+6, COMP+2*, COMP+3
U DIE+8, EDIT+5
>> X COM+1, DIE+6*, FIND+1*, DRUG+2*
>> XMDUZ MSG+6*
>> XMSUB MSG+6*
>> XMTEXT MSG+6*
XMY MSG+1!, MSG+8!
XMY( MSG+7*, MSG+8*
>> Y COM+1*, DRUG+2
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 |  Naked Globals |  Local Variables |  All