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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: XBENHANC

Package: IHS VA Utilities

Routine: XBENHANC


Information

XBENHANC ; IHS/ADC/GTH - DISPLAY/PRINT ENHANCEMENTS FIELD IN PACKAGE FILE ; [ 02/07/97 3:02 PM ]

Source Information

Source file <XBENHANC.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$REPEAT^XLFSTR  
VA Fileman 3 DT^DICRW  ^DIWP  ^DIWW  
IHS VA Utilities 1 $$DIR^XBDIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contract Health Management Information System 2 ACHS DEFDEN ENHANCEMENTS  ACHS ENHANCEMENTS  

Entry Points

Name Comments DBIA/ICR reference
DIWP(X) ;
K ;
DEV ;
START ;EP - TaskMan.
EN(XB) ;PEP - XB = Namespace of package to print enhancements.
TOF ;

External References

Name Field # of Occurrence
^%ZIS DEV+2, DEV+3
HOME^%ZIS EN+2
^%ZISC DEV+6, K+2, START+16
^%ZTLOAD DEV+8
DT^DICRW EN+2
^DIWP DIWP+2
^DIWW START+14
$$DIR^XBDIR TOF+4
$$REPEAT^XLFSTR TOF+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"Please queue to system printers."
  • Line Location: DEV+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: TOF+3
Function Call: WRITE
  • Prompt: @IOF,!!,?DIWL-1,XBHDR,?(DIWR-$L("Page "_XBPG)-1),"Page ",XBPG,!?DIWL-1,$$REPEAT^XLFSTR("-",DIWR-DIWL),!!
  • Line Location: TOF+6
Routine Call
  • %ZIS
  • Line Location:
    • EN+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
    • DEV+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] START+2, START+4, START+5, START+7, START+13
^UTILITY($J START+8!, START+15!

Label References

Name Line Occurrences
DEV DEV+6, DEV+9
DIWP START+13
K DEV+3
START DEV+4
TOF START+11, START+13
XBENHANC DEV+7

Naked Globals

Name Field # of Occurrence
^( START+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+12*, START+13*, DIWP+1~, TOF+1~
>> %ZIS DEV+1*
A START+1~, START+2*, START+3, START+4, START+5, START+7, START+13, DIWP+1~, TOF+1~
B START+1~, START+5*, START+6, START+13, DIWP+1~, TOF+1~
DIRUT START+1~, START+13, START+14, TOF+5
DIWF START+1~, START+9*
DIWL START+1~, START+9*, TOF+6
DIWR START+1~, START+9*, TOF+6
IO START+10, TOF+4
IO("Q" DEV+4, DEV+5!
IO("S" DEV+6, TOF+4
IO(0 TOF+4
IOF TOF+6
IOM DEV+7, START+9
ION DEV+7
>> IOP DEV+3*
IOSL DEV+7, START+13
IOST DEV+6, DEV+7
>> POP DEV+3
U START+7
X DIWP~
XB EN~, EN+1, START+2
XBHDR START+1~, START+7*, TOF+6
XBPG START+1~, TOF+2*, TOF+6
>> ZTDESC DEV+7*
>> ZTIO DEV+7*
>> ZTQUEUED TOF+4
>> ZTRTN DEV+7*
>> ZTSAVE("XB" DEV+7*
ZTSK DEV+9, K+1!

Marked Items

Name Field # of Occurrence
$T(XBENHANC DEV+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All