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

Package: Contract Health Management Information System

Routine: ACHSCHLG


Information

ACHSCHLG ; IHS/ITSC/PMF - COMPRESS PRINTING OF HOSPITAL LOG ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSCHLG.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 EN1^DIP  ^DIR  
IHS VA Utilities 1 $$DIR^XBDIR  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHSRPTHOSPLOG  

Entry Points

Name Comments DBIA/ICR reference
DEVICE ;Device Selection
NOCON ;
END ;

External References

Name Field # of Occurrence
^%ZIS DEVICE+5
EN1^DIP DEVICE+33
^DIR DEVICE+14, DEVICE+22
$$DIR^XBDIR NOCON+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!?20,"This report may take awhile to compile."
  • Line Location: ACHSCHLG+3
Function Call: WRITE
  • Prompt: !?9,"It is recommended that you QUEUE your output to a PRINTER."
  • Line Location: ACHSCHLG+4
Function Call: WRITE
  • Prompt: *7,*7,!!,"This report requires 132 column format."
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+4
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED - REQUEST ABORTED!"
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+11
Function Call: WRITE
  • Prompt: @ACHS("PRINT",10)
  • Line Location: DEVICE+18
Function Call: WRITE
  • Prompt: !!!,"You have elected NOT to print in compressed print mode",!,"and the selected printer does not have 132 column capability."
  • Line Location: DEVICE+19
Function Call: WRITE
  • Prompt: !!,"Please make sure the printer is loaded with 132 column paper."
  • Line Location: DEVICE+25
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: DEVICE+29
Function Call: WRITE
  • Prompt: *7,!!,"===Condensed Print Mode has not been established for this Device.===",!!!!
  • Line Location: NOCON+1
Routine Call
  • DIR
  • Line Location:
    • DEVICE+14
    • DEVICE+22
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACHSF - [#9002080] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] DEVICE+8, DEVICE+9, DEVICE+10

Label References

Name Line Occurrences
DEVICE DEVICE+17
END DEVICE+6, DEVICE+17, NOCON+3
NOCON DEVICE+8, DEVICE+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEVICE+3*
>> ACHS("PRINT" DEVICE+7!, DEVICE+10*, DEVICE+18
BY DEVICE+30~, DEVICE+31*
DIC DEVICE+30~, DEVICE+31*
DIOBEG DEVICE+30~
DIOEND DEVICE+30~
DIR DEVICE+2!, DEVICE+12!, DEVICE+15!, DEVICE+20!, DEVICE+23!
DIR("A" DEVICE+13*, DEVICE+21*
DIR("B" DEVICE+13*, DEVICE+21*
DIR(0 DEVICE+13*, DEVICE+21*
FLDS DEVICE+30~, DEVICE+31*
IO("Q" DEVICE+27, DEVICE+28
IOM DEVICE+17, DEVICE+25, DEVICE+26*
ION DEVICE+27, DEVICE+28
>> IOP DEVICE+27*, DEVICE+28*
IOST(0 DEVICE+8, DEVICE+9, DEVICE+10
L DEVICE+30~, DEVICE+31*
>> POP DEVICE+6
U DEVICE+9, DEVICE+10
>> Y DEVICE+16, DEVICE+17, DEVICE+25
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 |  Local Variables |  All