RCCPCPS ;WASH-ISC@ALTOONA,PA/NYB - Build Patient Statement File ;12/19/96 4:14 PM
Source file <RCCPCPS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;4.5;Accounts Receivable;**34,70,80,48,104,116,149,170,181,190,223,237,219,265,301,348,397,401**;Mar 20,1995;Build 28
|
|
| EN | ||
| OSTM | ;Process old statements ;PRCA*4.5*401
|
|
| STATMNT | ;Print oversized patient statements to local printer
|
|
| NO | ;If there is no activity
|
|
| BUILD | ;This is the entry point from the BUILD CCPC file option
|
|
| TIME | ||
| RCDESC | ;Remove "IN PART" & "IN FULL" from the the bill description
|
|
| RCCPOSST | ; ;PRCA*4.5*401 Sends external email to Mail group to notify there are statements to print
|
|
| FILEOSFG(RCDEBTDA,RCFT) | ; ;PRCA*4.5*401 Set/Clear LOCAL PRINT flag, in file 340, to:
; Yes, i.e. 1 if RCFT="S" ; No, i.e. 0 if RCFT="C" ; RCDEBTDA = File 340 IEN ; RCFT = Filing Type (S Set or C Clear) |
|
| CLRSTMTQ | ;;PRCA*4.5*401 Clear Oversize statement queue
|
|
| FILESTAT(DEB); | ;PRCA*4.5*401 File
; INPUT: DEB - Debtor IEN (file 340) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^RCD(340 - [#340] | Classic Fileman Calls, GET1^DIQ |
| ^RC(342 - [#342] | GET1^DIQ |
| ^RCPS(349.2 - [#349.2] | Classic Fileman Calls |