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
Print Page as PDF
Routine: FBUCSTAT

Package: Fee Basis

Routine: FBUCSTAT


Information

FBUCSTAT ;AISC/DMK-UNAUTHORIZED CLAIM STATS ;6/27/01

Source Information

Source file <FBUCSTAT.m>

Entry Points

Name Comments DBIA/ICR reference
START ;Entry point for tasked job
END
HED
MB
DAT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?14,"UNAUTHORIZED CLAIM DISPOSITION AND STATUS STATISTICS",!?14,$E(Q,1,52),!
  • Line Location: FBUCSTAT+4
Function Call: WRITE
  • Prompt: !?50,"CATEGORY OF DISPOSITION",!?3,"TYPE OF",?31,"# OF",!?3,"DISPOSITION",?31,"CLAIMS",?45,"INITIAL",?57,"APPEAL",?69,"COVA APPEAL",!,Q,!
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !,?3,$P(^(0),"^"),?32,$J(FBD(FBD),5)
  • Line Location: START+18
Function Call: WRITE
  • Prompt: ?$S(FBS=40:45,FBS=70:57,1:69),$J(FBD(FBD,FBS),5)
  • Line Location: START+19
Function Call: WRITE
  • Prompt: !,?32,"-----",?45,"-----",?57,"-----",?69,"-----",!?9,"TOTAL DISPOSITIONED",?32,$J($P(FB,"^"),5),?45,$J($P(FB,"^",2),5),?57,$J($P(FB,"^",3),5),?69,$J($P(FB,"^",4),5)
  • Line Location: START+20
Function Call: WRITE
  • Prompt: !?5,"TOTAL NOT DISPOSITIONED",?32,$J(FBD(99),5),!?32,"-----",!?16,"TOTAL CLAIMS",?32,$J(FB+FBD(99),5)
  • Line Location: START+21
Function Call: WRITE
  • Prompt: !
  • Line Location: START+22
Function Call: WRITE
  • Prompt: !!?3,"STATUS OF CLAIMS NOT DISPOSITIONED",!!?3,"STATUS",?40,"# OF CLAIMS",!
  • Line Location: START+23
Function Call: WRITE
  • Prompt: !
  • Line Location: START+27
Function Call: WRITE
  • Prompt: !!?3,"TOTAL DOLLARS APPROVED BY PSA:",!
  • Line Location: START+28
Function Call: WRITE
  • Prompt: !?3,$P($G(^DIC(4,PSA,0)),"^")
  • Line Location: START+29
Function Call: WRITE
  • Prompt: PSA
  • Condition for execution: PSA="OTHER"
  • Line Location: START+29
Function Call: WRITE
  • Prompt: ?34,X
  • Line Location: START+29
Function Call: WRITE
  • Prompt: !?32,"-------------",!?34,X
  • Line Location: START+30
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $P(IOST,"-")="C"
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !?14,"UNAUTHORIZED CLAIM DISPOSITION AND STATUS STATISTICS",!?14,$E(Q,1,52)
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !?17,$S(FB1725R="M":"for 38 U.S.C. 1725 Claims",1:"excluding 38 U.S.C. 1725 Claims")
  • Line Location: MB+0
Function Call: WRITE
  • Prompt: !?17,"Date Range Selected: ",FBSTART," to ",FBFINISH,!?17,$E(Q,1,41),!
  • Line Location: DAT+0
Info |  Source |  Entry Points |  Interaction Calls