Routine: ABSPOSL

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

Package

Total

Call Graph

Pharmacy Point of Sale

PRINTLOG^ABSPOSL1 $$IMPOSS^ABSPOSUE

VA Fileman

NOW^%DTC

Package	Total	Caller Graph
Pharmacy Point of Sale	46	ABSPOS2D ABSPOS57 ABSPOS6D ABSPOS6M ABSPOSAB ABSPOSAM ABSPOSAN ABSPOSAO ABSPOSAP ABSPOSAQ ABSPOSAR ABSPOSAS ABSPOSAW ABSPOSBB ABSPOSBD ABSPOSBF ABSPOSBM ABSPOSBV ABSPOSBW ABSPOSBX ABSPOSC2 ABSPOSC3 ABSPOSJ2 ABSPOSK ABSPOSK1 ABSPOSL1 ABSPOSQ ABSPOSQ1 ABSPOSQ3 ABSPOSQ4 ABSPOSQA ABSPOSQB ABSPOSQC ABSPOSQD ABSPOSQG ABSPOSQJ ABSPOSQL ABSPOSQS ABSPOSR1 ABSPOSR3 ABSPOSR4 ABSPOSRB ABSPOSRX ABSPOSU ABSPOSU6 ABSPOSUT

Package

Total

Caller Graph

Pharmacy Point of Sale

ABSPOS2D  ABSPOS57  ABSPOS6D  ABSPOS6M  ABSPOSAB  ABSPOSAM  ABSPOSAN  ABSPOSAO
ABSPOSAP  ABSPOSAQ  ABSPOSAR  ABSPOSAS  ABSPOSAW  ABSPOSBB  ABSPOSBD  ABSPOSBF
ABSPOSBM  ABSPOSBV  ABSPOSBW  ABSPOSBX  ABSPOSC2  ABSPOSC3  ABSPOSJ2  ABSPOSK
ABSPOSK1  ABSPOSL1  ABSPOSQ  ABSPOSQ1  ABSPOSQ3  ABSPOSQ4  ABSPOSQA  ABSPOSQB
ABSPOSQC  ABSPOSQD  ABSPOSQG  ABSPOSQJ  ABSPOSQL  ABSPOSQS  ABSPOSR1  ABSPOSR3
ABSPOSR4  ABSPOSRB  ABSPOSRX  ABSPOSU  ABSPOSU6  ABSPOSUT

Entry Points

Name	Comments	DBIA/ICR reference
EXISTS(X)	;EP -
SETSLOT(SLOT)	;EP -
LOG(TEXT,ECHO,SPECIAL)	;EP - log the event given by TEXT ; SPECIAL="D" to prefix with printable date, T time, DT both
FINDPREV(TYPE,START)	;
PRINTLOG(SLOT,START,END)
LOG2CLM(MSG,IEN02)	;EP - write MSG to log file for all claims in this 9002313.02
GETPLACE()	;EP -
LOGARRAY(ROOT,SLOT,MAX)	;EP -
LOG2LIST(MSG)	;EP - write MSG to the log files of all in RXILIST(*)
LOG2SLOT(MSG,SLOT)	;EP -
DONE	;EP -
RELSLOT	; EP -
PRCLLOG(WHERE,CLAIM)	;EP - print portion of comms log related to given claim
GETSLOT()	;EP -
PRINTEND(SLOT)	;EP -find the end of the logging session
GETINDEX(SLOT)
HDIF(THEN,NOW)
LOG59(MSG,IEN59)
INIT(SLOTNUM,NODELETE,TMSTAMP)	;EP - very first caller does this: ; TMSTAMP undef or 1 -> you'll get a one-line time stamp ; TMSTAMP = 0 -> you won't get it. ; TMSTAMP = -1 -> timestamp only if brand new log file

