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

Package: Fee Basis

Routine: FBUCUTL


Information

FBUCUTL ;ALBISC/TET - UNAUTHORIZED CLAIMS UTILITY ;12/7/2001

Source Information

Source file <FBUCUTL.m>

Entry Points

Name Comments DBIA/ICR reference
CDTC(X1,X2) ;date comparison
DTC(X1,X2) ;days between two days
VET(X) ;veteran name
VEN(X) ;vendor name
PROG(X) ;fee program name
PTR(FBGL,FBIEN) ;get .01 value of pointer
LOCK(FBGL,FBDA,GO) ;lock entry before editing
  • ICR #5099
    • Status: Retired
    • Usage: Controlled Subscription
    L
    DAYS(X,FB1725) ;number of days associated with a status
    DISAP(DA1,X) ;disapproval reason for disapproved dispositions
    STATUS(X) ;get status internal entry number
    ORDER(X) ;get order number of status
  • ICR #5099
    • Status: Retired
    • Usage: Controlled Subscription
    PAY(X,FBGL) ;determine if any payments have been made
  • ICR #5099
    • Status: Retired
    • Usage: Controlled Subscription
    OVER(KEY) ;determine if ability to override
    UPOK(X) ;ok to update
    TIME(ED) ;determine if expiration date passed
    UNTIME(FBX) ;write untimely message - called from input templates
    FBZ(X) ;get zero node on 162.7
    FILE(FBGL,X,FBDI,FBDA1) ;add entry to file or subfile
    ADD
    PEND(FBDA) ;check if any info pending for claim
    PAYST(FBDA,FBUCP) ; unauthorized claim payment status (released+)
  • ICR #5099
    • Status: Retired
    • Usage: Controlled Subscription

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !?5,"Claim has been dispositioned to DISAPPROVED"
    • Line Location: UNTIME+2
    Function Call: WRITE
    • Prompt: !?8,"with disapproval reason of '",$P($$PTR("^FB(162.94,",FBX),U),"'.",!,*7
    • Condition for execution: +FBX
    • Line Location: UNTIME+2

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    162.03 GET1^DIQ
    162.11 GET1^DIQ
    ^FBAAI - [#162.5] GET1^DIQ
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call