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

Package: Accounts Receivable

Routine: RCDPEWL4


Information

RCDPEWL4 ;ALB/TMK/PJH - ELECTRONIC EOB WORKLIST ACTIONS ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPEWL4.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Accounts Receivable 9 RCPTDET^RCDPEM  $$HACERA^RCDPEU  NOBATCH^RCDPEWL  BLD^RCDPEWL1  NOTAV^RCDPEWL2  $$HASADJ^RCDPEWL8  $$TOOOLD^RCDPEWLA  VR^RCDPEWLP  
$$BLDRCPT^RCDPUREC  
VA FileMan 6 ^DIC  FILE^DICN  (,FILE)^DIE  ^DIK  $$GET1^DIQ  ^DIR  
List Manager 2 EN^VALM  (FULL,PAUSE)^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: 5

Package Total Caller Graph
Accounts Receivable 4 RCDPE EOB WL RECEIPT VIEW  RCDPE EOB WORKLIST RECEIPT  RCDPE EOB WORKLIST RECEIPT PROCESSING  RCDPEWL6  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
DISTADJ(RCFR,RCTO,RCAMT,RCCOM) ; Action that distributes an adjustment amount
; against another line item's payment
; Assumes RCSCR = ien of the entry in file 344.49
; RCFR = ien of entry in 344.491 that has a negative net
; RCTO = ien of entry in 344.491 that will be decremented
; RCAMT = the amount being adjusted (positive #)
; RCCOM = the comment to place on the decrease adjustment
NEWREC ; Create a new receipt from scratch pad entry
NEWRECQ
VRECPT ;EP - Protocol action - RCDPE EOB WL RECEIPT VIEW
; Preview receipt lines
; Assume RCSCR = ien from file 344.49 (and 344.4)
VRECPTQ ;
RECPROC ;EP - Protocol action - RCDPE EON WORKLIST RECEIPT PROCESSING
; Receipt Processing
; Called by RCDPE EOB WORKLIST RECEIPT PROCESSING protocol
; Assume RCSCR is the IEN from file 344.49 (and 344.4)
; Variable RCRECTDA is needed by RECEIPT PROFILE so is not newed
; Variable RCDPFXIT is used by RCDPLPLM for immediate exit so newed it here so that does not happen
RECPROC1 ;
RECPROCQ ;
; Display the message in DIR("A",1) and then press enter

External References

Name Field # of Occurrence
^DIC NEWREC+25
FILE^DICN DISTADJ+20, DISTADJ+38
^DIE DISTADJ+46, DISTADJ+47, DISTADJ+48, DISTADJ+49, DISTADJ+52, NEWREC+43, NEWREC+44, NEWREC+46
FILE^DIE NEWREC+41
^DIK DISTADJ+43
$$GET1^DIQ RECPROC+21
^DIR DISTADJ+23, DISTADJ+44, NEWREC+9, NEWREC+12, NEWREC+13, NEWREC+15, NEWREC+16, NEWREC+30, NEWREC+52, NEWREC+54
, VRECPT+22, RECPROC+34, RECPROCQ+3
RCPTDET^RCDPEM NEWREC+32
$$HACERA^RCDPEU NEWREC+18
NOBATCH^RCDPEWL DISTADJ+10
BLD^RCDPEWL1 DISTADJ+53
NOTAV^RCDPEWL2 NEWREC+3
$$HASADJ^RCDPEWL8 NEWREC+14
$$TOOOLD^RCDPEWLA NEWREC+28
VR^RCDPEWLP VRECPT+6
$$BLDRCPT^RCDPUREC NEWREC+29
EN^VALM NEWREC+55, VRECPT+25, VRECPT+26, RECPROC1+1
FULL^VALM1 NEWREC+2, VRECPT+4, RECPROC+8
PAUSE^VALM1 RECPROC+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+9
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+12
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+12
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+13
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+16
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+30
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+30
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+52
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWREC+54
Function Call: WRITE
  • Prompt: !
  • Line Location: VRECPT+15
Function Call: WRITE
  • Prompt: !,"THE FOLLOWING LINES HAVE A NET PAYMENT LESS THAN 0. THESE LINES MUST HAVE",!,"THIS NEGATIVE AMOUNT DISTRIBUTED TO OTHER LINE(S) IN THE ERA BEFORE A",!,"RECEIPT CAN BE CREATED."
  • Line Location: VRECPT+19
Function Call: WRITE
  • Prompt: !,$J("",5)_$J(Z,10)_" "_$E($P(RCZ(Z),U)_$J("",15),1,15)_" "_$J(+$P(RCZ(Z),U,2),"",2)
  • Line Location: VRECPT+20
Function Call: WRITE
  • Prompt: !
  • Line Location: VRECPT+21
Function Call: WRITE
  • Prompt: !!,"This action can only be taken by users that have the RCDPEPP security key.",!
  • Line Location: RECPROC+11
Function Call: WRITE
  • Prompt: !
  • Line Location: RECPROC+30
Function Call: WRITE
  • Prompt: !
  • Line Location: RECPROCQ+3
Routine Call
  • DIC
  • Line Location:
    • NEWREC+25
Routine Call
  • DIE
  • Line Location:
    • DISTADJ+46
    • DISTADJ+47
    • DISTADJ+48
    • DISTADJ+49
    • DISTADJ+52
    • NEWREC+43
    • NEWREC+44
    • NEWREC+46
Routine Call
  • DIE
  • Line Location:
    • NEWREC+41
Routine Call
  • DIR
  • Line Location:
    • DISTADJ+23
    • DISTADJ+44
    • NEWREC+9
    • NEWREC+12
    • NEWREC+13
    • NEWREC+15
    • NEWREC+16
    • NEWREC+30
    • NEWREC+52
    • NEWREC+54
    • VRECPT+22
    • RECPROC+34
    • RECPROCQ+3
Routine Call
  • VALM
  • Line Location:
    • NEWREC+55
    • VRECPT+25
    • VRECPT+26
    • RECPROC1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344 - [#344] Classic Fileman Calls
^RCY(344.1 - [#344.1] Classic Fileman Calls
^RCY(344.4 - [#344.4] Classic Fileman Calls,  GET1^DIQ
^RCY(344.49 - [#344.49] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RC(341.1 - [#341.1] NEWREC+29
^RCY(344 - [#344] NEWREC+9, NEWREC+54, RECPROC+17
^RCY(344.31 - [#344.31] NEWREC+45, NEWREC+46
^RCY(344.4 - [#344.4] DISTADJ+12, NEWREC+6, NEWREC+19, VRECPT+6, RECPROC+16
^RCY(344.49 - [#344.49] DISTADJ+11, DISTADJ+13, DISTADJ+14, DISTADJ+15, DISTADJ+19, DISTADJ+28, DISTADJ+32, DISTADJ+37, NEWREC+5, NEWREC+37
, NEWREC+38, NEWREC+39, VRECPT+17
^TMP("RCBATCH_SELECTED" DISTADJ+10
^TMP($J DISTADJ+53
^XUSEC("RCDPEPP" VRECPT+24, RECPROC+10

Label References

Name Line Occurrences
NEWRECQ NEWREC+3, NEWREC+8, NEWREC+13, NEWREC+14, NEWREC+16, NEWREC+30
RECPROC1 RECPROC+27
RECPROCQ RECPROC+24, RECPROC+35
VRECPTQ VRECPT+6, VRECPT+25

Naked Globals

Name Field # of Occurrence
^( VRECPT+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY RECPROC+7~, RECPROC+21
ARRAY( RECPROC+18*, RECPROC+32, RECPROC+36
ARRAY(1 RECPROC+21*, RECPROC+27
CNT RECPROC+7~, RECPROC+15*, RECPROC+18*, RECPROC+21*, RECPROC+24, RECPROC+27, RECPROC+32, RECPROC+35
CT NEWREC+1~, NEWREC+49*, NEWREC+50*
DA DISTADJ+9~, DISTADJ+42~, DISTADJ+43*, DISTADJ+46*, DISTADJ+47*, DISTADJ+48*, DISTADJ+49*, DISTADJ+52*, NEWREC+1~, NEWREC+43*
, NEWREC+44*, NEWREC+46*
DA(1 DISTADJ+16*, DISTADJ+18, DISTADJ+25*, DISTADJ+36, DISTADJ+43*, DISTADJ+46*, DISTADJ+47, DISTADJ+48*, DISTADJ+49*, DISTADJ+52*
DA(2 DISTADJ+16*, DISTADJ+18, DISTADJ+25*, DISTADJ+36, DISTADJ+43*
DD DISTADJ+9~, DISTADJ+20!, DISTADJ+38!
DIC DISTADJ+9~, DISTADJ+18*, DISTADJ+20!, DISTADJ+36*, DISTADJ+38!, NEWREC+1~, NEWREC+25*
DIC("DR" DISTADJ+17*, DISTADJ+18*, DISTADJ+29*, DISTADJ+30*, DISTADJ+32*, DISTADJ+33*
DIC("S" NEWREC+25*
DIC(0 DISTADJ+19*, DISTADJ+37*, NEWREC+25*
DIE DISTADJ+9~, DISTADJ+46*, DISTADJ+47*, DISTADJ+48*, DISTADJ+49*, DISTADJ+52*, NEWREC+1~, NEWREC+43*, NEWREC+44*, NEWREC+46*
DIK DISTADJ+9~, DISTADJ+43*
DIR DISTADJ+9~, DISTADJ+23!, DISTADJ+44!, NEWREC+1~, NEWREC+9!, NEWREC+12!, NEWREC+13!, NEWREC+15!, NEWREC+16!, NEWREC+30!
, NEWREC+52!, NEWREC+54!, VRECPT+3~, VRECPT+22!, RECPROC+7~, RECPROC+24!, RECPROC+35!, RECPROCQ+3!
DIR("A" DISTADJ+23*, DISTADJ+44*, NEWREC+9*, NEWREC+10*, NEWREC+11*, NEWREC+13*, NEWREC+15*, NEWREC+16*, NEWREC+30*, NEWREC+49*
, NEWREC+50*, NEWREC+51*, NEWREC+54*, RECPROC+24*, RECPROC+33*, RECPROC+35*, RECPROCQ+2*
DIR("B" NEWREC+11*, NEWREC+54*
DIR(0 DISTADJ+23*, DISTADJ+44*, NEWREC+9*, NEWREC+11*, NEWREC+13*, NEWREC+15*, NEWREC+16*, NEWREC+30*, NEWREC+49*, NEWREC+54*
, VRECPT+22*, RECPROC+33*, RECPROCQ+2*
DIRUT RECPROC+7~
DLAYGO DISTADJ+9~, DISTADJ+19*, DISTADJ+20!, DISTADJ+37*, DISTADJ+38!
DO DISTADJ+9~, DISTADJ+20!, DISTADJ+38!
DR DISTADJ+9~, DISTADJ+46*, DISTADJ+47*, DISTADJ+48*, DISTADJ+49*, DISTADJ+52*, NEWREC+1~, NEWREC+43*, NEWREC+44*, NEWREC+46*
DROUT RECPROC+7~
DT NEWREC+29
DTOUT RECPROC+7~
DUOUT RECPROC+7~
DUZ VRECPT+24, RECPROC+10
I NEWREC+35~, NEWREC+36*, NEWREC+37*, NEWREC+38, NEWREC+39, RECPROC+7~, RECPROC+32*
LIST RECPROC+7~, RECPROC+31*, RECPROC+32*, RECPROC+33
NONVA DISTADJ+9~, DISTADJ+28*, DISTADJ+32, DISTADJ+52
RCAMT DISTADJ~, DISTADJ+17, DISTADJ+29, DISTADJ+46, DISTADJ+47, DISTADJ+48, DISTADJ+49
RCCOM DISTADJ~, DISTADJ+33, DISTADJ+52
RCDEP NEWREC+1~, NEWREC+20*, NEWREC+27*, NEWREC+28*, NEWREC+29, NEWREC+46
RCDPFXIT RECPROC+7~, RECPROC1+3
RCER NEWREC+1~, NEWREC+32
RCER( NEWREC+50
RCER(0 NEWREC+48
RCFDA NEWREC+35~
RCFDA(344 NEWREC+40*
RCFR DISTADJ~, DISTADJ+11, DISTADJ+15, DISTADJ+16, DISTADJ+19, DISTADJ+43, DISTADJ+46
RCFR0 DISTADJ+8~, DISTADJ+11*, DISTADJ+13, DISTADJ+15*, DISTADJ+30, DISTADJ+46
RCFR1 DISTADJ+8~, DISTADJ+13*, DISTADJ+14, DISTADJ+47
RCFR10 DISTADJ+8~, DISTADJ+14*, DISTADJ+47
RCFRX DISTADJ+8~, DISTADJ+11*, DISTADJ+12
RCHAC NEWREC+1~, NEWREC+18*, NEWREC+19, NEWREC+34
RCOK NEWREC+1~, NEWREC+4*, NEWREC+14, NEWREC+16, VRECPT+3~
RCOK1 NEWREC+22~, NEWREC+23, NEWREC+24*, NEWREC+28*
RCPAYTY NEWREC+1~, NEWREC+19*, NEWREC+21, NEWREC+29, NEWREC+46
RCPTOT NEWREC+35~, NEWREC+36*, NEWREC+39*, NEWREC+40
RCRECTDA NEWREC+1~, NEWREC+55*, RECPROC+27*, RECPROC+36*
RCREF DISTADJ+8~, DISTADJ+12*, DISTADJ+17, DISTADJ+30
>> RCSCR DISTADJ+11, DISTADJ+12, DISTADJ+13, DISTADJ+14, DISTADJ+15, DISTADJ+16, DISTADJ+19, DISTADJ+25, DISTADJ+28, DISTADJ+32
, DISTADJ+37, DISTADJ+43, DISTADJ+46, DISTADJ+48, DISTADJ+49, DISTADJ+52, NEWREC+5, NEWREC+6, NEWREC+14, NEWREC+18
, NEWREC+19, NEWREC+32, NEWREC+37, NEWREC+38, NEWREC+39, NEWREC+43, NEWREC+44, NEWREC+45, NEWREC+46, NEWREC+56*
, VRECPT+6, VRECPT+17, VRECPTQ+1, RECPROC+16, RECPROC+21
>> RCSCR("NOEDIT" NEWREC+3
RCSTOP NEWREC+1~, NEWREC+4*, NEWREC+15*
RCTO DISTADJ~, DISTADJ+11, DISTADJ+15, DISTADJ+25, DISTADJ+37, DISTADJ+48, DISTADJ+52
RCTO0 DISTADJ+8~, DISTADJ+11*, DISTADJ+13, DISTADJ+15*, DISTADJ+17, DISTADJ+28, DISTADJ+48
RCTO1 DISTADJ+8~, DISTADJ+13*, DISTADJ+14, DISTADJ+28, DISTADJ+32, DISTADJ+49
RCTO10 DISTADJ+8~, DISTADJ+14*, DISTADJ+49
RCY DISTADJ+8~, DISTADJ+21*, DISTADJ+22, DISTADJ+39*, DISTADJ+41, DISTADJ+43
RCZ VRECPT+3~
RCZ( VRECPT+17*, VRECPT+20
RCZ("" VRECPT+18
RECEIPT RECPROC+7~, RECPROC+17*, RECPROC+18
RECIEN RECPROC+7~, RECPROC+15*, RECPROC+16*, RECPROC+17, RECPROC+18
RECTDA NEWREC+1~, NEWREC+5*, NEWREC+6*, NEWREC+8, NEWREC+9, NEWREC+29*, NEWREC+30, NEWREC+32, NEWREC+40, NEWREC+43
, NEWREC+44, NEWREC+46, NEWREC+54, NEWREC+55
U DISTADJ+12, DISTADJ+17, DISTADJ+28, DISTADJ+30, DISTADJ+32, DISTADJ+46, DISTADJ+47, DISTADJ+48, DISTADJ+49, NEWREC+5
, NEWREC+6, NEWREC+9, NEWREC+19, NEWREC+38, NEWREC+39, NEWREC+46, NEWREC+54, VRECPT+6, VRECPT+17, VRECPT+20
, RECPROC+17, RECPROC+27, RECPROC+32, RECPROC+36
>> VALMBCK NEWREC+4*, NEWREC+57*, VRECPT+5*, VRECPTQ+1*, RECPROC+9*, RECPROC1+3*
X DISTADJ+9~, DISTADJ+19*, DISTADJ+37*, NEWREC+1~, VRECPT+3~, RECPROC+7~
Y DISTADJ+9~, DISTADJ+21, DISTADJ+39, NEWREC+1~, NEWREC+13, NEWREC+26, NEWREC+27, NEWREC+55, VRECPT+3~, RECPROC+7~
, RECPROC+35, RECPROC+36
Z NEWREC+1~, NEWREC+45*, NEWREC+46, NEWREC+50*, VRECPT+3~, VRECPT+17*, VRECPT+20*
Z0 NEWREC+1~, VRECPT+3~, VRECPT+17*
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