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

Package: Drug Accountability

Routine: PSARIN


Information

PSARIN ;BIR/LTL-Loadable Inventory Items Report ;7/23/97

Source Information

Source file <PSARIN.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 4 DD^%DT  ^DIC  ^DIE  ^DIR  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  
Drug Accountability 1 ^PSADA  
IFCAP 1 ($$INVNAME,$$UNITCODE)^PRCPUX1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Drug Accountability 2 PSA GIP REPORT  PSANAC  

Entry Points

Name Comments DBIA/ICR reference
QUIT
HEADER
LOOK
NOINV
INV
DEV
START
SETUP
LOOP

External References

Name Field # of Occurrence
DD^%DT START
^%ZIS DEV
HOME^%ZIS DEV+1
^%ZISC QUIT+2
^%ZTLOAD DEV+1
$$S^%ZTLOAD HEADER+1
^DIC START+4
^DIE INV
^DIR NOINV+1, QUIT+1, HEADER
$$INVNAME^PRCPUX1 HEADER+4
$$UNITCODE^PRCPUX1 LOOP+3
^PSADA LOOK

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: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !!,"Inventory balance: "
  • Line Location: LOOP+2
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+4
Function Call: WRITE
  • Prompt: !,$E($$INVNAME^PRCPUX1(PSAINV),1,24)_" items to load into "_PSAINV(1),?56,PSARPDT,?70,"PAGE: "_PSAPG,!,PSALN,!,"ITEM",?10,"DESCRIPTION",?50,"DRUG FILE LINK"
  • Line Location: HEADER+4
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1
Routine Call
  • DIE
  • Line Location:
    • INV
Routine Call
  • DIC
  • Line Location:
    • START+4
Routine Call
  • DIR
  • Line Location:
    • NOINV+1
    • QUIT+1
    • HEADER
Routine Call
  • %ZIS
  • Line Location:
    • DEV

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(441 - [#441] LOOP
^PRCP(445 LOOP, LOOP+2
^PSD(58.8 - [#58.8] NOINV, START+2, START+3, LOOP, HEADER+2
^PSDRUG - [#50] LOOP+2
^PSDRUG("AB" LOOP
^VA(200 - [#200] HEADER+1

Label References

Name Line Occurrences
HEADER START+6, LOOP
QUIT LOOK, NOINV, DEV, DEV+1, START+3

Naked Globals

Name Field # of Occurrence
^("I" LOOP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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