Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPEM2

Package: Accounts Receivable

Routine: RCDPEM2


Information

RCDPEM2 ;ALB/TMK/PJH - MANUAL ERA AND EFT MATCHING ;Jun 11, 2014@13:24:36

Source Information

Source file <RCDPEM2.m>

Entry Points

Name Comments DBIA/ICR reference
MATCHWL ; Manually 'match' ERA to an EFT that originates from [RCDPE WORKLIST ERA LIST]
GETDINFO(RCEFT,DEPNUM,DEPDT)
MWQ
MATCH1 ; Manually 'match' an ERA to an EFT
M1
M12
M12A ; PRCA*4.5*303 - MATCH WL jumps here to complete the manual match
; BEGIN PRCA*4.5*326
M1Q
MATCH2 ; Manually 'match' a 0-balance EFT to a paper EOB
M2
M2Q
MANTR ; Mark an EFT detail record as 'TR' posted manually
MANTRQ
CHK() ; Function returns the ien of CHECK/MO payment type
MATCH3 ; Manually 'match' a 0-balance ERA that has no check or EFT
M3
M3Q
UNMATCH ; Used to 'unmatch' an ERA matched in error
RETN ; Entrypoint for Remove ERA from Active Worklist

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ERA is already matched please select another ERA..."
  • Line Location: MATCHWL+11
Function Call: WRITE
  • Prompt: !,"THIS OPTION WILL ALLOW YOU TO MANUALLY MATCH AN EFT DETAIL RECORD"
  • Line Location: MATCH1+3
Function Call: WRITE
  • Prompt: !,"WITH AN ERA RECORD."
  • Line Location: MATCH1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: M1+15
Function Call: WRITE
  • Prompt: !
  • Line Location: M1+20
Function Call: WRITE
  • Prompt: " DEPOSIT NUMBER: ",DEPNUM,?40,"DEPOSIT DATE: ",DEPDT
  • Line Location: M1+22
Function Call: WRITE
  • Prompt: !
  • Line Location: M1+23
Function Call: WRITE
  • Prompt: !
  • Line Location: M12+3
Function Call: WRITE
  • Prompt: !
  • Line Location: M12+6
Function Call: WRITE
  • Prompt: !
  • Line Location: M12+8
Function Call: WRITE
  • Prompt: !,*7,$J("",3)_"> The amount of payment on these two records do not agree."
  • Line Location: M12A+8
Function Call: WRITE
  • Prompt: !
  • Line Location: M12A+22
Function Call: WRITE
  • Prompt: !,"EFT #"_$$GET1^DIQ(344.31,RCEFT,.01,"E")_" WAS "_$S(RCMTFLG:"SUCCESSFULLY",1:"NOT")_" MATCHED TO ERA #"_RCERA
  • Line Location: M12A+29
Function Call: WRITE
  • Prompt: !,"ERA/EFT balances do not match - cannot Mark for Auto-Post. Press any key."
  • Line Location: M12A+34
Function Call: WRITE
  • Prompt: !
  • Line Location: M12A+35
Function Call: WRITE
  • Prompt: !,"ERA has been successfully Marked as an Auto-Post CANDIDATE"
  • Line Location: M12A+45
Function Call: WRITE
  • Prompt: !,"ERA was NOT Marked as an Auto-Post CANDIDATE - ",$P(AUTOPOST,U,2)
  • Line Location: M12A+48
Function Call: WRITE
  • Prompt: !,"THIS OPTION WILL ALLOW YOU TO MANUALLY MARK A 0-BALANCE EFT DETAIL RECORD",!,"AS MATCHED TO A PAPER EOB"
  • Line Location: MATCH2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: M2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: M2+11
Function Call: WRITE
  • Prompt: !,"*****",!," YOU SHOULD ONLY USE THIS OPTION IF YOU HAVE AN EFT DETAIL RECORD ON YOUR",!," UNAPPLIED DEPOSIT REPORT WHOSE DETAIL WAS ENTERED ON LINE VIA A TR DOCUMENT",!,"*****",!
  • Line Location: MANTR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+10
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+15
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+24
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+26
Function Call: WRITE
  • Prompt: !
  • Line Location: MANTR+34
Function Call: WRITE
  • Prompt: !,"THIS OPTION WILL ALLOW YOU TO MANUALLY MARK A 0-BALANCE ERA WITH NO",!,"CHECK OR EFT AS 'MATCH-0 PAYMENT' TO REMOVE IT FROM THE ERA AGING REPORT"
  • Line Location: MATCH3+2
Function Call: WRITE
  • Prompt: !
  • Line Location: M3+2
Function Call: WRITE
  • Prompt: !
  • Line Location: M3+5
Function Call: WRITE
  • Prompt: !
  • Line Location: M3+7
Function Call: WRITE
  • Prompt: !
  • Line Location: UNMATCH+12
Function Call: WRITE
  • Prompt: !!,"THIS ERA IS MATCHED TO EFT #"_$$OUT^RCDPEM3(RCEFT)
  • Line Location: UNMATCH+18
Function Call: WRITE
  • Prompt: !,"* WARNING: This ERA will be Un-Marked as an Auto-Post CANDIDATE"
  • Line Location: UNMATCH+19
Function Call: WRITE
  • Prompt: !,"EFT #"_$$OUT^RCDPEM3(RCEFT)_" IS NOW UNMATCHED",!
  • Line Location: UNMATCH+24
Function Call: WRITE
  • Prompt: !
  • Line Location: UNMATCH+31
Function Call: WRITE
  • Prompt: !!,"SORRY, YOU ARE NOT AUTHORIZED TO USE THIS OPTION"
  • Line Location: RETN+4
Function Call: WRITE
  • Prompt: !,"This option is locked with RCDPE MARK ERA key.",!
  • Line Location: RETN+5
Function Call: WRITE
  • Prompt: !!,"Use this option to remove an ERA from the EEOB Worklist that should not have"
  • Line Location: RETN+7
Function Call: WRITE
  • Prompt: !,"been sent to your site by the payer; or the ERA cannot be removed off the"
  • Line Location: RETN+8
Function Call: WRITE
  • Prompt: !,"Worklist using the 'Update ERA Posted Using Paper EOB' option."
  • Line Location: RETN+9
Function Call: WRITE
  • Prompt: !!,"This option is only to be used if the paper check has been sent back to the"
  • Line Location: RETN+10
Function Call: WRITE
  • Prompt: !,"payer without being deposited. Once removed, the ERA can no longer be"
  • Line Location: RETN+11
Function Call: WRITE
  • Prompt: !,"accessed for processing, but can be viewed under the posted Worklist. For"
  • Line Location: RETN+12
Function Call: WRITE
  • Prompt: !,"auditing purposes, this option requires the user to enter a reason for"
  • Line Location: RETN+13
Function Call: WRITE
  • Prompt: !,"removing the ERA.",!
  • Line Location: RETN+14
Function Call: WRITE
  • Prompt: !
  • Line Location: RETN+22
Function Call: WRITE
  • Prompt: !
  • Line Location: RETN+24
Function Call: WRITE
  • Prompt: !
  • Line Location: RETN+37
Function Call: WRITE
  • Prompt: !
  • Line Location: RETN+41
Function Call: WRITE
  • Prompt: !
  • Line Location: RETN+47

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.3 - [#344.3] GET1^DIQ
^RCY(344.31 - [#344.31] Classic Fileman Calls,  GET1^DIQ
^RCY(344.4 - [#344.4] Classic Fileman Calls,  GET1^DIQ
^RCY(344.49 - [#344.49] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call