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 |  Local Variables  | All
Print Page as PDF
Routine: RCDPEWL

Package: Accounts Receivable

Routine: RCDPEWL


Information

RCDPEWL ;ALB/TMK/KML - ELECTRONIC EOB MESSAGE WORKLIST ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPEWL.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
VA FileMan 6 ^DIC  FILE^DICN  ^DIE  ^DIK  $$GET1^DIQ  ^DIR  
Accounts Receivable 5 (PARAMS,PRERA1)^RCDPEWL0  BLD^RCDPEWL1  WL^RCDPEWL7  (ADDLINES,PARAMS)^RCDPEWLA  $$WLH^RCDPEWLZ  
List Manager 4 EN^VALM  (CLEAR,FULL)^VALM1  CLEAN^VALM10  EN^VALM2  
Kernel 1 ($$DT,$$FMTE)^XLFDT  

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

Package Total Caller Graph
Accounts Receivable 12 RCDPEAA3  RCDPEAP  RCDPEWL0  RCDPEWL1  RCDPEWL2  RCDPEWL4  RCDPEWL5  RCDPEWL6  
RCDPEWL7  RCDPEWLB  RCDPEWLP  RCDPEWLZ  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point
DISP(RCERA,RCNOED) ; Entry to worklist from receipt processing
; RCERA = ien of entry in file 344.49
; RCNOED = 1 if receipt exists/no editing allowed
; = 2 if no edit and called from receipt processing
; ; prca*4.5*298 - added AUTOPOST input argument
; AUTOPOST = "" if ERA is non-autopost
; = 0 if auto-posted ERA is in UNPOSTED status
; = 1 if auto-posted ERA is in PARTIAL posted status
; = 2 if auto-posted ERA is in COMPLETE status
DISPQ
INIT ; -- set up initial variables
CV ; Change View Action for EEOB Worklist
ADDREC(RCERA,RCDAT) ; Add a record to file 344.49
; RCERA = ien of file 344.4
; RCDAT = array containing additional data to add to new entry
HDR ; Creates header lines for the selected ERA display
FNL ; -- Clean up list
SEL(RCDA) ; Select entry from worklist scratch pad screen
; RCDA = array returned if selections made
; RCDA(n)=ien of entry(s) in file 344.41
; where n = the line # selected
NOEDIT ; Display no edit allowed if receipt exists
NOBATCH ; Display action not allowed if working at batch level not the ERA level
RECEIPTS(RCSCR) ; get list of receipts for the ERA
; Input: RCSCR: ERA File (#344.4) IEN
; Output: "" - No Receipt / REC# - One Receipt / REC#A-REC#Z - Range of Receipts

External References

Name Field # of Occurrence
^DIC EN+15
FILE^DICN ADDREC+10
^DIE DISP+36, DISP+58
^DIK DISP+68
$$GET1^DIQ HDR+9, HDR+27, RECEIPTS+10
^DIR EN+10, DISP+19, DISP+33, DISP+41, DISP+43, DISP+46, DISP+50, DISP+53, DISP+63, DISP+69
, DISP+82, NOEDIT+4, NOBATCH+4
PARAMS^RCDPEWL0 EN+19
PRERA1^RCDPEWL0 DISP+21
BLD^RCDPEWL1 INIT+7, CV+3
WL^RCDPEWL7 EN+16
ADDLINES^RCDPEWLA DISP+74
PARAMS^RCDPEWLA INIT+6, CV+2
$$WLH^RCDPEWLZ HDR+29
EN^VALM EN+21, DISP+83
CLEAR^VALM1 FNL+2
FULL^VALM1 EN+2, CV+1
CLEAN^VALM10 FNL+2
EN^VALM2 SEL+6
$$DT^XLFDT DISP+57
$$FMTE^XLFDT DISP+45, HDR+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+19
Function Call: WRITE
  • Prompt: !!,"PAYMENT METHOD CODE REPORTED: "_$P(RC0,U,15),!
  • Line Location: DISP+24
Function Call: WRITE
  • Prompt: !!,"NO PAYMENT METHOD CODE REPORTED",!
  • Line Location: DISP+25
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+41
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISP+43
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+46
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+50
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+53
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+63
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+69
Function Call: WRITE
  • Prompt: !!,"Another user is currently editing this entry",!
  • Line Location: DISP+81
Function Call: WRITE
  • Prompt: !!,"Another user is currently editing this entry",!
  • Line Location: DISP+82
Function Call: WRITE
  • Prompt: !
  • Line Location: NOEDIT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: NOEDIT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: NOBATCH+4
Function Call: WRITE
  • Prompt: !
  • Line Location: NOBATCH+4
Routine Call
  • DIC
  • Line Location:
    • EN+15
Routine Call
  • DIE
  • Line Location:
    • DISP+36
    • DISP+58
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • DISP+19
    • DISP+33
    • DISP+41
    • DISP+43
    • DISP+46
    • DISP+50
    • DISP+53
    • DISP+63
    • DISP+69
    • DISP+82
    • NOEDIT+4
    • NOBATCH+4
Routine Call
  • VALM
  • Line Location:
    • EN+21
    • DISP+83

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.31 - [#344.31] GET1^DIQ
^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)
^RCY(344 - [#344] RECEIPTS+7
^RCY(344.31 - [#344.31] HDR+8
^RCY(344.4 - [#344.4] DISP+13, DISP+67, DISP+82, DISPQHDR+4, HDR+5, RECEIPTS+6
^RCY(344.49 - [#344.49] DISP+14, DISP+60
^TMP("RCDPE-EOB_WL" FNL+1!
^TMP("RCDPE-EOB_WLDX" FNL+1!, SEL+7
^TMP($J DISP+75!, INIT+7, CV+3, HDR+34, HDR+36, FNL+1!

Label References

Name Line Occurrences
$$ADDREC DISP+65
$$RECEIPTS HDR+18
DISPQ DISP+14, DISP+77
HDR CV+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY RECEIPTS+4!, RECEIPTS+10
ARRAY( RECEIPTS+8*, RECEIPTS+10*, RECEIPTS+12
ARRAY("" RECEIPTS+12, RECEIPTS+13, RECEIPTS+15
AUTOPSTS HDR+21~, HDR+22*, HDR+23*, HDR+24
CTR RECEIPTS+3~, RECEIPTS+5*
DA EN+1~, DISP+10~, DISP+36*, DISP+55*, DISP+68*
DD ADDREC+4~, ADDREC+10!
DIC EN+1~, EN+14*, DISP+10~, ADDREC+4~, ADDREC+6*, ADDREC+10!
DIC("DR" ADDREC+5*, ADDREC+7*, ADDREC+8*, ADDREC+9*
DIC(0 EN+14*, ADDREC+6*
DIE DISP+10~, DISP+36*, DISP+55*
DIK DISP+10~, DISP+68*
DINUM ADDREC+4~, ADDREC+6*
DIR EN+11!, DISP+10~, DISP+19!, DISP+33!, DISP+41!, DISP+43!, DISP+46!, DISP+50!, DISP+53!, DISP+63!
, DISP+69!, DISP+82!, NOEDIT+1~, NOEDIT+4!, NOBATCH+1~, NOBATCH+4!
DIR("?" EN+6*, EN+7*, DISP+30*
DIR("A" EN+5*, DISP+16*, DISP+17*, DISP+29*, DISP+31*, DISP+38*, DISP+43*, DISP+53*, DISP+63*, DISP+69*
NOEDIT+2*, NOEDIT+3*, NOBATCH+2*, NOBATCH+3*
DIR("B" EN+8*, DISP+39*, DISP+40*, DISP+45*, DISP+53*
DIR(0 EN+4*, DISP+18*, DISP+32*, DISP+38*, DISP+43*, DISP+45*, DISP+49*, DISP+53*, DISP+63*, DISP+69*
, DISP+82*, NOEDIT+2*, NOBATCH+2*
DLAYGO ADDREC+4~, ADDREC+6*
DO ADDREC+4~, ADDREC+10!
DR DISP+10~, DISP+36*, DISP+57*
DTOUT EN+12, DISP+10~, DISP+34, DISP+42, DISP+47, DISP+51
DUOUT EN+12, DISP+10~, DISP+34, DISP+42, DISP+47, DISP+51
DUZ DISP+57
I HDR+1~, HDR+2*
RC HDR+1~, HDR+4*, HDR+6, HDR+7, HDR+9
RC0 DISP+10~, DISP+13*, DISP+24, DISP+25, DISP+26, DISP+28, DISP+40, DISP+45, DISP+53, RECEIPTS+3~
RC4 HDR+1~, HDR+5*, HDR+19, HDR+22, HDR+23
RC5 DISP+10~, DISP+13*, DISP+26, DISP+39, HDR+1~, HDR+4*, HDR+10
RCARC HDR+1~, HDR+28~, HDR+29*, HDR+30
RCDA SEL~, SEL+4!, SEL+7*
RCDA( SEL+7*
RCDAT DISP+10~, DISP+65, ADDREC~
RCDAT("BANK" DISP+52*, ADDREC+9
RCDAT("CHECK#" DISP+44*, DISP+53, DISP+57, ADDREC+7
RCDAT("CHECKDT" DISP+48*, ADDREC+8
RCEEOBPU HDR+1~, HDR+36*, HDR+37
RCERA EN+1~, DISP~, DISP+13, DISP+14, DISP+20*, DISP+21*, DISP+22*, DISP+36, DISP+53, DISP+55
, DISP+60, DISP+65, DISPQ, ADDREC~, ADDREC+6
RCFASTXT EN+1~, FNL+3!
RCNOED EN+1~, DISP~, DISP+12
RCQUIT EN+1~, EN+20, DISP+10~, DISP+13*, DISP+14, DISP+20*, DISP+21*, DISP+22*, DISP+26, DISP+27*
, DISP+28, DISP+34*, DISP+42*, DISP+47*, DISP+51*, DISP+54*, INIT+1~, INIT+3*, INIT+6
RCREV INIT+1~
RCSCR DISP+10~, DISP+21*, DISP+60*, DISP+61, DISP+65*, DISP+66, DISP+67, DISP+68*, DISP+70, DISP+74
, DISP+77, DISP+82*, HDR+3, HDR+4, HDR+5, HDR+8, HDR+18, HDR+27, HDR+29, RECEIPTS~
, RECEIPTS+6, RECEIPTS+10
RCSCR("NOEDIT" DISP+12*, DISP+14, DISP+62, DISP+82, HDR+17
RCSORTBY HDR+1~, HDR+34*, HDR+35
RCUNM DISP+10~, DISP+27*, DISP+28, DISP+36*, DISP+37
RCY ADDREC+4~, ADDREC+5*, ADDREC+11*, ADDREC+12
RECEIPT RECEIPTS+3~, RECEIPTS+5*, RECEIPTS+7*, RECEIPTS+8
STR RECEIPTS+4!, RECEIPTS+5*, RECEIPTS+13*, RECEIPTS+15*, RECEIPTS+16
U DISP+24, DISP+25, DISP+26, DISP+28, DISP+39, DISP+40, DISP+45, DISP+53, HDR+6, HDR+7
HDR+9, HDR+10, HDR+19, HDR+22, HDR+23, SEL+7, RECEIPTS+7
>> VALMBCK CV+4*
>> VALMBG INIT+2*, CV+4*
>> VALMCNT INIT+2*
>> VALMHDR( HDR+2*
>> VALMHDR(1 HDR+6*, HDR+33*
>> VALMHDR(2 HDR+7*, HDR+35*
>> VALMHDR(3 HDR+9*, HDR+10*, HDR+37*
>> VALMHDR(4 HDR+18*, HDR+30*
>> VALMHDR(5 HDR+24*
>> VALMQUIT INIT+6*, HDR+3*
VALMY SEL+5~
VALMY( SEL+7
X EN+1~, DISP+10~, DISP+67*, ADDREC+4~, ADDREC+6*, HDR+1~, NOEDIT+1~, NOBATCH+1~, RECEIPTS+3~, RECEIPTS+5*
, RECEIPTS+6*, RECEIPTS+7
>> XQORNOD(0 SEL+6
Y EN+1~, EN+13, EN+16, DISP+10~, DISP+20, DISP+21, DISP+22, DISP+35, DISP+42, DISP+44
, DISP+48, DISP+52, DISP+54, ADDREC+4~, ADDREC+11, NOEDIT+1~, NOBATCH+1~
Z HDR+1~, HDR+8*, HDR+9, HDR+10
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 |  Local Variables  | All