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 |