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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCKATP

Package: Accounts Receivable

Routine: RCKATP


Information

RCKATP ;ALB/CPM - ADJUST ACCOUNTS FOR KATRINA VETS ; 28-FEB-06

Source Information

Source file <RCKATP.m>

Entry Points

Name Comments DBIA/ICR reference
POST ; Queue PRCA*4.5*241 post-init job.
EN ; Queued entry point to run the PRCA*4.5*241 post init.
EX ; Entry point to exempt interest/admin charges
CHK(DFN) ; Check to see if vet should have charges cancelled
; Input: DFN -- Pointer to patient in file 2
; Output: 0 -- No, don't cancel charges
; 1 -- Yes, cancel charges
  • ICR #4553
    • Status: Active
    • Usage: Private
    CHKQ
    TPP(RCTI,RCH) ; Identify decreases that are credits for third party payments
    ; Input: RCTI -- Pointer to AR Transaction in file 433
    ; RCH -- Array of 'counted' transactions passed by reference
    ; Output: RCRES -- 1^2, where
    ; 1 = total amount of credit adjustments
    ; 2 = pointer to the affected bill in file #430
  • ICR #4553
    • Status: Active
    • Usage: Private
    TPPQ
    DEC(RCBILL,RCAMT) ; Decrease a bill
    ; Input: RCBILL -- Bill Number of a bill in file 430
    ; RCAMT -- Amount to decrease bill
    ; Output: RCBUCK -- Amount not decreased, to go to bucket
  • ICR #4553
    • Status: Active
    • Usage: Private
    DECQ
    FLAG(DFN) ; Flag veteran as having had copay charges cancelled
    ; Input: DFN -- Pointer to patient in file 2
  • ICR #4553
    • Status: Active
    • Usage: Private
    ADJ(DFN,RCAMT) ; Make final credit adjustments to the vet's account
    ; Input: DFN -- Pointer to patient in file 2
    ; RCAMT -- Amount to decrease from account
  • ICR #4553
    • Status: Active
    • Usage: Private
    BULL ; Send job completion bulletin

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^RCD(340 - [#340] Classic Fileman Calls
    Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call