Routine: ABSPOSQ2

Information

ABSPOSQ2 ; IHS/FCS/DRS - form transmission packets ; [ 11/07/2002 6:57 AM ]

Source Information

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Pharmacy Point of Sale	6	LOG59^ABSPOSQ TASK^ABSPOSQ1 STATUS31^ABSPOSQF $$PACKET^ABSPOSQG (SETRESU,SETSTAT)^ABSPOSU IMPOSS^ABSPOSUE
VA Fileman	2	^%DT NOW^%DTC
Kernel	1	^%ZTLOAD

Caller Graph

Caller Graph Total: 6

Package	Total	Caller Graph
Pharmacy Point of Sale	6	ABSPOS2D ABSPOSAP ABSPOSC3 ABSPOSQF ABSPOSQG ABSPOSQJ

Entry Points

Name	Comments	DBIA/ICR reference
NOW()
SETSTAT(NEWSTAT)	;EP - ABSPOSQF ; given IEN59
KSCRATCH	;EP - ABSPOSQG ; Kill scratch globals
NEXT59(X)	;EP - ABSPOSQF
CHKPA2()	;--------------------------------------------------------------- ; IHS/SD/lwj 8/30/02 NCPDP 5.1
N59A
UNLOCK59	;EP - ABSPOSQF
CHKPA()	;---------------------------------------------------------------
PACKETS	; construct packets for transmission to NDC ; your work list is ^ABSPT("AD",30)
SETRESU(RESCODE,TEXT)
LOCK59()	;EP - ABSPOSQF
TASK	;EP - ABSPOS2D,ABSPOSAP,ABSPOSC3,ABSPOSQG
TASKAT(ZTDTH)	;EP - ABSPOSQJ
POINTX
STATUS30	; given STATUS30=30

Name	Field # of Occurrence
^%DT	TASK+2
NOW^%DTC	NOW
^%ZTLOAD	TASKAT+9
LOG59^ABSPOSQ	N59A+16
TASK^ABSPOSQ1	PACKETS+19
STATUS31^ABSPOSQF	PACKETS+11
$$PACKET^ABSPOSQG	POINTX+6
SETRESU^ABSPOSU	SETRESU+2
SETSTAT^ABSPOSU	SETSTAT+2
IMPOSS^ABSPOSUE	STATUS30+31

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSP(9002313.511 - [#9002313.511]	CHKPA+24, CHKPA+25
^ABSPECX($J	KSCRATCH+1!, KSCRATCH+2!
^ABSPEI - [#9002313.4]	N59A+5, N59A+6, N59A+24
^ABSPF(9002313.91 - [#9002313.91]	CHKPA+26
^ABSPT - [#9002313.59]	N59A+3, N59A+11, N59A+13, N59A+14, N59A+24, N59A+25*, STATUS30+8, STATUS30+21, STATUS30+24, CHKPA+19 , CHKPA2+14, CHKPA2+15
^ABSPT("AD"	PACKETS+12, PACKETS+15, LOCK59+1, UNLOCK59+1, N59A

Label References

Name	Line Occurrences
$$CHKPA2	STATUS30+15
$$LOCK59	STATUS30+2
$$NEXT59	STATUS30+3, STATUS30+23
$$NOW	N59A+17
N59A	N59A+26
POINTX	STATUS30+8, STATUS30+15
SETRESU	POINTX+18
SETSTAT	N59A+15, N59A+23, STATUS30+6, STATUS30+32, POINTX+17, POINTX+20
STATUS30	PACKETS+12
TASKAT	TASK+3
UNLOCK59	POINTX+21

Name	Field # of Occurrence
^(1	STATUS30+21, STATUS30+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	NOW~
%DT	TASK+1~, TASK+2*
%H	NOW~
%I	NOW~
ABSBRXI	SETSTAT+1~, SETRESU+1~
ERROR	PACKETS+9~, POINTX+6*, POINTX+16, POINTX+18
IEN59	SETSTAT+1, SETRESU+1, N59A+15~, N59A+16, N59A+23~, N59A+24, N59A+25, STATUS30+1~, STATUS30+3, STATUS30+5 , STATUS30+8, STATUS30+21, STATUS30+22~, STATUS30+23, STATUS30+24, STATUS30+33, POINTX+15*, CHKPA+19, CHKPA2+14, CHKPA2+15
INS	NEXT59+1~, N59A+3*, N59A+4, N59A+5, N59A+6, N59A+24, N59A+25
NCPDPF	CHKPA+16~, CHKPA+25*, CHKPA+26
NCPDPFN	CHKPA+16~, CHKPA+26*, CHKPA+27
NEEDQ1	PACKETS+15~*, PACKETS+19
NEWSTAT	SETSTAT~, SETSTAT+2
OVRFLD	CHKPA+16~, CHKPA+23, CHKPA+24, CHKPA+25
OVRREC	CHKPA+16~, CHKPA+19*, CHKPA+20, CHKPA+24, CHKPA+25
PACLM	CHKPA+16~, CHKPA+17, CHKPA+28, CHKPA+30, CHKPA2+12, CHKPA2+16, CHKPA2+18
PANUM	CHKPA2+11~, CHKPA2+15*, CHKPA2+16
PATYP	CHKPA2+11~, CHKPA2+14*, CHKPA2+16
RA0	STATUS30+21~*, STATUS30+27
RA1	STATUS30+21~*, STATUS30+28
RB0	STATUS30+24~*, STATUS30+27, STATUS30+29, STATUS30+30, STATUS30+31
RB1	STATUS30+24~*, STATUS30+28
RESCODE	SETRESU~, SETRESU+2
RXILIST	PACKETS+10~, STATUS30+4!
RXILIST(	STATUS30+5, STATUS30+33, POINTX+15
SILENT	PACKETS+9~*
STATUS30	PACKETS+10~, PACKETS+12*, LOCK59+1, UNLOCK59+1, N59A, N59A+22, STATUS30+30
T	NEXT59+1~, N59A+6*, N59A+7, N59A+13, N59A+14, N59A+16, N59A+17
TEXT	SETRESU~, SETRESU+2
U	N59A+3, N59A+6, N59A+13, N59A+14, N59A+24, N59A+25, STATUS30+27, STATUS30+28, STATUS30+29, STATUS30+30 , STATUS30+31, POINTX+18, CHKPA+19, CHKPA+25, CHKPA+26, CHKPA2+14, CHKPA2+15
X	NEXT59~, N59A, N59A+1, N59A+3, N59A+4, N59A+5, N59A+7, N59A+11, N59A+13, N59A+14 , N59A+15, N59A+17, N59A+23, NOW~, TASK+1~, TASK+2
Y	TASK+1~, TASK+3
ZTDTH	TASKAT~
ZTIO	TASKAT+6~, TASKAT+7*
ZTRTN	TASKAT+6~, TASKAT+7*
ZTSAVE	TASKAT+6~
ZTSAVE("DIALOUT"	TASKAT+8*

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSQ2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items