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

Package Total Call Graph
Accounts Receivable 12 DIQ3441^RCDPDPLM  $$LOCKDEP^RCDPDPLU  ($$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+74
^DIR PAUSE+8, PROCESS+73, ASKPROC+5
$$STATUS^GECSSGET PROCESS+101
DIQ3441^RCDPDPLM PROCESS+165, PROCESS+169
$$LOCKDEP^RCDPDPLU PROCESS+146
$$EDILB^RCDPEU PROCESS+152
$$LBEVENT^RCDPEU PROCESS+5
RET^RCDPEWL2 PROCESS+23, PROCESS+33, PROCESS+39, PROCESS+51, PROCESS+66
$$ERAWL^RCDPRPL4 PROCESS+84
DIQ344^RCDPRPLM PROCESS+97
HDR^RCDPRPLM EDITREC+15, EDITREC+29, PROCESS+186, UNLOCK+5
INIT^RCDPRPLM PROCESS+185
$$LOCKREC^RCDPRPLU EDITREC+9, EDITREC+22, PROCESS+80
EDITDEP^RCDPUDEP PROCESS+164, PROCESS+168
$$HAC^RCDPURE1 PROCESS+152
PROCESS^RCDPURE1 PROCESS+183
$$ASK17^RCDPUREC EDITREC+11
$$FMSSTAT^RCDPUREC PROCESS+47
$$ISCHMPVA^RCDPUREC PROCESS+55
EDITREC^RCDPUREC EDITREC+25, PROCESS+157
EDITREC2^RCDPUREC EDITREC+12
$$PAYTOTAL^RCDPURED PROCESS+15
$$PENDPAY^RCDPURET CHECKPAY+23
FULL^VALM1 EDITREC+2, PROCESS+2
$$FMDIFF^XLFDT PROCESS+114

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 the total amount of the associated"
  • Line Location: PROCESS+20
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+21
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed until EDI Lockbox checksum exception is"
  • Line Location: PROCESS+30
Function Call: WRITE
  • Prompt: !," cleared on the EFT transmission"
  • Line Location: PROCESS+31
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed - the receipt total does not match the"
  • Line Location: PROCESS+36
Function Call: WRITE
  • Prompt: !," EFT total for this EDI Lockbox receipt"
  • Line Location: PROCESS+37
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed yet - the EFT's deposit has not been"
  • Line Location: PROCESS+48
Function Call: WRITE
  • Prompt: !," successfully sent to FMS. Status currently is "_Z
  • Line Location: PROCESS+49
Function Call: WRITE
  • Prompt: !,"This receipt cannot be processed because the RECEIPT TOTAL does not equal"
  • Line Location: PROCESS+63
Function Call: WRITE
  • Prompt: !," does not equal the total amount on the receipt ("_$J(RCAMT,"",2)_")"
  • Line Location: PROCESS+64
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCESS+73
Function Call: WRITE
  • Prompt: !,"The bill balance for the bills listed above must be manually increased to"
  • Line Location: PROCESS+87
Function Call: WRITE
  • Prompt: !,"accommodate the automatic ERA Worklist dec adjustment amounts and to allow"
  • Line Location: PROCESS+88
Function Call: WRITE
  • Prompt: !,"the ERA receipt to be balanced - Receipt NOT processed."
  • Line Location: PROCESS+89
Function Call: WRITE
  • Prompt: !,"WARNING, no transactions are on the receipt. Processing will only change"
  • Line Location: PROCESS+94
Function Call: WRITE
  • Prompt: !,"the status of the receipt to closed."
  • Line Location: PROCESS+95
Function Call: WRITE
  • Prompt: !,"This receipt has been previously processed to FMS in the cash receipt"
  • Line Location: PROCESS+102
Function Call: WRITE
  • Prompt: !,"document ",$TR(RCDPDATA(344,RCRECTDA,200,"E")," ")
  • Line Location: PROCESS+103
Function Call: WRITE
  • Prompt: ". The current status for this document in the"
  • Line Location: PROCESS+104
Function Call: WRITE
  • Prompt: !,"Generic Code Sheet Stack file is ",STATUS,"."
  • Line Location: PROCESS+105
Function Call: WRITE
  • Prompt: !!,"You cannot reprocess and retransmit an ACCEPTED document."
  • Line Location: PROCESS+118
Function Call: WRITE
  • Prompt: !!,"You cannot reprocess and retransmit a document which has previously been"
  • Line Location: PROCESS+120
Function Call: WRITE
  • Prompt: !,"transmitted and is waiting on confirmation (less than 2 days since",!,"processing)."
  • Line Location: PROCESS+121
Function Call: WRITE
  • Prompt: !!,"Checking payment amounts versus billed amounts ..."
  • Line Location: PROCESS+125
Function Call: WRITE
  • Prompt: !," "
  • Line Location: PROCESS+135
Function Call: WRITE
  • Prompt: "*"
  • Line Location: PROCESS+135
Function Call: WRITE
  • Prompt: "WARNING: Trans# ",RCTRDA,". Pending Payments $ ",$J($P(X,"^",3),0,2)
  • Line Location: PROCESS+136
Function Call: WRITE
  • Prompt: " exceed billed amount $ ",$J($P(X,"^",2),0,2)
  • Line Location: PROCESS+137
Function Call: WRITE
  • Prompt: !,"NOTE: * Indicates more than one pending payment entered against this bill."
  • Line Location: PROCESS+139
Function Call: WRITE
  • Prompt: !,"Adjust payments listed above before processing."
  • Line Location: PROCESS+140
Function Call: WRITE
  • Prompt: " payments okay."
  • Line Location: PROCESS+143
Function Call: WRITE
  • Prompt: !!,"WARNING, Deposit Ticket is missing. If you continue with processing,"
  • Line Location: PROCESS+154
Function Call: WRITE
  • Prompt: !,"the AR accounts will be updated and a cash receipt (CR) document will"
  • Line Location: PROCESS+155
Function Call: WRITE
  • Prompt: !,"NOT be sent to FMS. You have the option to add the Deposit Ticket now."
  • Line Location: PROCESS+156
Function Call: WRITE
  • Prompt: !!,"No DEPOSIT DATE, you can edit the deposit data now."
  • Line Location: PROCESS+167
Function Call: WRITE
  • Prompt: !!,"Still No DEPOSIT DATE, use the Edit Deposit option under Deposit Processing."
  • Line Location: PROCESS+171
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCESS+175
Function Call: WRITE
  • Prompt: !!,*7,"WARNING - EDI Lbox Worklist auto dec adjustments have already been made for"
  • Line Location: PROCESS+178
Function Call: WRITE
  • Prompt: !,"this receipt!!!"
  • Line Location: PROCESS+179
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue: "
  • Line Location: UNLOCK+3
Routine Call
  • DIE
  • Line Location:
    • PROCESS+74
Routine Call
  • DIR
  • Line Location:
    • PAUSE+8
    • PROCESS+73
    • 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+46, PROCESS+55, PROCESS+58, PROCESS+59
PROCESS+60, PROCESS+68, PROCESS+93, PROCESS+126, PROCESS+134, PROCESS+158, PROCESS+187, UNLOCK+1, TXLINE+6, TXLINE+8
, CHECKPAY+3, CHECKPAY+4
^RCY(344.1 - [#344.1] UNLOCK+2
^RCY(344.3 - [#344.3] PROCESS+27, PROCESS+29, PROCESS+43, PROCESS+45
^RCY(344.31 - [#344.31] PROCESS+35, PROCESS+43, PROCESS+45
^RCY(344.4 - [#344.4] PROCESS+19, PROCESS+21, PROCESS+83
^RCY(344.49 - [#344.49] PROCESS+83
^TMP($J CHECKPAY+24!

Label References

Name Line Occurrences
$$ASKPROC PROCESS+176
$$CHECKPAY PROCESS+127
PAUSE EDITREC+13, EDITREC+20
UNLOCK PROCESS+85, PROCESS+90, PROCESS+122, PROCESS+141, PROCESS+146, PROCESS+173, PROCESS+180, PROCESS+184

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CRTR PROCESS+1~, PROCESS+5*, PROCESS+7, PROCESS+10
CSRECPT PROCESS+183!
DA PROCESS+28~, PROCESS+74*
DIE PROCESS+28~, PROCESS+74*
DIQ2 ASKPROC+2~
DIR PAUSE+5~, PROCESS+28~, PROCESS+73!, ASKPROC+2~
DIR("A" PAUSE+6*, PROCESS+70*, PROCESS+71*, ASKPROC+4*
DIR("B" PROCESS+72*, ASKPROC+3*
DIR(0 PAUSE+7*, PROCESS+71*, ASKPROC+3*
DIROUT PAUSE+5~
DIRUT PAUSE+5~
DR PROCESS+28~, PROCESS+74*
DT PROCESS+114
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+57~, PROCESS+59*, PROCESS+60
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+77~, PROCESS+84*, PROCESS+85, PROCESS+86, PROCESS+177
RCAMT PROCESS+1~, PROCESS+15*, PROCESS+19, PROCESS+21, PROCESS+35, PROCESS+64
RCDEPDA PROCESS+44~, PROCESS+45*, PROCESS+46
RCDEPTDA PROCESS+77~, PROCESS+145*, PROCESS+146, PROCESS+153, PROCESS+158*, PROCESS+163, PROCESS+164, PROCESS+165, PROCESS+166, PROCESS+168
PROCESS+169, PROCESS+170, UNLOCK+2
RCDPDATA PROCESS+77~
RCDPDATA( PROCESS+166, PROCESS+170
RCDPDATA(344 PROCESS+100, PROCESS+101, PROCESS+103, PROCESS+114, PROCESS+145, PROCESS+152, PROCESS+158*
RCDPFHLP PROCESS+77~, PROCESS+135*, PROCESS+139
RCDPFLAG PROCESS+77~, PROCESS+117*, PROCESS+122, PROCESS+131*, PROCESS+134*, PROCESS+135, PROCESS+138, PROCESS+172*, PROCESS+173
RCEFT PROCESS+1~, PROCESS+14*, PROCESS+18, PROCESS+25, PROCESS+27, PROCESS+35, PROCESS+43, PROCESS+45, PROCESS+153
RCEFT1 PROCESS+1~, PROCESS+27*, PROCESS+29
RCERA PROCESS+1~, PROCESS+14*, PROCESS+18, PROCESS+19, PROCESS+21
RCHAC PROCESS+1~, PROCESS+14*, PROCESS+27*
RCHMP PROCESS+1~, PROCESS+55*, PROCESS+56, PROCESS+153
RCOK PROCESS+1~, PROCESS+25, PROCESS+27*, PROCESS+52*, PROCESS+68, PROCESS+69*, PROCESS+74*
RCOK1 PROCESS+26~, PROCESS+42*, PROCESS+43, PROCESS+50*
RCPAYTYP EDITREC+1~, EDITREC+4*, EDITREC+7, EDITREC+18
RCQUIT PROCESS+1~, PROCESS+17*, PROCESS+18, PROCESS+19*, PROCESS+56, PROCESS+62*
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+44~, PROCESS+46*, PROCESS+47, PROCESS+55, PROCESS+58, PROCESS+59, PROCESS+60, PROCESS+68
PROCESS+74, PROCESS+80, PROCESS+83, PROCESS+93, PROCESS+97, PROCESS+100, PROCESS+101, PROCESS+103, PROCESS+114, PROCESS+126
PROCESS+127, PROCESS+134, PROCESS+145, PROCESS+152, PROCESS+157, PROCESS+158, PROCESS+183, PROCESS+187, UNLOCK+1, TXLINE~
, TXLINE+6, TXLINE+8, CHECKPAY~, CHECKPAY+3, CHECKPAY+4
RCSCR PROCESS+77~, PROCESS+83*, PROCESS+84
RCTOT PROCESS+57~, PROCESS+58*, PROCESS+61
RCTRDA PROCESS+77~, PROCESS+126*, PROCESS+127, PROCESS+134, PROCESS+136, CHECKPAY~, CHECKPAY+4
STATUS PROCESS+77~, PROCESS+101*, PROCESS+105, PROCESS+108, PROCESS+111, PROCESS+114, PROCESS+118, PROCESS+119
TXLINE TXLINE+3~, TXLINE+4*, TXLINE+5, TXLINE+6*, TXLINE+7, TXLINE+8
TXTOT PROCESS+57~, PROCESS+58*, PROCESS+60*, PROCESS+61
U EDITREC+10, PROCESS+5, PROCESS+14, PROCESS+19, PROCESS+21, PROCESS+27, PROCESS+29, PROCESS+35, PROCESS+43, PROCESS+45
PROCESS+47, PROCESS+55, PROCESS+58, PROCESS+60, PROCESS+68
>> VALMBCK EDITREC+3*, PROCESS+3*
>> VALMSG PROCESS+22*, PROCESS+32*, PROCESS+38*, PROCESS+50*, PROCESS+65*, PROCESS+75*, PROCESS+80*, PROCESS+187*, UNLOCK+4*
X PAUSE+5~, PROCESS+1~, PROCESS+127*, PROCESS+128, PROCESS+134, PROCESS+136, PROCESS+137, UNLOCK+3*, CHECKPAY+1~, CHECKPAY+16*
, CHECKPAY+17, CHECKPAY+19*, CHECKPAY+26, CHECKPAY+28, ASKPROC+2~
XX PROCESS+1~, PROCESS+152*, PROCESS+153
Y PAUSE+5~, PAUSE+9, PROCESS+74, ASKPROC+2~, ASKPROC+6*, ASKPROC+7
Z PROCESS+1~, PROCESS+28~, PROCESS+47*, PROCESS+49
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