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: PSANAC

Package: Drug Accountability

Routine: PSANAC


Information

PSANAC ;BIR/LTL-Populate Pharmacy Location with Inventory Items ;7/23/97

Source Information

Source file <PSANAC.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 5 DD^%DT  NOW^%DTC  ^DIC  ^DIE  ^DIR  
Drug Accountability 4 ^PSADA  ^PSAPSI4  DEV^PSARIN  OPSITE^PSAUTL1  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSA GIP POPULATE  

Entry Points

Name Comments DBIA/ICR reference
QUIT
HEADER
LOOK
NOINV
INV
FIND
START
STUFF
CHEC
EXP
SETUP
LOOP

External References

Name Field # of Occurrence
DD^%DT START
NOW^%DTC STUFF+6
^%ZIS EXP+1
HOME^%ZIS EXP+2
^%ZISC QUIT+2
^%ZTLOAD EXP+2
$$S^%ZTLOAD HEADER+1
^DIC START+4, STUFF+2, STUFF+8, FIND+1, FIND+5
^DIE INV, FIND+2
^DIR NOINV, CHEC, CHEC+1, CHEC+2, CHEC+3, QUIT+1, HEADER
^PSADA LOOK
^PSAPSI4 FIND+6
DEV^PSARIN CHEC+1
OPSITE^PSAUTL1 HEADER+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$G(PSALOCN)_" is not linked to an Inventory Point.",!
  • Line Location: NOINV+0
Function Call: WRITE
  • Prompt: !,"I will display each item as it is loaded",!
  • Line Location: EXP+0
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: EXP+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: QUIT+1
Function Call: WRITE
  • Prompt: !!,"Task #",$G(ZTSK),", ",$G(ZTDESC)," was stopped by ",$P($G(^VA(200,+$G(DUZ),0)),U),"."
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,$E($P(^PRCP(445,+PSAINV,0),U),1,24)," items loading into ",PSAINV(1),?56,PSARPDT,?70,"PAGE: ",PSAPG,!,PSALN,!,"ITEM",?10,"DESCRIPTION",?50,"DRUG FILE LINK",!
  • Line Location: HEADER+5
Routine Call
  • %ZIS
  • Line Location:
    • EXP+2
Routine Call
  • DIE
  • Line Location:
    • INV
    • FIND+2
Routine Call
  • DIC
  • Line Location:
    • START+4
    • STUFF+2
    • STUFF+8
    • FIND+1
    • FIND+5
Routine Call
  • DIR
  • Line Location:
    • NOINV
    • CHEC
    • CHEC+1
    • CHEC+2
    • CHEC+3
    • QUIT+1
    • HEADER
