Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields
Print Page as PDF
Global: ^IBA(355.82

Package: Integrated Billing

Global: ^IBA(355.82


Information

FileMan FileNo FileMan Filename Package
355.82 SPONSOR PERSON Integrated Billing

Description

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Integrated Billing 1 IBCNSU41    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Integrated Billing 1 SPONSOR(#355.8)[.01]    

Fields, Total: 3

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  FEB 21, 1997
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field is used to contain the name of the non-patient sponsor.
  • DELETE TEST:  1,0)= I 1 W *7,!,"Deletion of Sponsor Persons is not allowed."
  • CROSS-REFERENCE:  355.82^B
    1)= S ^IBA(355.82,"B",$E(X,1,30),DA)=""
    2)= K ^IBA(355.82,"B",$E(X,1,30),DA)
.02 DATE OF BIRTH 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 18, 1997
  • DESCRIPTION:  
    This field contains the sponsor's date of birth. This date may be used to print on claim forms submitted to the Tricare fiscal intermediary.
.03 SOCIAL SECURITY NUMBER 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<9) X I $D(X) S X=$TR(X,"-","")
  • OUTPUT TRANSFORM:  S Y=$E(Y,1,3)_"-"_$E(Y,4,5)_"-"_$E(Y,6,9)
  • LAST EDITED:  MAY 06, 1997
  • HELP-PROMPT:  Answer must be 9-13 characters in length.
  • DESCRIPTION:  
    This field contains the sponsor's social security number. This field may be used to print on claim forms submitted to the Tricare fiscal intermediary.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  355.82^C^MUMPS
    1)= S ^IBA(355.82,"C",$E($TR(X,"-",""),1,30),DA)=""
    2)= K ^IBA(355.82,"C",$E($TR(X,"-",""),1,30),DA)
    This regular cross-reference is used to perform a look-up on an existing sponsor person, based on the social security number. The dashes are stripped of the SSN in the event that they are stored in the file.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields