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

Package: Accounts Receivable

Routine: RCDPURE1


Information

RCDPURE1 ;WISC/RFJ - Process a Receipt ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPURE1.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Accounts Receivable 8 $$FPS^RCAMFN01  $$PROCESS^RCBEPAY  ($$EDILB,$$HACEFT)^RCDPEU  $$OPTCK^RCDPRPL2  MARKPROC^RCDPUREC  $$LDATE^RCRJR  $$BUILDCR^RCXFMSCR  $$GETTR^RCXFMST1  
Kernel 2 ^%ZISC  ^%ZTLOAD  
VA FileMan 2 DD^%DT  ^DIE  
Generic Code Sheet 1 DATA^GECSSGET  

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

Package Total Caller Graph
Accounts Receivable 6 RCDPEAP  RCDPEM0  RCDPEWL5  RCDPRPL3  RCDPUREC  RCDPXPAP  

Entry Points

Name Comments DBIA/ICR reference
PROCESS(RCRECTDA,RCSCREEN) ; process a receipt, update ar, generate cr/tr documents to fms
; the receipt and deposit must be locked before calling this label
; if $g(rcscreen) = 1 show messages during processing
; if $g(rcscreen) = 2 store messages during processing
;
215 ; === print 215 report ===
Q215
UPDERA(RCERA) ; Update detail posted status for ERA entry RCERA
MSG(RCMSG,RCSCREEN,PRELINE,POSTLINE) ; Write message or set into msg array
; RCMSG = text to write RCSCREEN = screen flag
; PRELINE = the line feeds to print before the text
; POSTLINE = the line feeds to print after the text
MSGQ
EDIT4(DA,DR,RCDR1,RCDR2,RCDR3) ; Modify DR string for type of payment edit
; for EDI Lockbox
; Input: DA,DR Output: RCDR1,RCDR2,RCDR3
; If type unchanged, or neither old/new are EDI Lockbox, no chk needed
; If old type is EDI Lockbox and scratch pad exists, no change allowed
; If changed to EDI Lockbox and detail already exists, no chg allowed without UNMATCH EFT key
; If changed to EDI Lockbox, ask for related EFT
SETV ; Set up variables needed to edit change of receipt type, used in DR strings to edit AR BATCH PAYMENT (#344)
; RCO4 = existing (#.04) TYPE OF PAYMENT value, RCOE = existing (#.17) EFT RECORD value
WL(DA) ; Function returns 0 if the worklist did not create the receipt
; or the ien of the worklist entry if it did (344.4 and 344.49 are DINUMED)
HAC(RC) ; Returns 1 if the receipt in RC is related to a HAC EFT

External References

Name Field # of Occurrence
DD^%DT PROCESS+121
^%ZISC 215+7
^%ZTLOAD 215+7
^DIE PROCESS+117, PROCESS+118, UPDERA+3
DATA^GECSSGET PROCESS+98
$$FPS^RCAMFN01 PROCESS+121
$$PROCESS^RCBEPAY PROCESS+60
$$EDILB^RCDPEU PROCESS+38
$$HACEFT^RCDPEU PROCESS+86
$$OPTCK^RCDPRPL2 215+3
MARKPROC^RCDPUREC PROCESS+34, PROCESS+126
$$LDATE^RCRJR PROCESS+121
$$BUILDCR^RCXFMSCR PROCESS+105
$$GETTR^RCXFMST1 PROCESS+107

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: PROCESS+121
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+8
Function Call: WRITE
  • Prompt: RCMSG
  • Line Location: MSG+9
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+10
Routine Call
  • DIE
  • Line Location:
    • PROCESS+117
    • PROCESS+118
    • UPDERA+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344 - [#344] PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+39, PROCESS+43, PROCESS+49, PROCESS+59, PROCESS+67, PROCESS+82, PROCESS+86
, PROCESS+95, PROCESS+118, SETV+2, HAC+4
^RCY(344.3 - [#344.3] HAC+6
^RCY(344.31 - [#344.31] PROCESS+118, HAC+4
^RCY(344.4 - [#344.4] PROCESS+117, WL+3
^TMP("RCDPE-RECEIPT-ERROR" PROCESS+6!, PROCESS+45*, PROCESS+52*, PROCESS+61*, PROCESS+89*, PROCESS+112*
^TMP("RCDPEMSG" MSG+11, MSG+12, MSG+13
^TMP($J PROCESS+6!, MSG+11*, MSG+12*, MSG+13*

Label References

Name Line Occurrences
215 PROCESS+83, PROCESS+87
MSG PROCESS+25, PROCESS+27, PROCESS+44, PROCESS+51, PROCESS+56, PROCESS+66, PROCESS+67, PROCESS+68, PROCESS+69, PROCESS+70
, PROCESS+71, PROCESS+72, PROCESS+73, PROCESS+74, PROCESS+75, PROCESS+79, PROCESS+88, PROCESS+100, PROCESS+101, PROCESS+109
, PROCESS+112, PROCESS+116, PROCESS+121, PROCESS+127, 215+1, 215+4, Q215
MSGQ MSG+7
Q215 PROCESS+127
UPDERA PROCESS+46, PROCESS+53, PROCESS+78

Naked Globals

Name Field # of Occurrence
^( PROCESS+49

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA PROCESS+115~, PROCESS+117*, PROCESS+118*, UPDERA+2~, UPDERA+3*, EDIT4~, SETV+2, WL~, WL+3
DEVICE 215+2~, 215+3*, 215+4, 215+6
DIE PROCESS+115~, PROCESS+117*, PROCESS+118*, UPDERA+2~, UPDERA+3*
DIQ2 PROCESS+98~
DR PROCESS+115~, PROCESS+117*, PROCESS+118*, UPDERA+2~, UPDERA+3*, EDIT4~, EDIT4+10, EDIT4+12, EDIT4+14, EDIT4+17
, EDIT4+24
DT PROCESS+121
FMSDOCNO PROCESS+92~, PROCESS+95*, PROCESS+98
GECSDATA PROCESS+92~, PROCESS+100, PROCESS+101, PROCESS+105, PROCESS+107
HAC HAC+1~, HAC+2*, HAC+6*, HAC+7
POSTLINE MSG~, MSG+6
PRELINE MSG~, MSG+6
RC HAC~, HAC+4
RCCMTFLG PROCESS+5~, PROCESS+7*, PROCESS+11, PROCESS+28*
RCDPETY PROCESS+82~*, PROCESS+83
RCDPFPAY PROCESS+5~, PROCESS+49*, PROCESS+50
RCDR EDIT4+7~
RCDR1 EDIT4~, EDIT4+8*, EDIT4+17*
RCDR2 EDIT4~, EDIT4+8*, EDIT4+18*, EDIT4+20*, EDIT4+21*, EDIT4+23*
RCDR3 EDIT4~, EDIT4+8*, EDIT4+24*
RCEFT PROCESS+5~, PROCESS+38*, PROCESS+73, PROCESS+86, PROCESS+104, PROCESS+105, PROCESS+127
RCERA PROCESS+5~, PROCESS+39*, PROCESS+46, PROCESS+53, PROCESS+78, UPDERA~, UPDERA+3
RCERROR PROCESS+5~, PROCESS+59, PROCESS+60*, PROCESS+61, PROCESS+64, PROCESS+70
RCI PROCESS+5~, PROCESS+19*
RCJ PROCESS+5~, PROCESS+22*, PROCESS+23
RCLST EDIT4+7~, EDIT4+12*, EDIT4+24
RCM EDIT4+7~, SETV+3*
RCM1 EDIT4+7~, SETV+4*
RCM2 EDIT4+7~, SETV+5*
RCM3 EDIT4+7~, SETV+6*
RCMSG PROCESS+5~, PROCESS+21*, PROCESS+23*, PROCESS+24*, PROCESS+25, PROCESS+26*, PROCESS+27, PROCESS+44*, PROCESS+45, PROCESS+51*
, PROCESS+52, PROCESS+56*, PROCESS+66*, PROCESS+67*, PROCESS+68*, PROCESS+69*, PROCESS+70*, PROCESS+71*, PROCESS+72*, PROCESS+73*
, PROCESS+74*, PROCESS+75*, PROCESS+88*, PROCESS+100*, PROCESS+101*, PROCESS+112*, PROCESS+121*, MSG~, MSG+9, MSG+12
RCN4 EDIT4+7~
RCNE EDIT4+7~
RCNO EDIT4+7~
RCO4 EDIT4+7~, SETV+2*
RCOE EDIT4+7~, SETV+2*
RCP EDIT4+7~, EDIT4+10*, EDIT4+17, EDIT4+18, EDIT4+20, EDIT4+21, EDIT4+23
RCPAYDA PROCESS+5~, PROCESS+12*, PROCESS+13*, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+49*, PROCESS+59*, PROCESS+60, PROCESS+67
RCPAYDT0 PROCESS+5~, PROCESS+14*, PROCESS+17
RCPAYDT1 PROCESS+5~, PROCESS+15*, PROCESS+17
RCPOST MSG+5~, MSG+6*, MSG+10, MSG+13
RCPRE MSG+5~, MSG+6*, MSG+8, MSG+11
RCRECTDA PROCESS~, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+34, PROCESS+38, PROCESS+39, PROCESS+43, PROCESS+49, PROCESS+59
, PROCESS+60, PROCESS+67, PROCESS+82, PROCESS+86, PROCESS+95, PROCESS+105, PROCESS+107, PROCESS+117, PROCESS+118, PROCESS+126
, 215+6
RCSCREEN PROCESS~, PROCESS+11, PROCESS+20, PROCESS+25, PROCESS+27, PROCESS+44, PROCESS+51, PROCESS+56, PROCESS+65, PROCESS+66
, PROCESS+67, PROCESS+68, PROCESS+69, PROCESS+70, PROCESS+71, PROCESS+72, PROCESS+73, PROCESS+74, PROCESS+75, PROCESS+79
, PROCESS+88, PROCESS+100, PROCESS+101, PROCESS+109, PROCESS+112, PROCESS+114, PROCESS+116, PROCESS+119, PROCESS+121, PROCESS+127
, 215+1, 215+4, Q215, MSG~, MSG+4, MSG+7
RCSTRT EDIT4+7~, EDIT4+12*, EDIT4+14*, EDIT4+17, EDIT4+24
RCSUSPAR PROCESS+5~, PROCESS+12*
RCSUSPAR( PROCESS+17*, PROCESS+19, PROCESS+22
REFMS PROCESS+92~, PROCESS+98*, PROCESS+121
RESULT PROCESS+92~, PROCESS+105*, PROCESS+107*, PROCESS+109, PROCESS+112*, PROCESS+114, PROCESS+116, PROCESS+126
U PROCESS+17, PROCESS+39, PROCESS+86, PROCESS+118, SETV+2, HAC+4, HAC+6
X SETV+2~*
Y PROCESS+120~, PROCESS+121*
Z PROCESS+115~, PROCESS+118*, MSG+5~, MSG+8*, MSG+10*, MSG+11*, MSG+13*, EDIT4+7~, EDIT4+10*, EDIT4+12*
, EDIT4+13, WL+2~, WL+3*, WL+4, HAC+1~, HAC+4*, HAC+6*
Z0 EDIT4+7~, EDIT4+14*
>> ZTDTH 215+6*
>> ZTIO 215+6*
>> ZTRTN 215+6*
>> ZTSAVE("RCTYPE" 215+6*
>> ZTSAVE("RECEIPDA" 215+6*
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