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

Package: Pharmacy Point of Sale

Routine: ABSPOSUB


Information

ABSPOSUB ; IHS/FCS/DRS - diagnostic data collection ; [ 09/12/2002 10:20 AM ]

Source Information

Source file <ABSPOSUB.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Pharmacy Point of Sale 1 IMPOSS^ABSPOSUE  
VA Fileman 1 NOW^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Point of Sale 1 ABSPOS6K  

Entry Points

Name Comments DBIA/ICR reference
LAST59(N)
BOTH ;EP - ABSPOS6K
INIT
FILE(N)
GS(TYPE) ; write file in ^%GS format
; TYPE = 1 - from the FULL option
; TYPE = 2 - from the JOB option
JOB ;EP - ABSPOS6K
FULL ;EP - ABSPOS6K
COMMON
LISTMGR ; List Manager data
LAST0203(N)

External References

Name Field # of Occurrence
NOW^%DTC COMMON
IMPOSS^ABSPOSUE GS+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Collecting diagnostic data...",!
  • Line Location: INIT+1
Function Call: WRITE
  • Prompt: "Doing first part...",!
  • Line Location: BOTH+1
Function Call: WRITE
  • Prompt: "Doing second part...",!
  • Line Location: BOTH+2
Function Call: WRITE
  • Prompt: "Both parts done.",!
  • Line Location: BOTH+3
Function Call: WRITE
  • Prompt: "Writing file ",$$FILE(1),"...",!
  • Line Location: FULL+9
Function Call: WRITE
  • Prompt: "Done.",!
  • Line Location: FULL+11
Function Call: WRITE
  • Prompt: "Writing file ",$$FILE(2),"...",!
  • Line Location: JOB+9
Function Call: WRITE
  • Prompt: "Done.",!
  • Line Location: JOB+11
Function Call: WRITE
  • Prompt: $T(+1),!,$G(NOW)_" "_$H,!
  • Line Location: GS+7
Function Call: WRITE
  • Prompt: R,!,@R,!
  • Line Location: GS+11
Function Call: WRITE
  • Prompt: "*",!,"*",!,"**",!,"**",!
  • Line Location: GS+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSPC - [#9002313.02] LAST0203+3
^ABSPC(0 LAST0203+1
^ABSPECP("LOG" COMMON+3
^ABSPECX("S" - [#9002313.58] COMMON+4
^ABSPR - [#9002313.03] LAST0203+5
^ABSPR("B" LAST0203+4
^ABSPT - [#9002313.59] LAST59+2, LAST59+3
^TMP("ABSP" COMMON+2*, COMMON+3*, COMMON+4*, INIT!*, FULL+2*, FULL+4*, FULL+5*, JOB+2*, JOB+4*, JOB+5*
, LISTMGR+2*, LISTMGR+3*, LAST59+3*, LAST0203+3*, LAST0203+5*
^TMP("ABSPOS" FULL+4, JOB+4
^TMP("ABSPOSUA" FULL+5, JOB+5

Label References

Name Line Occurrences
$$FILE FULL+9, JOB+9, GS+4
COMMON FULL+3, JOB+3
FULL BOTH+1
GS FULL+10, JOB+10
INIT FULL+1, JOB+1
JOB BOTH+2
LAST0203 FULL+7, JOB+7
LAST59 FULL+8, JOB+8
LISTMGR JOB+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% COMMON~, COMMON+1
%H COMMON~
%I COMMON~
CLAIM LAST0203+2~*, LAST0203+3, LAST0203+4
FILE GS+3~, GS+4*
J LAST59+2~*
N FILE~, LAST59~, LAST0203~, LAST0203+2
NOW COMMON~, COMMON+1~*, COMMON+2
R GS+3~, GS+8*, GS+9, GS+10, GS+11, GS+12*
R0 GS+3~, GS+9*, GS+10
RESP LAST0203+2~, LAST0203+4*, LAST0203+5
ROU INIT*, FULL+1~
TYPE GS~, GS+4
>> VALMAR LISTMGR+3
X COMMON~, LISTMGR+1*, LISTMGR+2, LAST59+1~*, LAST59+2*, LAST59+3, LAST0203+1~*, LAST0203+2

Marked Items

Name Field # of Occurrence
$T( INIT, FULL+2, JOB+2, GS+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All