RCTCSP3 ;ALBANY/BDB-CROSS-SERVICING TRANSMISSION ;03/15/14 3:34 PM
Source file <RCTCSP3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENTER | ;Entry point from the post initialization
|
|
| RCCSTUP | ||
| AA | ||
| DUEPROC | ; called from rctcspd
|
|
| RECDPN | ;
|
|
| COMPILED | ;
|
|
| AITCMSGD | ;
|
|
| USRMSGD | ;sends mailman message of documents sent to user
|
|
| HEADERD | ;
|
|
| TRAILERD | ;
|
|
| DATE8(X) | ;changes fileman date into 8 digit date yyyymmdd
|
|
| AMOUNT(X) | ;changes amount to zero filled, right justified, 14 characters
|
|
| AMOUNT9(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
|
|
| JD() | ; returns today's Julian date YDOY
|
|
| NAMEFF(DFN) | ;returns name for document and name in file
|
|
| ADDR(RCDFN) | ; returns patient file address
|
|
| REJCODE | ;Converts AITC reject codes in reject multiple to pointer to file 348.5
|
|
| REJA |
| FileNo | Call Tags |
|---|---|
| ^DIC(5 - [#5] | GET1^DIQ |