Routine Call
  • %ZIS
  • Line Location:
    • EXP+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(441 - [#441] LOOP
^PRCP(445 LOOP, STUFF, HEADER+5
^PS(52.6 - [#52.6] FIND+6
^PS(52.7 - [#52.7] FIND+6
^PSD(58.8 - [#58.8] NOINV, START+2, START+3, START+7, LOOP, STUFF+7*, FIND+3
^PSD(58.81 - [#58.81] STUFF+9, FIND*, FIND+1
^PSDRUG - [#50] LOOP+1, STUFF+3, FIND+6
^PSDRUG("AB" LOOP
^VA(200 - [#200] HEADER+1

Label References

Name Line Occurrences
FIND FIND
HEADER START+6, LOOP
QUIT LOOK, NOINV, CHEC, CHEC+3, EXP+1, EXP+2, START+3

Naked Globals

Name Field # of Occurrence
^("I" LOOP+1
^(0 START+7*, STUFF, FIND+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% STUFF+6!
%DT START~
%ZIS EXP+1~*
%ZIS("A" EXP+1*
%ZIS("B" QUIT+3!
DA SETUP~, INV*, FIND+2*, FIND+5!
DA(1 START+4*, STUFF+2*, STUFF+8*, FIND+5*
DA(2 STUFF+8*, FIND+5*
DIC SETUP~, START~, START+4*!, STUFF+2*!, STUFF+8*!, FIND+1*!, FIND+4*, FIND+5!
DIC("DR" STUFF+1*, STUFF+8*
DIC(0 START+4*, STUFF+2*, STUFF+8*, FIND+1*, FIND+4*
DIE SETUP~, INV*, FIND+2*!
DINUM STUFF+8*!, FIND+1*!, FIND+4*, FIND+5!
DIR SETUP~, NOINV!, CHEC!, CHEC+1!, CHEC+2!, CHEC+3!, HEADER!
DIR("?" CHEC+3*
DIR("A" NOINV*, CHEC*, CHEC+1*, CHEC+2*, CHEC+3*, QUIT+1*
DIR("B" NOINV*, CHEC*, CHEC+1*, CHEC+2*, CHEC+3*
DIR(0 NOINV*, CHEC*, CHEC+1*, CHEC+2*, CHEC+3*, QUIT+1*, HEADER*
DIRUT SETUP~, CHEC, CHEC+3
DLAYGO STUFF+2*!, STUFF+8*!, FIND+1*!, FIND+5*!
DR SETUP~, INV*, FIND+2*
DT START, LOOP+1, STUFF+8
DTOUT SETUP~, CHEC+2
DUOUT SETUP~, CHEC+2
DUZ HEADER+1
IO("Q" EXP+1!, EXP+2, QUIT+3!
IOF QUIT, HEADER+5
IOP EXP+1~
IOSL LOOP
IOST FIND+6, QUIT, QUIT+1, HEADER
POP EXP+1~
PSAD START~, START+1*, LOOP+1
PSADRUG SETUP~, LOOP*, LOOP+1, STUFF+2, STUFF+3, STUFF+7, STUFF+8, FIND+3, FIND+5, FIND+6
PSADRUG(1 CHEC+2
PSADT START~, STUFF+6*
PSAINV SETUP~, NOINV, START+2*, START+3, START+5*, LOOP, STUFF, HEADER+5
PSAINV(1 HEADER+3*, HEADER+4*, HEADER+5
PSAIT SETUP~, START*, LOOP*, STUFF, FIND+6*
PSAIT(1 FIND+6*
PSAIT(2 FIND+6*
PSAIT(4 FIND+6*
PSAL START~
PSALN START~, HEADER+5*
>> PSALOC LOOK, NOINV, INV, START+2, START+3, START+4, START+7, LOOP, STUFF+2, STUFF+7
, STUFF+8, FIND+3, FIND+5
>> PSALOCN NOINV
>> PSAOSITN HEADER+3
PSAOUT SETUP~, LOOK*, CHEC, CHEC+2*, CHEC+3*, EXP+1*, EXP+2*, START*, START+3*, LOOP
, QUIT+1, HEADER*, HEADER+1*
PSAPG START~*, HEADER, HEADER+5*
PSAQTY SETUP~, STUFF*
PSARPDT START~*, HEADER+5
PSAT START~, FIND*, FIND+1, FIND+2, FIND+4
PSAY SETUP~, CHEC+3*, STUFF+1, STUFF+4
U STUFF, STUFF+3, FIND, FIND+6, HEADER+1, HEADER+5
X SETUP~, START~, STUFF+2*, STUFF+8*, FIND+1*, FIND+4*
Y SETUP~, NOINV, CHEC, CHEC+1, CHEC+2, CHEC+3, START~*, START+3, START+5, HEADER
ZTDESC EXP+2~*, HEADER+1
ZTDTH EXP+2~
ZTIO EXP+2~
>> ZTQUEUED QUIT+2
>> ZTREQ QUIT+2*
ZTRTN EXP+2~*
ZTSAVE EXP+2~
ZTSAVE("PSA*" EXP+2*
ZTSK EXP+2~, HEADER+1
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