Name	Field # of Occurrence
NOW^%DTC	LOG+6, INIT+28
PRINTLOG^ABSPOSL1	PRINTLOG+1
$$IMPOSS^ABSPOSUE	INIT+7

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Condition for execution: $X>0 Line Location: LOG+14
Function Call: WRITE	Prompt: TEXT,! Line Location: LOG+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSPECP("LOG"	LOG+3, LOG+4, LOG+10, LOG+16, INIT+4, INIT+5, INIT+6, INIT+7, INIT+13, INIT+18 , INIT+19, INIT+21, INIT+23!, INIT+24, INIT+26, INIT+29, SETSLOT+1, SETSLOT+3, RELSLOT+1, RELSLOT+2 , GETSLOT+1, GETINDEX, DONE+3!, PRCLLOG+6, PRCLLOG+12, PRINTEND+1, PRINTEND+4, EXISTS+1, FINDPREV+3, FINDPREV+6
^ABSPT("AE"	LOG2CLM+2
^DD("DD"	LOG+6, INIT+28

Label References

Name	Line Occurrences
$$GETINDEX	GETPLACE+1
$$GETSLOT	GETINDEX, GETPLACE+1, LOG2SLOT+1
$$PRINTEND	PRCLLOG+3
LOG	INIT+28, DONE+1, LOG59+4, LOG2SLOT+3, LOGARRAY+8
LOG2SLOT	LOG59+1, LOGARRAY+7, LOGARRAY+12, LOGARRAY+13
LOG59	LOG2LIST+3, LOG2CLM+3
PRINTLOG	PRCLLOG+18
RELSLOT	DONE+2, LOG59+5, LOG2SLOT+4
SETSLOT	INIT+22, LOG59+3, LOG2SLOT+2, LOG2SLOT+5

Name	Field # of Occurrence
^(0	LOG+4*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LOG+6~, INIT+28~
%H	LOG+6~, INIT+28~
%I	LOG+6~, INIT+28~
CLAIM	PRCLLOG~, PRCLLOG+7, PRCLLOG+9, PRCLLOG+13
COUNT	LOGARRAY+2~, LOGARRAY+9, LOGARRAY+13
ECHO	LOG~, LOG+12
END	PRCLLOG+1~, PRCLLOG+3, PRCLLOG+11, PRCLLOG+17, PRINTEND+1~, PRINTEND+2, PRINTEND+4*, PRINTEND+5, PRINTEND+6, PRINTLOG~ , PRINTLOG+1
END1	PRCLLOG+1~, PRCLLOG+11, PRCLLOG+12, PRCLLOG+17, PRCLLOG+18
FOUND	PRCLLOG+1~, PRCLLOG+10, PRCLLOG+11, PRCLLOG+13, PRCLLOG+14
H	LOG+2~*, LOG+10, LOG+16
IEN02	LOG2CLM~, LOG2CLM+2
IEN59	LOG2LIST+1~, LOG2LIST+2, LOG2LIST+3, LOG2CLM+1~, LOG2CLM+2, LOG2CLM+3, LOG59~, LOG59+1, LOG59+3
IO	LOG+13~*, LOG+15
MAX	LOGARRAY~, LOGARRAY+3, LOGARRAY+5, LOGARRAY+11, LOGARRAY+12
MSG	LOG2LIST~, LOG2LIST+3, LOG2CLM~, LOG2CLM+3, LOG59~, LOG59+1, LOG59+4, LOG2SLOT~, LOG2SLOT+3
N	LOG+4~*, LOG+10
NODELETE	INIT~, INIT+23, INIT+24
NOW	HDIF~
OLDSLOT	LOG2SLOT+1~*, LOG2SLOT+5
>> ORIGROOT	LOGARRAY+13
REF	LOGARRAY+1~, LOGARRAY+4, LOGARRAY+5, LOGARRAY+7, LOGARRAY+8, LOGARRAY+10*, LOGARRAY+12
ROOT	LOGARRAY~, LOGARRAY+1, LOGARRAY+12
>> RXILIST(	LOG2LIST+2
SLOT	LOG+3~, LOG+4, LOG+10, LOG+16, INIT+8~, INIT+10, INIT+13, INIT+16, INIT+18, INIT+19 , INIT+21, INIT+22, INIT+23, INIT+24, INIT+26, INIT+28, SETSLOT~, SETSLOT+1, SETSLOT+3, RELSLOT+1~* , RELSLOT+2, GETINDEX~, PRCLLOG+1~, PRCLLOG+2*, PRCLLOG+3, PRCLLOG+6, PRCLLOG+12, PRCLLOG+18, PRINTEND~, PRINTEND+1 , PRINTEND+4, PRINTLOG~, PRINTLOG+1, LOG2SLOT~, LOG2SLOT+2, LOGARRAY~, LOGARRAY+6, LOGARRAY+7, LOGARRAY+12, LOGARRAY+13
SLOTNUM	INIT~, INIT+9, INIT+10, INIT+12*, INIT+13
SPECIAL	LOG~, LOG+5, LOG+7, LOG+8, LOG+16
START	PRCLLOG+1~, PRCLLOG+2, PRCLLOG+6, PRCLLOG+11, PRCLLOG+17, PRCLLOG+18, PRINTLOG~, PRINTLOG+1, FINDPREV~, FINDPREV+1 , FINDPREV+2, FINDPREV+3, FINDPREV+4, FINDPREV+5, FINDPREV+6, FINDPREV+7
STOP	INIT+15~, INIT+16, INIT+20
TEXT	LOG~, LOG+9*, LOG+10, LOG+14
THEN	HDIF~
TMSTAMP	INIT~, INIT+25, INIT+26*, INIT+27
TYPE	FINDPREV~, FINDPREV+2*, FINDPREV+4, FINDPREV+5
U	RELSLOT+2, PRCLLOG+7, PRCLLOG+13
WHERE	PRCLLOG~, PRCLLOG+2
X	LOG+6~, INIT+5~, INIT+6, INIT+28~, GETSLOT+1~, GETSLOT+2, GETSLOT+3, PRCLLOG+1~, PRCLLOG+6, PRCLLOG+7 , PRCLLOG+8, PRCLLOG+12*, PRCLLOG+13, EXISTS~, EXISTS+1
Y	LOG+6~, LOG+7, LOG+8, LOG+9, INIT+28

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSL

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 46

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items