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

Package: IHS Changes To Pharmacy

Routine: APSPDRP


Information

APSPDRP ; IHS/DSD/ENM - SORT ENTRIES FROM DUE REVIEW FILE ; [ 09/03/97 1:30 PM ]

Source Information

Source file <APSPDRP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^%DT  ^DIC  
IHS Changes To Pharmacy 1 ^APSPDRP1  

Entry Points

Name Comments DBIA/ICR reference
BD ;
BODY ;
EN
END
BODYX
EOJ ;
DIC ;
SORT ;
START ;
QUE2 ;
QUE ;
QUEX
BDX

External References

Name Field # of Occurrence
^%DT BD+4, BD+8
^%ZIS QUE+3
^%ZISC QUE+7, QUE+8
^%ZTLOAD QUE+13, QUE2+7
^APSPDRP1 BODY+4
^DIC DIC+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Review's on File for this Study..",!
  • Line Location: DIC+4
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !!,"Sorry, you cannot queue to your screen or to a slave printer.",!
  • Line Location: QUE+5
Routine Call
  • DIC
  • Line Location:
    • DIC+3
Routine Call
  • %ZIS
  • Line Location:
    • QUE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APSPDUE(32.1 - [#9009032.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APSPDUE(32 - [#9009032] DIC+4, BODY+1, SORT+1, SORT+2
^TMP("APSPDRP1" BD+1!, SORT+2*

Label References

Name Line Occurrences
BD START+1, BD+9
BDX BD+5, BD+9
BODY EN
BODYX BODY+3
DIC START+3, DIC+4, DIC+5
END START+2, START+4, START+6
EOJ END
QUE START+5, QUE+5
QUE2 BODY+3
QUEX QUE+4, QUE+7
SORT BODY+1

Naked Globals

Name Field # of Occurrence
^(0 SORT+1, SORT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT BD+3*
>> %DT("A" BD+2*, BD+7*
%ZIS QUE+2*, EOJ+2!
APSPDRP EOJ+1!
APSPDRP("BD" BD+6*, BODY+1
APSPDRP("DA" SORT+1*, SORT+2
APSPDRP("DFN'S" START+4, DIC+5*, DIC+6!, SORT+1
APSPDRP("ED" START+2, BD+10*, BODY+1
APSPDRP("IOP" QUE+6*, QUE2+6
APSPII BODY+1*, BODY+2!, SORT+1, SORT+2, EOJ+1!
DIC DIC+1*, DIC+3!
DIC("A" DIC+4*, DIC+5*
DIC(0 DIC+2*
DR DIC+3!
>> DTOUT DIC+6
>> DUOUT DIC+6
IO QUE+5, QUE+7
IO("Q" QUE+5!, QUE+7
IO(0 QUE+5, QUE+7
IOM QUE+6
ION QUE+6
IOP EOJ+1!
IOQ START+6, EOJ+1!
POP START+6, QUE+4, QUE+14*, EOJ+1!
U SORT+1, SORT+2
>> X BD+9
>> Y BD+5, BD+6, BD+9, BD+10, DIC+4, DIC+5
ZTDESC QUE+12*, QUE2+5*, EOJ+2!
>> ZTDTH QUE2+1*
ZTIO QUE+11*, QUE2+6*, EOJ+1!
>> ZTQUEUED BODY+3
>> ZTREQ BODY+3*
ZTRTN QUE+9*, QUE2+2*, EOJ+2!
ZTSAVE EOJ+1!
ZTSAVE("APSPDRP(""BD"")" QUE+9*, QUE2+2*
ZTSAVE("APSPDRP(""DFN'S""," QUE+10*
ZTSAVE("APSPDRP(""ED"")" QUE+11*, QUE2+4*
ZTSAVE("APSPDRP(""IOP"")" QUE+11*, QUE2+4*
ZTSAVE("^TMP(""APSPDRP1"",$J," QUE2+3*
ZTSK QUE+14, EOJ+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