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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RCDPEAP1

Package: Accounts Receivable

Routine: RCDPEAP1


Information

RCDPEAP1 ;ALB/KML - AUTO POST MATCHING EFT ERA PAIR - CONT. ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPEAP1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Accounts Receivable 3 ($$CHECKPAY,$$SCRPAD,CLEAR)^RCDPEAP  $$PHARM^RCDPEAP1  ($$CHKTYPE,$$GETPAY)^RCDPEU1  
VA FileMan 3 FILE^DICN  ^DIE  $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Accounts Receivable 11 RCDPEAD  RCDPEAD1  RCDPEAD4  RCDPEAP  RCDPEAP1  RCDPEM0  RCDPEM2  RCDPEWL7  
RCDPEWL8  RCDPEWLZ  RCDPEX32  

Entry Points

Name Comments DBIA/ICR reference
AUTOCHK(RCERA) ;Verify if ERA can be auto-posted - PRE-CHECK USED IN RCDPEM0
; Input: RCERA - IEN for file 344.4
; Returns: 1 - Auto-Post candidate, 0 - Not an Auto-Post candidate
; Many checks done by this are also done AUTOCHK2 below so if these are changed,
; may also need to be changed
AUTOCHK2(RCERA,RCTYP) ; RCTYP added PRCA*4.5*321
; Check if this entry is an auto-post candidate
; This has the same/similar checks as MATCH^RCDPEM0 and AUTOCHK above. If those procedures are
; changed, this may need to updated as well.
; ; Input: RCERA - IEN for file 344.4
; RCTYP - 0 - Called from Worklist/Mark for autopost
; 1 - Called from Manual match
; Returns: 1 - Auto-Post candidate
; 0^Reason - Not an auto-post candidate and reason
; Validate Parameter
EXCLUDE(RCERA) ; Verify if auto-posting is allowed for this Payer - PRECHECK USED IN RCDPEM0
; Not allowed if medical auto-posting is switched off
; Input: RCERA - IEN for file 344.4
; Returns: 1 - Exclude ERA becaus Payer is in exclusion table, 0 otherwise
; PRCA*4.5*345 - changed to $$GET1^DIQ calls below
PHARM(RCERA) ;Check if ERA is for Pharmacy only (ECME number on first line) - CALLED FROM RCDPEM0
ERADET(RCERA,RCRCPTDA,RCLINES) ; called on subsequent attempts of auto-post for a given ERA (DAY 2, DAY 3, ex.)
; update ERA with receipt or if not posted then update the AUTO-POST REJECTION REASON (#5)
ZEROBAL(RCSCR) ;
; per requirements, only positive/negative payment pairs where payment
; calculates to zero are allowed for auto-post
; if payment ends up less than zero or greater than zero then ERA cannot
EXCLDRX(RCERA) ; Verify if auto-posting is allowed for Pharmacy claims
; and for the Payer - PRECHECK USED IN RCDPEM0. Not allowed if pharmacy
; auto-posting is switched off
; Input: RCERA - IEN for file 344.4
; Returns: 1 - ERA is excluded from Auto-Posting, 0 otherwise
EXCLDTR(RCERA) ; Verify if auto-posting is allowed for TRICARE claims
; and for the Payer - PRECHECK USED IN RCDPEM0. Not allowed if TRICARE
; auto-posting is switched off
; PRCA*4.5*349 - Added function
; Input: RCERA - IEN for file 344.4
; Returns: 1 - ERA is excluded from Auto-Posting, 0 otherwise
VALID(RCERA,RCLINES) ;
UNBAL(RCERA) ; PRCA*4.5*318 added method
; Determine if the ERA total matches the EFT total for the selected ERA
; Input: RCERA - Internal IEN of the selected ERA
; Returns: 1 - ERA is unbalanced, 0 otherwise

External References

Name Field # of Occurrence
FILE^DICN ERADET+13
^DIE ERADET+14, ERADET+29, VALID+55
$$GET1^DIQ AUTOCHK+24, AUTOCHK2+22, AUTOCHK2+28, AUTOCHK2+35, AUTOCHK2+36, AUTOCHK2+42, AUTOCHK2+46, AUTOCHK2+50, EXCLUDE+5, EXCLUDE+9
, EXCLUDE+11, EXCLUDE+19, EXCLDRX+5, EXCLDRX+9, EXCLDRX+11, EXCLDRX+18, EXCLDTR+6, EXCLDTR+10, EXCLDTR+12, EXCLDTR+19
, VALID+26, UNBAL+6, UNBAL+10, UNBAL+14
$$CHECKPAY^RCDPEAP VALID+44
$$SCRPAD^RCDPEAP AUTOCHK+31, AUTOCHK2+88
CLEAR^RCDPEAP AUTOCHK+38, AUTOCHK+42, AUTOCHK+45, AUTOCHK2+96, AUTOCHK2+99, AUTOCHK2+102
$$PHARM^RCDPEAP1 AUTOCHK2+39
$$CHKTYPE^RCDPEU1 AUTOCHK2+38
$$GETPAY^RCDPEU1 AUTOCHK2+37

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] Classic Fileman Calls,  GET1^DIQ
344.41 GET1^DIQ
344.42 GET1^DIQ
^RCY(344.6 - [#344.6] GET1^DIQ
^RCY(344.61 - [#344.61] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] VALID+35, VALID+38
^RCY(344.31 - [#344.31] AUTOCHK+27, AUTOCHK2+82
^RCY(344.4 - [#344.4] AUTOCHK+10, AUTOCHK+13, AUTOCHK+19, AUTOCHK2+19, AUTOCHK2+31, AUTOCHK2+62, AUTOCHK2+63, AUTOCHK2+68, PHARM+1, PHARM+2
, ERADET+13, VALID+28, UNBAL+9, UNBAL+13
^RCY(344.49 - [#344.49] AUTOCHK2+87, ZEROBAL+12, ZEROBAL+14, VALID+11, VALID+15, VALID+17, VALID+19
^RCY(344.6 - [#344.6] EXCLUDE+15, EXCLDRX+15, EXCLDTR+16
^TMP($J AUTOCHK+6!, AUTOCHK+38, AUTOCHK2+16!, AUTOCHK2+96

Label References

Name Line Occurrences
$$EXCLDRX AUTOCHK2+56
$$EXCLDTR AUTOCHK2+57
$$EXCLUDE AUTOCHK2+55
$$ZEROBAL AUTOCHK+42, AUTOCHK2+99

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AUTOPOST VALID+14~, VALID+27*, VALID+28*, VALID+30
CLAIM VALID+14~, VALID+32*, VALID+33, VALID+35, VALID+38, VALID+43, VALID+44
CLARRAY VALID+14~, VALID+44
CLARRAY( VALID+43*, VALID+44*
DA ERADET+10~, ERADET+14*, ERADET+25*, VALID+49~, VALID+53*
DA(1 ERADET+13*, ERADET+25*, VALID+53*
DIC ERADET+10~, ERADET+13*
DIC(0 ERADET+13*
DIE ERADET+10~, ERADET+14*, ERADET+25*, VALID+49~, VALID+53*
DLAYGO ERADET+10~
DO ERADET+10~
DR ERADET+10~, ERADET+14*, ERADET+27*, ERADET+28*, VALID+49~, VALID+54*
DT ERADET+28
ERALINE ZEROBAL+10~, ZEROBAL+11*, ZEROBAL+16*, ZEROBAL+19, VALID+14~, VALID+22*, VALID+24, VALID+26, VALID+28, VALID+33
, VALID+36, VALID+38, VALID+40, VALID+44, VALID+46
NOTOK AUTOCHK+5~, AUTOCHK+9*, AUTOCHK+10, AUTOCHK+13*, AUTOCHK+16, AUTOCHK2+15~, AUTOCHK2+61*, AUTOCHK2+62, AUTOCHK2+64*, AUTOCHK2+65
PIECE VALID+14~, VALID+28*
PNAM AUTOCHK2+15~, AUTOCHK2+35*, AUTOCHK2+37
PTIN AUTOCHK2+15~, AUTOCHK2+36*, AUTOCHK2+37
RC0 AUTOCHK2+15~, AUTOCHK2+31*, AUTOCHK2+32, AUTOCHK2+71, AUTOCHK2+77, AUTOCHK2+82
RCCREATE AUTOCHK2+15~, AUTOCHK2+86*, AUTOCHK2+88*, AUTOCHK2+96, AUTOCHK2+99, AUTOCHK2+102
RCD0 AUTOCHK+5~, AUTOCHK+13*, AUTOCHK2+63*, AUTOCHK2+64
RCDSUB AUTOCHK+5~, AUTOCHK+9*, AUTOCHK+10*, AUTOCHK+13, AUTOCHK2+15~, AUTOCHK2+61*, AUTOCHK2+62*, AUTOCHK2+63
RCERA AUTOCHK~, AUTOCHK+10, AUTOCHK+13, AUTOCHK+19, AUTOCHK+24, AUTOCHK+27, AUTOCHK+31, AUTOCHK2~, AUTOCHK2+10, AUTOCHK2+19
, AUTOCHK2+22, AUTOCHK2+28, AUTOCHK2+31, AUTOCHK2+35, AUTOCHK2+36, AUTOCHK2+39, AUTOCHK2+55, AUTOCHK2+56, AUTOCHK2+57, AUTOCHK2+62
, AUTOCHK2+63, AUTOCHK2+68, AUTOCHK2+82, AUTOCHK2+87, AUTOCHK2+88, EXCLUDE~, EXCLUDE+9, EXCLUDE+11, PHARM~, PHARM+1
, PHARM+2, ERADET~, ERADET+7, ERADET+13, ERADET+14, ERADET+25, EXCLDRX~, EXCLDRX+9, EXCLDRX+11, EXCLDTR~
, EXCLDTR+10, EXCLDTR+12, VALID~, VALID+11, VALID+26, VALID+28, VALID+53, UNBAL~, UNBAL+6, UNBAL+9
, UNBAL+10, UNBAL+13, UNBAL+14
RCERATYP AUTOCHK2+15~, AUTOCHK2+38*, AUTOCHK2+39*, AUTOCHK2+43, AUTOCHK2+47, AUTOCHK2+51, AUTOCHK2+55, AUTOCHK2+56, AUTOCHK2+57, AUTOCHK2+58
RCI VALID+49~
RCLIN ERADET+18~, ERADET+19*, ERADET+20*, ERADET+22, ERADET+25, ERADET+27, VALID+49~, VALID+50*, VALID+51, VALID+53
RCLINES ERADET~, VALID~, VALID+12*, VALID+50*, VALID+51*
RCLINES( ERADET+20, ERADET+22, ERADET+27, VALID+33*, VALID+36*, VALID+38*, VALID+40*, VALID+44*, VALID+46*, VALID+50
, VALID+51
RCLTOT UNBAL+4~, UNBAL+8*, UNBAL+10*, UNBAL+14*, UNBAL+16
RCPID EXCLUDE+8~, EXCLUDE+11*, EXCLUDE+12, EXCLUDE+15, EXCLDRX+6~, EXCLDRX+11*, EXCLDRX+12, EXCLDRX+15, EXCLDTR+7~, EXCLDTR+12*
, EXCLDTR+13, EXCLDTR+16
RCPNM EXCLUDE+8~, EXCLUDE+9*, EXCLUDE+10, EXCLUDE+15, EXCLDRX+6~, EXCLDRX+9*, EXCLDRX+10, EXCLDRX+15, EXCLDTR+7~, EXCLDTR+10*
, EXCLDTR+11, EXCLDTR+16
RCPXDA EXCLUDE+8~, EXCLUDE+15*, EXCLUDE+16, EXCLUDE+19, EXCLDRX+6~, EXCLDRX+15*, EXCLDRX+18, EXCLDTR+7~, EXCLDTR+16*, EXCLDTR+19
RCRCPTDA ERADET~, ERADET+8*, ERADET+12, ERADET+13, ERADET+14, ERADET+26, ERADET+28
RCSCR AUTOCHK+5~, AUTOCHK+31*, AUTOCHK+38, AUTOCHK+42, AUTOCHK+45, AUTOCHK2+15~, AUTOCHK2+87*, AUTOCHK2+88*, AUTOCHK2+89, AUTOCHK2+96
, AUTOCHK2+99, AUTOCHK2+102, ZEROBAL~, ZEROBAL+12, ZEROBAL+14, VALID+10~, VALID+11*, VALID+12, VALID+15, VALID+17
, VALID+19
RCSUB UNBAL+4~, UNBAL+8*, UNBAL+9*, UNBAL+10, UNBAL+12*, UNBAL+13*, UNBAL+14
RCTOT UNBAL+4~, UNBAL+6*, UNBAL+16
RCTYP AUTOCHK2~, AUTOCHK2+11, AUTOCHK2+12
RCXCLDE AUTOCHK2+15~, AUTOCHK2+54*, AUTOCHK2+55*, AUTOCHK2+56*, AUTOCHK2+57*, AUTOCHK2+58
REJECT ERADET+18~, ERADET+22*, ERADET+26, ERADET+27
SEQ VALID+14~, VALID+28*
STATUS AUTOCHK2+15~, AUTOCHK2+22*, AUTOCHK2+23, AUTOCHK2+24, AUTOCHK2+25, VALID+14~, VALID+35*, VALID+36
SUB PHARM+1~*, PHARM+2, ZEROBAL+10~, ZEROBAL+11*, ZEROBAL+12*, ZEROBAL+14, VALID+14~, VALID+15*, VALID+17, VALID+24*
, VALID+26*, VALID+30*, VALID+36*, VALID+38*, VALID+40*, VALID+44*
SUB1 ZEROBAL+10~, ZEROBAL+14*, VALID+14~, VALID+17*, VALID+18, VALID+19
U AUTOCHK+13, AUTOCHK+24, AUTOCHK2+32, AUTOCHK2+64, AUTOCHK2+71, AUTOCHK2+77, AUTOCHK2+82, PHARM+2, ERADET+13, ERADET+22
, ERADET+27, ZEROBAL+16, ZEROBAL+19, ZEROBAL+21, VALID+21, VALID+22, VALID+28, VALID+32, VALID+38, VALID+40
, VALID+43, VALID+44
WLINE ZEROBAL+10~, ZEROBAL+14*, ZEROBAL+16, ZEROBAL+19, ZEROBAL+21, VALID+14~, VALID+19*, VALID+21, VALID+22, VALID+32
, VALID+40, VALID+43, VALID+44
X ERADET+10~, ERADET+13*, ZEROBAL+10~, ZEROBAL+11*, ZEROBAL+19*, ZEROBAL+21*, ZEROBAL+22
XX AUTOCHK2+15~, AUTOCHK2+37*, AUTOCHK2+38, AUTOCHK2+42*, AUTOCHK2+43, AUTOCHK2+46*, AUTOCHK2+47, AUTOCHK2+50*, AUTOCHK2+51
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All