Routine: ABSPOSP2

Information

ABSPOSP2 ; IHS/FCS/DRS - EOB to Payments Batch ; [ 09/12/2002 10:17 AM ]

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Pharmacy Point of Sale	7	$$DFF2EXT^ABSPECFM ZWRITE^ABSPOS $$MUSTILC^ABSPOSB ($$NEWBATCH,PAYMENT,SETAMT)^ABSPOSP ($$RESP1000,$$RESP500)^ABSPOSQ4 $$ISREVERS^ABSPOSU PRESSANY^ABSPOSU5
VA Fileman	1	^DDS

Entry Points

Name	Comments	DBIA/ICR reference
SORT
ONEPMT	;
SEARCH
AA
MYSCREEN()
TEST	;
SORT1	;
SUCCREV()
MAIN	;EP - option ABSP EOB TO BATCH

External References

Name	Field # of Occurrence
$$DFF2EXT^ABSPECFM	SORT1+21
ZWRITE^ABSPOS	TEST+4
$$MUSTILC^ABSPOSB	MAIN+1
$$NEWBATCH^ABSPOSP	MAIN+29
PAYMENT^ABSPOSP	ONEPMT+10
SETAMT^ABSPOSP	MAIN+52
$$RESP1000^ABSPOSQ4	SORT1+7
$$RESP500^ABSPOSQ4	SORT1+1, SUCCREV+17
$$ISREVERS^ABSPOSU	SORT+4
PRESSANY^ABSPOSU5	MAIN+57
^DDS	AA+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "Going to the TEST entry point..." Line Location: ABSPOSP2+4
Function Call: WRITE	Prompt: "Someone else is using the EOB program.",! Line Location: MAIN+5
Function Call: WRITE	Prompt: !,"Please wait... searching our records of POS payments...",! Line Location: MAIN+17
Function Call: WRITE	Prompt: !,"Now sorting the payment records...",! Line Location: MAIN+25
Function Call: WRITE	Prompt: "Creating a payments batch...",! Line Location: MAIN+28
Function Call: WRITE	Prompt: "Can't create a batch - Stopping",! Line Location: MAIN+30
Function Call: WRITE	Prompt: "The batch is payment batch #",BATCH,! Line Location: MAIN+31
Function Call: WRITE	Prompt: "Done",!! Line Location: MAIN+53
Function Call: WRITE	Prompt: "Note: the batch is still open; it is not automatically posted.",! Line Location: MAIN+54
Function Call: WRITE	Prompt: "You are responsible for making sure that you really want",! Line Location: MAIN+55
Function Call: WRITE	Prompt: "to post the batch and that the control total is correct.",! Line Location: MAIN+56
Function Call: WRITE	Prompt: "Unallocated Cash $",$J(AMT,0,2)," for ",PATNAME,! Line Location: ONEPMT+6
Function Call: WRITE	Prompt: ?10,"See Claim ID ",$P(^ABSPC(CLAIM,0),U),! Line Location: ONEPMT+7
Function Call: WRITE	Prompt: "Just GOTO MAIN",! Line Location: TEST+1
Function Call: WRITE	Prompt: "Outputs:",! Line Location: TEST+3
Function Call: WRITE	Prompt: "9002313.99,EOB-SCREEN node=",X,! Line Location: TEST+6
Routine Call	DDS Line Location: AA+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSP(9002313.99 - [#9002313.99]	MAIN+7, MAIN+11, TEST+5
^ABSPC - [#9002313.02]	ONEPMT+1, ONEPMT+7, SORT1+2, SORT1+12, SORT1+13, SUCCREV+2, SEARCH+10
^ABSPC("B"	SUCCREV+12
^ABSPR - [#9002313.03]	SORT1+3, SORT1+6, SORT1+14, SEARCH+9
^ABSPR("AE"	SEARCH+6, SEARCH+8
^ABSPR("B"	SUCCREV+14
^ABSTMP(	ONEPMT+8*
^TMP($J	MAIN+34, MAIN+36, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+45, SORT!, SORT+3, SORT+6 , SORT1+29, SEARCH!, SEARCH+14

Label References

Name	Line Occurrences
$$MYSCREEN	MAIN+6
$$SUCCREV	SORT1+27
MAIN	TEST+2
ONEPMT	MAIN+46
SEARCH	MAIN+18
SORT	MAIN+26
SORT1	SORT+6
TEST	ABSPOSP2+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMT	MAIN+32~, ONEPMT+2~*, ONEPMT+6, ONEPMT+8, ONEPMT+10, SORT1+15~
AMT(	SORT1+20, SORT1+21*
AMT("COPAY"	SORT1+17*
AMT("DISPFEE"	SORT1+16*
AMT("INCENT"	SORT1+18*
AMT("INGR"	SORT1+16*
AMT("PATIENT"	SORT1+15*
AMT("TAX"	SORT1+17*
AMT("TOT"	SORT1+17*, SORT1+24
BATCH	MAIN+29~*, MAIN+30, MAIN+31, MAIN+52, ONEPMT+8, ONEPMT+10
CLAIM	MAIN+32~, MAIN+41, MAIN+42, MAIN+44, MAIN+45, ONEPMT+1, ONEPMT+7, SORT+1~, SORT+2, SORT+3 , SORT+4, SORT+6, SORT1+2, SORT1+12, SORT1+13, SORT1+29, SUCCREV+2, SEARCH+9~*, SEARCH+10, SEARCH+14
CLAIMID	SUCCREV+2~*, SUCCREV+3
DA	MYSCREEN+4~, MYSCREEN+5*
DATA	MAIN+32~, MAIN+45, ONEPMT+2, SORT1+24~, SORT1+29
DATE	SEARCH+5~, SEARCH+6, SEARCH+8
DATERECD	MAIN+32~, MAIN+35, MAIN+36, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+45, SORT+1~, SORT1+3* , SORT1+4*, SORT1+29
DDSCHANG	MYSCREEN+3~
DDSFILE	MYSCREEN+2~, MYSCREEN+5*
DDSPAGE	MYSCREEN+2~
DDSPARM	MYSCREEN+2~, AA*
DDSSAVE	MYSCREEN+3~, AA+3
DEPDATE	ONEPMT+3~*, ONEPMT+10
DIMSG	MYSCREEN+3~
DR	MYSCREEN+2~, MYSCREEN+6*
DTOUT	MYSCREEN+3~
DUZ(0	ABSPOSP2+4
END	SEARCH+3~, SEARCH+4, SEARCH+6
INSDFN	ONEPMT+4~*, ONEPMT+10
INSURER	SEARCH+1~*, SEARCH+10
LOCKREF	MAIN+3~*, MAIN+4, MAIN+9
PARAMS	MAIN+11~*, MAIN+47, MAIN+52, ONEPMT+3, ONEPMT+4, SEARCH+1, SEARCH+2, SEARCH+3
PATNAME	MAIN+32~, MAIN+33, MAIN+34, MAIN+36, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+45, ONEPMT+6 , SORT+1~, SORT1+2*, SORT1+29
PCNDFN	ONEPMT+1~*, ONEPMT+5, ONEPMT+10
POSITN	MAIN+32~, MAIN+43, MAIN+44, MAIN+45, SORT1+5~, SORT1+6, SORT1+7, SORT1+12, SORT1+13, SORT1+14 , SORT1+29, SUCCREV+3
RESP	MAIN+32~, SORT+1~, SORT+5, SORT+6, SORT1+1, SORT1+3, SORT1+6, SORT1+7, SORT1+14, SORT1+24 , SEARCH+7~, SEARCH+8, SEARCH+9, SEARCH+14
RETVAL	SUCCREV+5~, SUCCREV+17, SUCCREV+18
REVCLAIM	SUCCREV+4~, SUCCREV+12, SUCCREV+14, SUCCREV+17
REVID	SUCCREV+3~*, SUCCREV+12
REVRESP	SUCCREV+14~*, SUCCREV+15, SUCCREV+17
ROU	MAIN+13~*, MAIN+34, MAIN+36, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+45, SORT, SORT+3 , SORT+6, SORT1+29, SEARCH, SEARCH+14
RXI	MAIN+32~, MAIN+37, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+45, SORT+1~, SORT1+12*, SORT1+29
RXR	MAIN+32~, MAIN+39, MAIN+40, MAIN+42, MAIN+44, MAIN+45, SORT+1~, SORT1+13*, SORT1+29
START	SEARCH+2~*, SEARCH+5
U	MAIN+47, MAIN+52, ONEPMT+1, ONEPMT+2, ONEPMT+3, ONEPMT+4, ONEPMT+7, SORT1+2, SORT1+3, SORT1+12 , SORT1+13, SORT1+15, SORT1+16, SORT1+17, SORT1+18, SORT1+24, SUCCREV+2, SEARCH+1, SEARCH+2, SEARCH+3 , SEARCH+9, SEARCH+10
X	MAIN+2~, MAIN+4, MAIN+6, MAIN+7, MAIN+8, MAIN+10, SORT1+14~, SORT1+15, SORT1+16, SORT1+17 , SORT1+18, SORT1+20~, SORT1+21, TEST+5~*, TEST+6

Marked Items

Name	Field # of Occurrence
$T(	MAIN+13

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSP2

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items