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

Package Total Caller Graph
Accounts Receivable 15 RCDPE EDI LOCKBOX WORKLIST  RCDPE EOB WORKLIST  RCDPE EOB WORKLIST CHANGE VIEW  RCDPEAA3  RCDPEAP  RCDPEWL0  RCDPEWL1  RCDPEWL2  
RCDPEWL4  RCDPEWL5  RCDPEWL6  RCDPEWL7  RCDPEWLB  RCDPEWLP  RCDPEWLZ  
Kernel 1 ^ORD(101  

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, DISPQ, HDR+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