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

Package: Accounts Receivable

Routine: RCTCSP2


Information

RCTCSP2 ;ALBANY/BDB - CROSS-SERVICING TRANSMISSION ;03/15/14 3:34 PM

Source Information

Source file <RCTCSP2.m>

Entry Points

Name Comments DBIA/ICR reference
COMPILE ;
RCLLCHK(BILL) ;
RCRPRT ;Reconciliation report
RCRPRTP ;print the - reconciliation report, call to build array of bills returned
RCRPRTH2 ;header for reconciliation report print report 2
AITCMSG ;
USRMSG ;sends mailman message of documents sent to user
THIRD ;sends mailman message to user if no third letter found
THIRDQ
REC3 ;
DATE8(X) ;changes fileman date into 8 digit date yyyymmdd
AMOUNT(X) ;changes amount to zero filled, right justified
BLANK(X) ;returns 'x' blank spaces
RJZF(X,Y) ;right justify zero fill width Y
LJSF(X,Y) ;left justified space filled
LJZF(X,Y) ;x left justified, y zero filled
TAXID(DEBTOR) ;computes TAXID to place on documents
DTFRMTO(PROMPT) ;Get from and to dates (added as per PRCA*4.5*315 to be able to sort by dates for reports)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Report compilation has started with task# ",ZTSK,".",!
  • Line Location: RCRPRT+12
Function Call: WRITE
  • Prompt: $E(DBTRN,1,16)
  • Line Location: RCRPRTP+32
Function Call: WRITE
  • Prompt: !,$E(DBTRN,1,14)
  • Line Location: RCRPRTP+33
Function Call: WRITE
  • Prompt: ?17,$P(B0,U,1),?29,SSN,?35,AMTREF,?44,CORDT,?53,DTRET,!
  • Line Location: RCRPRTP+34
Function Call: WRITE
  • Prompt: U_$P($P(B0,U,1),"-",2)_U_SSN_U_AMTREF_U_CORDT_U_DTRET
  • Line Location: RCRPRTP+35
Function Call: WRITE
  • Prompt: ?6,"NO RETURN REASON CODE",!
  • Line Location: RCRPRTP+39
Function Call: WRITE
  • Prompt: U_$P(^PRCA(430.5,RCRTCD,0),U,2)_U_"AMT NOT COLL"_U_$P(B30,U,4)
  • Line Location: RCRPRTP+47
Function Call: WRITE
  • Prompt: U_"CP"_U_$J($P(B30,U,4),4,2)
  • Line Location: RCRPRTP+48
Function Call: WRITE
  • Prompt: U_$P(^PRCA(430.5,RCRTCD,0),U,2)_" "_$$FMTE^XLFDT($P(B30,U,7),"2Z")
  • Line Location: RCRPRTP+49
Function Call: WRITE
  • Prompt: U_$P(^PRCA(430.5,RCRTCD,0),U,2)_" "_$$FMTE^XLFDT($P(B30,U,6),"2Z")
  • Line Location: RCRPRTP+50
Function Call: WRITE
  • Prompt: U_$S($D(^PRCA(430.5,RCRTCD,0)):$$GET1^DIQ(430.5,RCRTCD,1),1:RCRTCD)
  • Line Location: RCRPRTP+51
Function Call: WRITE
  • Prompt: !
  • Line Location: RCRPRTP+53
Function Call: READ
  • Formatting: !!
  • Prompt: "END OF REPORT...PRESS RETURN TO CONTINUE"
  • Variable: X
  • Timeout: DTIME
  • Line Location: RCRPRTP+56
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RCRPRTP+56
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RCRPRTH2+1
Function Call: WRITE
  • Prompt: "PAGE "_PAGE,?12,"RECONCILIATION REPORT ",?65,$$FMTE^XLFDT(DT,"2Z")
  • Line Location: RCRPRTH2+3
Function Call: WRITE
  • Prompt: "PAGE "_PAGE_U_"RECONCILIATION REPORT "_U_$$FMTE^XLFDT(DT,"2Z")
  • Line Location: RCRPRTH2+10
Function Call: WRITE
  • Prompt: !,"DEBTOR"_U_"BILL #"_U_"PT ID"_U_"AMT REF"_U_"DT RCL"_U_"DT RET"_U_"COMMENT"
  • Line Location: RCRPRTH2+11
Function Call: WRITE
  • Prompt: !,$G(PROMPT)
  • Line Location: DTFRMTO+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DTFRMTO+13

FileMan Files Accessed Via FileMan Db Call

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