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 |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^FBAA(161.25

Package: Fee Basis

Global: ^FBAA(161.25


Information

FileMan FileNo FileMan Filename Package
161.25 FEE BASIS VENDOR CORRECTION Fee Basis

Description

Directly Accessed By Routines, Total: 19

Package Total Routines
Fee Basis 19 FBAAAV    FBAACO4    FBAADV    FBAAMPG1    FBAAMPRG    FBAAPV    FBAARMRA    FBAAV0
FBAAV1    FBAAVD    FBAAVD3    FBPST35B    ^FBAA(161.25    FBAAVD2    FBMRASVR    FBPRE35
FBXBIPS    FBXIP39    FISCAL YEAR    

Accessed By FileMan Db Calls, Total: 6

Package Total Routines
Fee Basis 6 FBAAMPG1    FBAAMPRG    FBAAV1    FBAAVD    FBMRASVR    FBPST35B    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Fee Basis 1 FEE BASIS VENDOR(#161.2)[.01]    

Fields, Total: 6

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO FEE BASIS VENDOR FILE (#161.2)
************************REQUIRED FIELD************************
FEE BASIS VENDOR(#161.2)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  MAR 24, 1993
  • DESCRIPTION:  
    Vendor to whom this master record adjustment pertains.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  161.25^B
    1)= S ^FBAA(161.25,"B",$E(X,1,30),DA)=""
    2)= K ^FBAA(161.25,"B",$E(X,1,30),DA)
1 PHARMACY TYPE ACTION 0;2 SET
  • 'N' FOR NEW;
  • 'C' FOR CHANGE;
  • 'D' FOR DELETE;
  • 'R' FOR REINSTATE;
  • 'F' FOR FPDS ONLY CHANGE;

  • LAST EDITED:  AUG 26, 1997
  • DESCRIPTION:  
    For pharmacy type vendors, the type of MRA transaction (ie new, change) is entered here.
  • CROSS-REFERENCE:  161.25^AE^MUMPS
    1)= S:$P(^FBAA(161.25,DA,0),U,5)="" ^FBAA(161.25,"AE","P",DA)=""
    2)= K ^FBAA(161.25,"AE","P",DA)
    This cross-reference is used to determine which vendors need to be transmitted to Austin. It is deleted when data is transmitted.
2 NON PHARMACY TYPE OF CORR 0;3 SET
************************REQUIRED FIELD************************
  • 'N' FOR NEW;
  • 'C' FOR CHANGE;
  • 'D' FOR DELETED;
  • 'R' FOR REINSTATE;
  • 'F' FOR FPDS ONLY CHANGE;

  • LAST EDITED:  AUG 26, 1997
  • DESCRIPTION:  
    For non-pharmacy type vendors, the master record adjustment transaction type (ie new,change) is entered here.
  • CROSS-REFERENCE:  161.25^AC^MUMPS
    1)= S:$P(^FBAA(161.25,DA,0),U,5)="" ^FBAA(161.25,"AE","O",DA)=""
    2)= K ^FBAA(161.25,"AE","O",DA)
    This cross-reference is used to determine which vendors need to be transmitted to Austin. It is deleted when data is transmitted.
3 FEE ONLY INDICATOR 0;4 SET
  • 'Y' FOR YES;

  • LAST EDITED:  MAR 24, 1993
  • DESCRIPTION:  
    If the data to be changed should ONLY affect the Central Fee file and not the CALM file, this field must be set.
4 DATE TRANSMITTED 0;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 24, 1993
  • DESCRIPTION:  
    The date that the last master record adjustment for this vendor was transmitted to Austin.
  • CROSS-REFERENCE:  161.25^AD^MUMPS
    1)= S ^FBAA(161.25,"AD",$E(X,1,30),$S($P(^FBAA(161.25,DA,0),U,2)]"":"P",1:"O"),DA)=""
    2)= K ^FBAA(161.25,"AD",$E(X,1,30),$S($P(^FBAA(161.25,DA,0),U,2)]"":"P",1:"O"),DA)
    This cross-reference is used when exercising the purging of MRA's for a transmitted dated range. It is also used in the retransmit MRA's for a date.
5 LINKED VENDOR 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 1993
  • HELP-PROMPT:  Type a Number between 0 and 99999999999999, 0 Decimal Digits
  • DESCRIPTION:  If the vendor correction is a change, this entry will contain the internal entry number of the vendor the change was originated from. This will allow for reference to the original vendor, if Austin processes the record
    and indicates the two vendors are the same.
  • CROSS-REFERENCE:  161.25^AF
    1)= S ^FBAA(161.25,"AF",$E(X,1,30),DA)=""
    2)= K ^FBAA(161.25,"AF",$E(X,1,30),DA)
    Cross-reference on Linked Vendor field to determine what vendor this change was made from.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5398
  • Fee Basis
  • External References

    Name Field # of Occurrence
    ^%DT 4+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^FBAA(161.25 - [#161.25] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K), 5(XREF 1S), 5(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 4+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K), 5(XREF 1S), 5(XREF 1K)
    >> DINUM .01+1*
    U 1(XREF 1S), 2(XREF 1S), 4(XREF 1S), 4(XREF 1K)
    X .01+1, .01(XREF 1S), .01(XREF 1K), 4+1*!, 4(XREF 1S), 4(XREF 1K), 5+1!, 5(XREF 1S), 5(XREF 1K)
    >> Y 4+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All