Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPEWL8

Package: Accounts Receivable

Routine: RCDPEWL8


Information

RCDPEWL8 ;ALB/TMK/PJH - EDI LOCKBOX WORKLIST ERA LEVEL ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPEWL8.m>

Entry Points

Name Comments DBIA/ICR reference
FILESP ; Action that files the split lines
; Assumes RCDIR,RCLINE,RCSCR,RCSPLIT array defined
SELBAT(RCERA,RCQUIT) ; Select a batch
; If batch is selected, global ^TMP("RCBATCH_SELECTED",$J) is set =
; batch ien selected
; RCQUIT = 1 if selection not made
; prca*4.5*298 per requirements, keep code for creating/maintaining batches but remove from execution
SORT ; Select a new sort for the list of ERAs
ORD(RCS) ; Select an order for the sorted field code in RCS
; Kill RCS if nothing selected, passed by reference
; Returns '-' if reverse order selected
ORDQ
BATDSP ; Ask Display/Hide batch info on ERA list screen
; prca*4.5*298 per requirements, keep code for creating/maintaining batches but remove from execution
HASADJ(RCSCR,RCOK) ; Function=1 if WL entry has any adj not yet distributed
; RCSCR = ien of entry in file 344.49
; RCOK = if passed by reference, returns 1 if ANY postable lines exist
VERIF ;EP - Protocol action - RCDPE EOB WORKLIST VERIFY
; Entrypoint to verification options
VERIFQ
BATED ; Entry point to batch edit options
; prca*4.5*298 per requirements, keep code for creating/maintaining batches but remove from execution
BATEDQ
AUTOPOST(SOURCE) ;EP Protocol action - RCDPE EOB WORKLIST MARK FOR AUTO POST
; Input:
; SOURCE
; 1:Called by Worklist (RCDPE WORKLIST ERA MARK FOR AUTO POST)
; 2:Called by Scratchpad (RCDPE WORKLIST EOB MARK FOR AUTO POST)
; If SOURCE=2, RCSCR will be set to the IEN of 344.4
AUTOPSTQ ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FILESP+11
Function Call: WRITE
  • Prompt: !
  • Line Location: SELBAT+11
Function Call: WRITE
  • Prompt: !
  • Line Location: SELBAT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: SELBAT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: SORT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SORT+23
Function Call: WRITE
  • Prompt: !
  • Line Location: BATDSP+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: VERIF+9
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: VERIF+12
Function Call: WRITE
  • Prompt: !,"VERIFY EEOBs:",!,?10,"1",$J("",5),"MANUALLY MARK AS VERIFIED",!,?10,"2",$J("",5),"REPORT OF UNVERIFIED WITH DISCREPANCIES",!,?10,"3",$J("",5),"QUIT AND RETURN TO WORKLIST"
  • Line Location: VERIF+15
Function Call: WRITE
  • Prompt: !
  • Line Location: VERIF+17
Function Call: WRITE
  • Prompt: !!
  • Line Location: VERIF+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: VERIF+22
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: BATED+6
Function Call: WRITE
  • Prompt: !,"***** THERE ARE CURRENTLY NO BATCHES DEFINED FOR THIS ERA *****",!
  • Line Location: BATED+8
Function Call: WRITE
  • Prompt: !,"EDITING BATCH #"_+^TMP("RCBATCH_SELECTED",$J)
  • Line Location: BATED+10
Function Call: WRITE
  • Prompt: !
  • Line Location: BATED+14
Function Call: WRITE
  • Prompt: !,"BATCH MAINTENANCE:",!,?10,"1",$J("",5),"EDIT BATCH",!,?10,"2",$J("",5),"NEW BATCH ASSIGNMENT",!,?10,"3",$J("",5),"MARK ALL READY TO POST",!,?10,"4",$J("",5),"BATCH SUMMARY REPORT",!,?10,"5",$J("",5),"QUIT AND RETURN TO WORKLIST"
  • Line Location: BATED+16
Function Call: WRITE
  • Prompt: !
  • Line Location: BATED+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: BATED+21
Function Call: WRITE
  • Prompt: !
  • Line Location: BATED+23
Function Call: WRITE
  • Prompt: !!
  • Line Location: BATED+30
Function Call: WRITE
  • Prompt: !!
  • Line Location: BATED+32
Function Call: WRITE
  • Prompt: !!
  • Line Location: BATED+34
Function Call: WRITE
  • Prompt: !!,"This action can only be taken by users that have the RCDPEPP security key.",!
  • Line Location: AUTOPOST+9
Function Call: WRITE
  • Prompt: !,"ERA has been successfully Marked as an Auto-Post CANDIDATE"
  • Line Location: AUTOPOST+24
Function Call: WRITE
  • Prompt: !,"ERA was NOT Marked as an Auto-Post CANDIDATE - ",$P(AUTOPOST,U,2)
  • Line Location: AUTOPOST+27

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call