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

Package: Accounts Receivable

Routine: RCDPRPL3


Information

RCDPRPL3 ;WISC/RFJ-receipt profile listmanager options ;1 Jun 99

Source Information

Source file <RCDPRPL3.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Accounts Receivable 13 DIQ3441^RCDPDPLM  $$LOCKDEP^RCDPDPLU  OFFSET^RCDPEAD5  ($$EDILB,$$LBEVENT)^RCDPEU  RET^RCDPEWL2  $$ERAWL^RCDPRPL4  (DIQ344,HDR,INIT)^RCDPRPLM  $$LOCKREC^RCDPRPLU  
EDITDEP^RCDPUDEP  ($$HAC,PROCESS)^RCDPURE1  ($$ASK17,$$FMSSTAT,$$ISCHMPVA,EDITREC,EDITREC2)^RCDPUREC  $$PAYTOTAL^RCDPURED  $$PENDPAY^RCDPURET  
VA FileMan 2 ^DIE  ^DIR  
Generic Code Sheet 1 $$STATUS^GECSSGET  
Kernel 1 $$FMDIFF^XLFDT  
List Manager 1 FULL^VALM1  

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: 4

Package Total Caller Graph
Accounts Receivable 3 RCDP RECEIPT PROFILE EDIT RECEIPT  RCDP RECEIPT PROFILE PROCESS RECEIPT  RCDPRPLM  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EDITREC ; option: edit the receipt, deposit #
PAUSE() ; Pause at end of each page for user input
; PRCA*4.5*409 Added function
; Input: None
; Returns: None
PROCESS ; option: process receipt
UNLOCK ; Unlock/pause
TXLINE(RCRECTDA) ; Check if the receipt has at least one transaction that is not cancelled
; Input: RCRECTDA - IEN of the Receipt (File #344)
; Returns: 1 if at least one non-cancelled transaction line exists, 0 otherwise
CHECKPAY(RCRECTDA,RCTRDA) ; called to check amt pd against amt of bill
ASKPROC() ; ask if its okay to process the receipt
; 1 is yes, otherwise no

External References

Name Field # of Occurrence
^DIE PROCESS+87
^DIR PAUSE+8, PROCESS+86, ASKPROC+5
$$STATUS^GECSSGET PROCESS+114
DIQ3441^RCDPDPLM PROCESS+178, PROCESS+182
$$LOCKDEP^RCDPDPLU PROCESS+159
OFFSET^RCDPEAD5 PROCESS+198
$$EDILB^RCDPEU PROCESS+165
$$LBEVENT^RCDPEU PROCESS+5
RET^RCDPEWL2 PROCESS+28, PROCESS+36, PROCESS+46, PROCESS+52, PROCESS+64, PROCESS+79
$$ERAWL^RCDPRPL4 PROCESS+97
DIQ344^RCDPRPLM PROCESS+110
HDR^RCDPRPLM EDITREC+15, EDITREC+29, PROCESS+201, UNLOCK+5
INIT^RCDPRPLM PROCESS+200
$$LOCKREC^RCDPRPLU EDITREC+9, EDITREC+22, PROCESS+93
EDITDEP^RCDPUDEP PROCESS+177, PROCESS+181
$$HAC^RCDPURE1 PROCESS+165
PROCESS^RCDPURE1 PROCESS+196
$$ASK17^RCDPUREC EDITREC+11
$$FMSSTAT^RCDPUREC PROCESS+60
$$ISCHMPVA^RCDPUREC PROCESS+68
EDITREC^RCDPUREC EDITREC+25, PROCESS+170
EDITREC2^RCDPUREC EDITREC+12
$$PAYTOTAL^RCDPURED PROCESS+15
$$PENDPAY^RCDPURET CHECKPAY+23
FULL^VALM1 EDITREC+2, PROCESS+2
$$FMDIFF^XLFDT PROCESS+127

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"Receipts with a Payment Type of OGC-CHK cannot be edited"
  • Line Location: EDITREC+19
Function Call: WRITE
  • Prompt: !
  • Line Location: EDITREC+24
Function Call: WRITE
  • Prompt: !!,"This option will process the payments for the receipt updating the AR"
  • Line Location: PROCESS+6
Function Call: WRITE
  • Prompt: !,"Package and generate the "_CRTR_" receipt document to FMS. Any decrease"
  • Line Location: PROCESS+7
Function Call: WRITE
  • Prompt: !,"adjustments entered via the EDI Lockbox Worklist will also be generated."
  • Line Location: PROCESS+8
Function Call: WRITE
  • Prompt: !,"Once a receipt has been processed, the receipt status will change to closed"
  • Line Location: PROCESS+9
Function Call: WRITE
  • Prompt: !,"and no further processing of the receipt can occur. If the FMS "_CRTR
  • Line Location: PROCESS+10
Function Call: WRITE
  • Prompt: !," receipt document rejects, you can use this same option to reprocess the"
  • Line Location: PROCESS+11
Function Call: WRITE
  • Prompt: !,"receipt.",!
  • Line Location: PROCESS+12
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed because EFT ",$P($G(^RCY(344.31,RCEFT,0)),U,1)," is already on a receipt."
  • Line Location: PROCESS+25
Function Call: WRITE
  • Prompt: !,"Receipts: ",RCRPTLST
  • Line Location: PROCESS+26
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed because the total amount of the associated"
  • Line Location: PROCESS+33
Function Call: WRITE
  • Prompt: !," ERA ("_$J(+$P($G(^RCY(344.4,+RCERA,0)),U,5),"",2)_") does not equal the total amount on the receipt ("_$J(RCAMT,"",2)_")"
  • Line Location: PROCESS+34
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed until EDI Lockbox checksum exception is"
  • Line Location: PROCESS+43
Function Call: WRITE
  • Prompt: !," cleared on the EFT transmission"
  • Line Location: PROCESS+44
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed - the receipt total does not match the"
  • Line Location: PROCESS+49
Function Call: WRITE
  • Prompt: !," EFT total for this EDI Lockbox receipt"
  • Line Location: PROCESS+50
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed yet - the EFT's deposit has not been"
  • Line Location: PROCESS+61
Function Call: WRITE
  • Prompt: !," successfully sent to FMS. Status currently is "_Z
  • Line Location: PROCESS+62
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed because the RECEIPT TOTAL does not equal"
  • Line Location: PROCESS+76
Function Call: WRITE
  • Prompt: !," does not equal the total amount on the receipt ("_$J(RCAMT,"",2)_")"
  • Line Location: PROCESS+77
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCESS+86
Function Call: WRITE
  • Prompt: !,"The bill balance for the bills listed above must be manually increased to"
  • Line Location: PROCESS+100
Function Call: WRITE
  • Prompt: !,"accommodate the automatic ERA Worklist dec adjustment amounts and to allow"
  • Line Location: PROCESS+101
Function Call: WRITE
  • Prompt: !,"the ERA receipt to be balanced - Receipt NOT processed."
  • Line Location: PROCESS+102
Function Call: WRITE
  • Prompt: !,"WARNING, no transactions are on the receipt. Processing will only change"
  • Line Location: PROCESS+107
Function Call: WRITE
  • Prompt: !,"the status of the receipt to closed."
  • Line Location: PROCESS+108
Function Call: WRITE
  • Prompt: !,"This receipt has been previously processed to FMS in the cash receipt"
  • Line Location: PROCESS+115
Function Call: WRITE
  • Prompt: !,"document ",$TR(RCDPDATA(344,RCRECTDA,200,"E")," ")
  • Line Location: PROCESS+116
Function Call: WRITE
  • Prompt: ". The current status for this document in the"
  • Line Location: PROCESS+117
Function Call: WRITE
  • Prompt: !,"Generic Code Sheet Stack file is ",STATUS,"."
  • Line Location: PROCESS+118
Function Call: WRITE
  • Prompt: !!,"You cannot reprocess and retransmit an ACCEPTED document."
  • Line Location: PROCESS+131
Function Call: WRITE
  • Prompt: !!,"You cannot reprocess and retransmit a document which has previously been"
  • Line Location: PROCESS+133
Function Call: WRITE
  • Prompt: !,"transmitted and is waiting on confirmation (less than 2 days since",!,"processing)."
  • Line Location: PROCESS+134
Function Call: WRITE
  • Prompt: !!,"Checking payment amounts versus billed amounts ..."
  • Line Location: PROCESS+138
Function Call: WRITE
  • Prompt: !," "
  • Line Location: PROCESS+148
Function Call: WRITE
  • Prompt: "*"
  • Line Location: PROCESS+148
Function Call: WRITE
  • Prompt: "WARNING: Trans# ",RCTRDA,". Pending Payments $ ",$J($P(X,"^",3),0,2)
  • Line Location: PROCESS+149
Function Call: WRITE
  • Prompt: " exceed billed amount $ ",$J($P(X,"^",2),0,2)
  • Line Location: PROCESS+150
Function Call: WRITE
  • Prompt: !,"NOTE: * Indicates more than one pending payment entered against this bill."
  • Line Location: PROCESS+152
Function Call: WRITE
  • Prompt: !,"Adjust payments listed above before processing."
  • Line Location: PROCESS+153
Function Call: WRITE
  • Prompt: " payments okay."
  • Line Location: PROCESS+156
Function Call: WRITE
  • Prompt: !!,"WARNING, Deposit Ticket is missing. If you continue with processing,"
  • Line Location: PROCESS+167
Function Call: WRITE
  • Prompt: !,"the AR accounts will be updated and a cash receipt (CR) document will"
  • Line Location: PROCESS+168
Function Call: WRITE
  • Prompt: !,"NOT be sent to FMS. You have the option to add the Deposit Ticket now."
  • Line Location: PROCESS+169
Function Call: WRITE
  • Prompt: !!,"No DEPOSIT DATE, you can edit the deposit data now."
  • Line Location: PROCESS+180
Function Call: WRITE
  • Prompt: !!,"Still No DEPOSIT DATE, use the Edit Deposit option under Deposit Processing."
  • Line Location: PROCESS+184
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCESS+188
Function Call: WRITE
  • Prompt: !!,*7,"WARNING - EDI Lbox Worklist auto dec adjustments have already been made for"
  • Line Location: PROCESS+191
Function Call: WRITE
  • Prompt: !,"this receipt!!!"
  • Line Location: PROCESS+192
Function Call: WRITE
  • Prompt: !!,"Processing Receipt for First Party Auto Decrease",!
  • Line Location: PROCESS+197
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue: "
  • Line Location: UNLOCK+3
Routine Call
  • DIE
  • Line Location:
    • PROCESS+87
Routine Call
  • DIR
  • Line Location:
    • PAUSE+8
    • PROCESS+86
    • ASKPROC+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344 - [#344] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] CHECKPAY+12, CHECKPAY+14, CHECKPAY+16, CHECKPAY+19
^RCD(340 - [#340] CHECKPAY+12
^RCY(344 - [#344] EDITREC+4, EDITREC+10, EDITREC+14, EDITREC+26, PROCESS+5, PROCESS+14, PROCESS+23, PROCESS+59, PROCESS+68, PROCESS+71
, PROCESS+72, PROCESS+73, PROCESS+81, PROCESS+106, PROCESS+139, PROCESS+147, PROCESS+171, PROCESS+202, UNLOCK+1, TXLINE+6
, TXLINE+8, CHECKPAY+3, CHECKPAY+4
^RCY(344.1 - [#344.1] UNLOCK+2
^RCY(344.3 - [#344.3] PROCESS+40, PROCESS+42, PROCESS+56, PROCESS+58
^RCY(344.31 - [#344.31] PROCESS+25, PROCESS+27, PROCESS+48, PROCESS+56, PROCESS+58
^RCY(344.4 - [#344.4] PROCESS+32, PROCESS+34, PROCESS+96
^RCY(344.49 - [#344.49] PROCESS+96
^TMP($J CHECKPAY+24!

Label References

Name Line Occurrences
$$ASKPROC PROCESS+189
$$CHECKPAY PROCESS+140
PAUSE EDITREC+13, EDITREC+20
UNLOCK PROCESS+98, PROCESS+103, PROCESS+135, PROCESS+154, PROCESS+159, PROCESS+186, PROCESS+193, PROCESS+199

Naked Globals

Name Field # of Occurrence
^(0 PROCESS+14, PROCESS+81

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COUNTRPT PROCESS+21~, PROCESS+22*, PROCESS+23*, PROCESS+24
CRTR PROCESS+1~, PROCESS+5*, PROCESS+7, PROCESS+10
CSRECPT PROCESS+196!
DA PROCESS+41~, PROCESS+87*
DIE PROCESS+41~, PROCESS+87*
DIQ2 ASKPROC+2~
DIR PAUSE+5~, PROCESS+41~, PROCESS+86!, ASKPROC+2~
DIR("A" PAUSE+6*, PROCESS+83*, PROCESS+84*, ASKPROC+4*
DIR("B" PROCESS+85*, ASKPROC+3*
DIR(0 PAUSE+7*, PROCESS+84*, ASKPROC+3*
DIROUT PAUSE+5~
DIRUT PAUSE+5~
DR PROCESS+41~, PROCESS+87*
DT PROCESS+127
DTIME UNLOCK+3
DTOUT PAUSE+5~, ASKPROC+2~, ASKPROC+6
DUOUT PAUSE+5~, ASKPROC+2~, ASKPROC+6
FOUND TXLINE+3~, TXLINE+4*, TXLINE+5, TXLINE+8*, TXLINE+9
I PROCESS+70~, PROCESS+72*, PROCESS+73
NEWEFT EDITREC+8~, EDITREC+11*, EDITREC+12
OLDEFT EDITREC+8~, EDITREC+10*, EDITREC+12
PAYDATA CHECKPAY+1~, CHECKPAY+4*, CHECKPAY+6, CHECKPAY+8, CHECKPAY+10, CHECKPAY+12, CHECKPAY+14, CHECKPAY+16, CHECKPAY+19, CHECKPAY+23
PENDING CHECKPAY+1~, CHECKPAY+23*, CHECKPAY+26, CHECKPAY+28
RC PROCESS+1~, PROCESS+5*
RCADJ PROCESS+90~, PROCESS+97*, PROCESS+98, PROCESS+99, PROCESS+190
RCAMT PROCESS+1~, PROCESS+15*, PROCESS+32, PROCESS+34, PROCESS+48, PROCESS+77
RCDEPDA PROCESS+57~, PROCESS+58*, PROCESS+59
RCDEPTDA PROCESS+90~, PROCESS+158*, PROCESS+159, PROCESS+166, PROCESS+171*, PROCESS+176, PROCESS+177, PROCESS+178, PROCESS+179, PROCESS+181
, PROCESS+182, PROCESS+183, UNLOCK+2
RCDPDATA PROCESS+90~
RCDPDATA( PROCESS+179, PROCESS+183
RCDPDATA(344 PROCESS+113, PROCESS+114, PROCESS+116, PROCESS+127, PROCESS+158, PROCESS+165, PROCESS+171*
RCDPFHLP PROCESS+90~, PROCESS+148*, PROCESS+152
RCDPFLAG PROCESS+90~, PROCESS+130*, PROCESS+135, PROCESS+144*, PROCESS+147*, PROCESS+148, PROCESS+151, PROCESS+185*, PROCESS+186
RCEFT PROCESS+1~, PROCESS+14*, PROCESS+19, PROCESS+23, PROCESS+25, PROCESS+27, PROCESS+31, PROCESS+38, PROCESS+40, PROCESS+48
, PROCESS+56, PROCESS+58, PROCESS+166
RCEFT1 PROCESS+1~, PROCESS+40*, PROCESS+42
RCERA PROCESS+1~, PROCESS+14*, PROCESS+31, PROCESS+32, PROCESS+34
RCHAC PROCESS+1~, PROCESS+14*, PROCESS+40*
RCHMP PROCESS+1~, PROCESS+68*, PROCESS+69, PROCESS+166
RCOK PROCESS+1~, PROCESS+38, PROCESS+40*, PROCESS+65*, PROCESS+81, PROCESS+82*, PROCESS+87*
RCOK1 PROCESS+39~, PROCESS+55*, PROCESS+56, PROCESS+63*
RCPAYTYP EDITREC+1~, EDITREC+4*, EDITREC+7, EDITREC+18
RCQUIT PROCESS+1~, PROCESS+18*, PROCESS+19, PROCESS+24*, PROCESS+30*, PROCESS+31, PROCESS+32*, PROCESS+69, PROCESS+75*
RCRECTDA EDITREC+4, EDITREC+9, EDITREC+10, EDITREC+11, EDITREC+12, EDITREC+14, EDITREC+22, EDITREC+25, EDITREC+26, PROCESS+5
, PROCESS+14, PROCESS+15, PROCESS+57~, PROCESS+59*, PROCESS+60, PROCESS+68, PROCESS+71, PROCESS+72, PROCESS+73, PROCESS+81
, PROCESS+87, PROCESS+93, PROCESS+96, PROCESS+106, PROCESS+110, PROCESS+113, PROCESS+114, PROCESS+116, PROCESS+127, PROCESS+139
, PROCESS+140, PROCESS+147, PROCESS+158, PROCESS+165, PROCESS+170, PROCESS+171, PROCESS+196, PROCESS+198, PROCESS+202, UNLOCK+1
, TXLINE~, TXLINE+6, TXLINE+8, CHECKPAY~, CHECKPAY+3, CHECKPAY+4
RCRPTCNT PROCESS+21~, PROCESS+22*, PROCESS+23*
RCRPTLST PROCESS+21~, PROCESS+22*, PROCESS+23*, PROCESS+26
RCSCR PROCESS+90~, PROCESS+96*, PROCESS+97
RCTOT PROCESS+70~, PROCESS+71*, PROCESS+74
RCTRDA PROCESS+90~, PROCESS+139*, PROCESS+140, PROCESS+147, PROCESS+149, CHECKPAY~, CHECKPAY+4
STATUS PROCESS+90~, PROCESS+114*, PROCESS+118, PROCESS+121, PROCESS+124, PROCESS+127, PROCESS+131, PROCESS+132
TXLINE TXLINE+3~, TXLINE+4*, TXLINE+5, TXLINE+6*, TXLINE+7, TXLINE+8
TXTOT PROCESS+70~, PROCESS+71*, PROCESS+73*, PROCESS+74
U EDITREC+10, PROCESS+5, PROCESS+14, PROCESS+23, PROCESS+25, PROCESS+27, PROCESS+32, PROCESS+34, PROCESS+40, PROCESS+42
, PROCESS+48, PROCESS+56, PROCESS+58, PROCESS+60, PROCESS+68, PROCESS+71, PROCESS+73, PROCESS+81
>> VALMBCK EDITREC+3*, PROCESS+3*
>> VALMSG PROCESS+27*, PROCESS+35*, PROCESS+45*, PROCESS+51*, PROCESS+63*, PROCESS+78*, PROCESS+88*, PROCESS+93*, PROCESS+202*, UNLOCK+4*
X PAUSE+5~, PROCESS+1~, PROCESS+140*, PROCESS+141, PROCESS+147, PROCESS+149, PROCESS+150, UNLOCK+3*, CHECKPAY+1~, CHECKPAY+16*
, CHECKPAY+17, CHECKPAY+19*, CHECKPAY+26, CHECKPAY+28, ASKPROC+2~
XX PROCESS+1~, PROCESS+165*, PROCESS+166
Y PAUSE+5~, PAUSE+9, PROCESS+87, ASKPROC+2~, ASKPROC+6*, ASKPROC+7
Z PROCESS+1~, PROCESS+41~, PROCESS+60*, PROCESS+62
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All