Routine: ABSPOS2

Information

ABSPOS2 ; IHS/FCS/DRS - POS manager's ScreenMan ;

Source Information

Source file <ABSPOS2.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Pharmacy Point of Sale	3	EN^ABSPOS2 VALUES^ABSPOS2B LABELS^ABSPOS2C
Registration	3	EN^VALM FULL^VALM1 (CLEAN,MSG)^VALM10
Kernel	2	$$READ^XGKB DISP^XQORM1
VA Fileman	2	(H,NOW)^%DTC EN^DIQ1

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Pharmacy Point of Sale	4	ABSPOS2 ABSPOS2A ABSPOSIW ABSPOSRB

Entry Points

Name	Comments	DBIA/ICR reference
MYPARAMS	;
FETCH58(DST)
H(H)
FETPKTQ(DEST)
CLEARAT()
UPD	;EP - From ABSPOS2A ; Protocol ABSP P2 UPDATE
ERROR
EN()	;EP - main entry point for list template ABSP STATISTICS AND MANAGEMENT
EXIT	; -- exit code
UPD1	; one update cycle
HDT(X)	; first convert fileman date-time to $H format, then $$H it
INIT	; -- init variables and list array
FETSTAT(DEST)
HELP	; -- help code
CONTUPD	; Protocol ABSP P2 CONTINUOUS
FETCHES(B)
DIFF	;EP - from ABSPOS2A
UPDFREQ()	;I DUZ=9598 Q 5 ; I get it every 5 seconds
UPDATE(COUNTER)
EXPND	; -- expand code
HDR	; -- header code

External References

Name	Field # of Occurrence
H^%DTC	HDT+1
NOW^%DTC	EN+13
EN^ABSPOS2	ABSPOS2+10
VALUES^ABSPOS2B	INIT+9, UPD1+4
LABELS^ABSPOS2C	INIT+5
EN^DIQ1	FETCH58+6
EN^VALM	EN+14
FULL^VALM1	ERROR, EXIT+1
CLEAN^VALM10	INIT+3
MSG^VALM10	UPDATE+5, UPDATE+7
$$READ^XGKB	UPDATE+7
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!!! Line Location: CONTUPD+1
Function Call: READ	Timeout: ^TMP("ABSPOS2",$J,"FREQ") Variable: X#1 Line Location: UPDATE+8
Function Call: READ	Timeout: 0 Variable: Y Line Location: UPDATE+11
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSP(	FETCH58+5, FETCH58+7
^ABSPECX("POS"	FETPKTQ+11, FETPKTQ+13, FETPKTQ+15, FETPKTQ+18
^ABSPECX("S" - [#9002313.58]	EN+12, EN+13*, FETCH58+9, CLEARAT+1
^ABSPT - [#9002313.59]	FETSTAT+4, FETSTAT+9
^ABSPT("AD"	FETSTAT+6
^DD("DD"	CLEARAT+1
^TMP("ABSPOS2"	FETCHES+3, FETCHES+9

Label References

Name	Line Occurrences
$$CLEARAT	HDR+1
$$H	HDT+2, FETCH58+3, FETSTAT+3, FETPKTQ+9
$$HDT	FETCH58+10
$$UPDFREQ	UPDATE+7
DIFF	INIT+8, UPD1+3
FETCH58	FETCHES+4
FETCHES	INIT+7, UPD1+2
FETPKTQ	FETCHES+6
FETSTAT	FETCHES+5
HDR	INIT+6
MYPARAMS	INIT+2
UPD1	UPDATE+2
UPDATE	UPD+1, CONTUPD+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+13~
%H	EN+13~, HDT+1~, HDT+2
%I	EN+13~
%T	HDT+1~
%Y	HDT+1~
A	DIFF+2~, DIFF+3, DIFF+4, DIFF+5, UPD1+1~, FETSTAT+5~, FETSTAT+6, FETPKTQ+12~, FETPKTQ+13, FETPKTQ+15 , FETPKTQ+16
AVG	EN+2~
B	FETCHES~, FETCHES+2, FETCHES+7, DIFF+2~, DIFF+3, DIFF+4, DIFF+5, UPD1+1~, FETPKTQ+12~, FETPKTQ+14 , FETPKTQ+15, FETPKTQ+16, FETPKTQ+17
BASE	EN+2~, FETCHES+8
BASE(	DIFF+4
C	FETPKTQ+12~, FETPKTQ+15*
CHG	EN+2~, DIFF+1!
CHG(	DIFF+5*
COUNTER	UPDATE~, UPDATE+3*
CURR	EN+2~, FETCHES+8*
CURR(	DIFF+3, DIFF+4
DA	FETCH58+2~, FETCH58+4*
DEST	FETSTAT~, FETSTAT+2, FETSTAT+3, FETSTAT+7, FETSTAT+8, FETPKTQ~, FETPKTQ+8, FETPKTQ+9*, FETPKTQ+16, FETPKTQ+17
DIC	FETCH58+2~, FETCH58+4*
DIFF	EN+2~
DIFF(	DIFF+5*
DIQ	FETCH58+2~, FETCH58+4*
DISP	EN+2~
DR	FETCH58+2~, FETCH58+4*
DST	FETCHES+2~*, FETCHES+3, FETCHES+4, FETCHES+5, FETCHES+6, FETCH58~, FETCH58+1, FETCH58+3, FETCH58+8, FETCH58+9 , FETCH58+10
>> DTOUT	UPDATE+10
FN	FETCH58+2~, FETCH58+4*, FETCH58+5, FETCH58+7, FETCH58+8
H	H~*
LOCK	EN+7~*, FETCH58+5, FETCH58+7, FETSTAT+4, FETSTAT+9, FETPKTQ+11, FETPKTQ+18
N	FETSTAT+5~, FETSTAT+6, FETSTAT+7, FETSTAT+8, FETPKTQ+12~, FETPKTQ+15, FETPKTQ+16, FETPKTQ+17
NODISPLY	INIT+1~*, UPDATE+4
P	FETPKTQ+12~
Q	FETSTAT+5~*, FETSTAT+6, FETSTAT+7, FETSTAT+8
STOP	UPDATE+1~, UPDATE+3, UPDATE+10
T	UPD1+1~
TMP	FETCH58+2~
TMP(	FETCH58+8
U	EN+12, EN+13, FETCH58+9, CLEARAT+1
>> VALMBCK	UPD+1, CONTUPD+1
>> VALMCNT	INIT+4*
>> VALMHDR(1	HDR+1*
X	EN+13~, DIFF+2~, DIFF+4, DIFF+5, HDT~, HDT+1, HDT+2, FETPKTQ+12~, UPDATE+7~, UPDATE+10 , HELP+1
>> XQORM("B"	HDR+2, HDR+3, UPD+1*
Y	CLEARAT+1, UPDATE+11~

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOS2

Call Graph Total: 10

Caller Graph Total: 4