Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^FB(162.92

Package: Fee Basis

Global: ^FB(162.92


Information

FileMan FileNo FileMan Filename Package
162.92 FEE BASIS UNAUTHORIZED CLAIMS STATUS Fee Basis

Description

Directly Accessed By Routines, Total: 16

Package Total Routines
Fee Basis 16 FBUC STATUS BY PATIENT    FBUC STATUS BY VENDOR    FBUCLET0    FBUCMBS    FBUCSTAT    FBUCUTL    FBUCUTL2    FBUCUTL3
FBUCUTL4    FBUCUTL5    FBXIP27    FBXIP32    FBXIP38    ^FB(162.92    ^FB583    ^FBAA(163.98

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Fee Basis 1 FEE BASIS UNAUTHORIZED CLAIMS(#162.7)[24, #162.701(.03)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Fee Basis 1 FEE BASIS LETTER(#161.3)[.05, .06]    

Fields, Total: 9

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 04, 1993
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    The internal entry number of the record in the file.
.01 STATUS 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  OCT 08, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field contains the status of an unauthorized claim.
    UNEDITABLE
  • CROSS-REFERENCE:  162.92^B
    1)= S ^FB(162.92,"B",$E(X,1,30),DA)=""
    2)= K ^FB(162.92,"B",$E(X,1,30),DA)
.02 ACTIVE? 0;2 SET
  • '1' FOR YES;

  • LAST EDITED:  NOV 02, 1992
  • HELP-PROMPT:  Indicate if the status is active.
  • DESCRIPTION:  
    This field indicates if the status is active.
.03 DAYS PRIOR EXPIRATION 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 15, 1993
  • HELP-PROMPT:  Enter the days which constitute a timely claim before proceeding to next status, if appropriate for a given status.
  • DESCRIPTION:  
    If filled in, allowable number of days a claim has before proceeding to the next status.
  • TECHNICAL DESCR:  Expiration date field in file 162.7 is calculated using this date. Claims with a disposition staus of 5 (appeal pending) may vary, since the time period is remainder of year from date dispostitioned or 60 days from date
    statement of the case issued, whichever is greater.
.04 STATUS ORDER 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N)!($D(^FB(162.92,"AO",X))) X
  • LAST EDITED:  MAR 17, 1993
  • HELP-PROMPT:  Type a whole number between 1 and 99. The number represents the sequential order of the status. It must be unique.
  • DESCRIPTION:  
    A whole number which represents the sequential order of the status. Entry must be unique. Software controls status, based on this value.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  162.92^AO
    1)= S ^FB(162.92,"AO",$E(X,1,30),DA)=""
    2)= K ^FB(162.92,"AO",$E(X,1,30),DA)
    Cross-reference is used to determine the IEN of status, as well as existence of previous status order.
.05 LETTER 0;5 POINTER TO FEE BASIS LETTER FILE (#161.3) FEE BASIS LETTER(#161.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 07, 1993
  • HELP-PROMPT:  The letter associated with this status.
  • DESCRIPTION:  
    This field is a pointer to file 161.3, Fee Basis Letter. A letter will be printed if there is an entry in this field. Only unauthorized claim type letters are selectable.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=1"
  • EXPLANATION:  Only unauthorized claim letters are selectable.
  • DELETE TEST:  .05,0)= I 1 W !,"Letters are not deletable."
.06 1725 LETTER 0;6 POINTER TO FEE BASIS LETTER FILE (#161.3) FEE BASIS LETTER(#161.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 21, 2001
  • HELP-PROMPT:  The letter associated with this status for 38 U.S.C. 1725 claims.
  • DESCRIPTION:  
    This field is a pointer to file 161.3, Fee Basis Letter. A letter for a claim being considered under 38 U.S.C. 1725 will be printed if there is an entry in this field. Only unauthorized claim type letters are selectable.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=1"
  • EXPLANATION:  Only unauthorized claim letters are selectable.
  • DELETE TEST:  1,0)= I 1 W !,"Letters are not deletable."
.07 DAYS PRIOR 1725 EXPIRATION 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 09, 2001
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    If filled in, allowable number of days a Mill Bill (38 U.S.C. 1725) claim has before proceeding to the next status.
1 DESCRIPTION 1;0 WORD-PROCESSING #162.921

  • DESCRIPTION:  
    This field contains the detailed description of the status.
  • LAST EDITED:  NOV 02, 1992

Found Entries, Total: 11

STATUS: INCOMPLETE UNAUTHORIZED CLAIM    STATUS: PENDING - REASON UNKNOWN    STATUS: COMPLETE/PENDING REVIEW    STATUS: DISPOSITIONED    STATUS: APPEAL/NOTICE OF DISAGREE RECV    STATUS: APPEAL COMPLETE/PENDING REVIEW    STATUS: APPEAL DISPOSITIONED    STATUS: COVA APPEAL    
STATUS: COVA DISPOSITION    STATUS: APPEAL/ISSUED STATMENT OF CASE    STATUS: INITAL ENTRY    

External References

Name Field # of Occurrence
^DIC .05+1, .06+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FB(162.92 - [#162.92] .01(XREF 1S), .01(XREF 1K), .04+1, .04(XREF 1S), .04(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K)
DIC .05+1!*, .06+1!*
DIC("S" .05+1*, .05SCR+1*, .06+1*, .06SCR+1*
>> DIE .05+1, .06+1
X .001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .03+1!, .04+1!, .04(XREF 1S), .04(XREF 1K), .05+1*!, .06+1*!
, .07+1!
>> Y .05+1, .06+1
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All