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

Package: Accounts Receivable

Routine: RCDPEX


Information

RCDPEX ;ALB/TMK,DWA - ELECTRONIC EOB EXCEPTION PROCESSING - FILE 344.5 ;Jun 06, 2014@19:11:19

Source Information

Source file <RCDPEX.m>

Entry Points

Name Comments DBIA/ICR reference
UPD ; Update (File) ERA msgs manually from EOB exception list for file 344.5
UPDQ
VP ; View/Print ERA Messages - File 344.5
VPOUT ; Entrypoint for queued job
VPQ
SEL(RCDA,ONE) ; Select entry(s) from list
; RCDA = array returned if selections made
; RCDA(n)=ien of bill selected in file 344.5
; ONE = if set to 1, only one selection can be made at a time
DEL ; Delete messages from messages list - file 344.5
DELQ
DELMSG(RCTDA) ; Delete message from temporary message holding file 344.5
TASK(RCRTN,RCTDA) ; Schedule the task to update data base from message
; RCRTN = routine to task
; RCTDA = internal entry of message in file 344.5
LOCK(RCTDA) ; Attempt to lock message file entry RCTDA in file 344.5
; Return 1 if successful, 0 if not able to lock
HDR(RCTDA,RCPG) ;Prints report heading
; RCTDA = ien of file 344.5
; RCPG = page # last printed
ASK(RCSTOP) ; Ask to stop
; RCSTOP: passed by ref, flag to stop processing
TXT0(RCTDA,RCDIQ,RCXM1,RCCT) ; Append 0-node captioned data to array RCXM1
; See above for parameter definitions
TXTDE(RCTDA,RCDIQ,RCNODE,RCXM1,RCCT) ; Append display data to array RCXM1
; See above for parameter definitions
; RCNODE = the WP field # to return
PAYTYP(RCTDA) ;Find pay source - PRCA*4.5*298

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"ERA #",RCDA," is no longer in exception file"
  • Line Location: UPD+11
Function Call: WRITE
  • Prompt: *7,!,"This record has already been scheduled for update. Task # is: ",$P(RC0,U,5)
  • Line Location: UPD+16
Function Call: WRITE
  • Prompt: !,*7,"This message has an invalid 'type' - can't update"
  • Line Location: UPD+20
Function Call: WRITE
  • Prompt: !,"File update has been tasked (#",RCTSK,")"
  • Line Location: UPD+22
Function Call: WRITE
  • Prompt: !,*7,"File update could not be tasked. Please try again later!!!"
  • Line Location: UPD+23
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number"_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: VP+16
Function Call: WRITE
  • Prompt: !,"***TASK STOPPED BY USER***"
  • Line Location: VPOUT+28
Function Call: WRITE
  • Prompt: !,$G(^TMP($J,"RCOUT",Z))
  • Line Location: VPOUT+32
Function Call: WRITE
  • Prompt: !!,"Deletion is not allowed. The ERA has a payment method of ACH."
  • Line Location: DEL+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL+10
Function Call: WRITE
  • Prompt: *7,!,"This message is currently scheduled for update. Task # is: ",$P(RC0,U,11)
  • Line Location: DEL+21
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL+25
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL+25
Function Call: WRITE
  • Prompt: !!,"Nothing deleted"
  • Line Location: DEL+26
Function Call: WRITE
  • Prompt: !,"Message not deleted - problem with delete"
  • Line Location: DEL+35
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL+40
Function Call: WRITE
  • Prompt: !,"A bulletin has been sent to report this deletion",!
  • Line Location: DEL+53
Function Call: WRITE
  • Prompt: !,*7,"Another user is editing this entry ... please try again later"
  • Line Location: LOCK+7
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?15,"EDI LBOX - EEOB EXCEPTIONS - EEOB DETAIL",?55,$$FMTE^XLFDT(DT,2),?70,"Page: ",RCPG,!
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,$G(^(Z))
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","=")
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.5 - [#344.5] Classic Fileman Calls,  GET1^DID,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call