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 | Found Entries | All

Print Page as PDF

Global: ^IBE(365.014

Package: Integrated Billing

Global: ^IBE(365.014

Information

FileMan FileNo	FileMan Filename	Package
365.014	X12 271 INSURANCE TYPE	Integrated Billing

Description

This file contains all the corresponding X.12 271 EB04 codes (Insurance Type). Per VHA Directive 10-93-142, this file definition should not be modified.

Accessed By FileMan Db Calls, Total: 1

Pointed To By FileMan Files, Total: 2

Fields, Total: 5

Field #	Name	Loc	Type	Details
.01	CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` `MAXIMUM LENGTH: 30` LAST EDITED: `FEB 13, 2023` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_INSURANCE_TYPE.` CROSS-REFERENCE: `365.014^B` `1)= S ^IBE(365.014,"B",$E(X,1,30),DA)=""` `2)= K ^IBE(365.014,"B",$E(X,1,30),DA)` `Standard "B" cross-reference`
.02	DESCRIPTION	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>90!($L(X)<1) X` `MAXIMUM LENGTH: 90` LAST EDITED: `MAR 13, 2023` HELP-PROMPT: `Answer must be 1-90 characters in length.` DESCRIPTION: `This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_INSURANCE_TYPE.` CROSS-REFERENCE: `^^TRIGGER^365.014^.04` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.014,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.014,.02,1,1,1.4)` `1.4)= S DIH=$G(^IBE(365.014,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.014,DIG=.04 D ^DICR` `2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.014,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.014,.02,1,1,2.4)` `2.4)= S DIH=$G(^IBE(365.014,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.014,DIG=.04 D ^DICR` `CREATE VALUE)= NOW` `DELETE VALUE)= NOW` `FIELD)= DATE LAST EDITED` `Update the 'DATE LAST EDITED' whenever the Description is changed.`
.03	INACTIVE?	0;3	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `JUN 03, 2002` DESCRIPTION: `This field will be marked inactive if a code is determined to no longer be used by X.12.`
.04	DATE LAST EDITED	0;4	DATE	INPUT TRANSFORM: `S %DT="ESTR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 10, 2023` HELP-PROMPT: `Enter the date and time the DESCRIPTION was last edited.` DESCRIPTION: `The date and time that the DESCRIPTION for this entry was last edited.` NOTES: `TRIGGERED by the DESCRIPTION field of the X12 271 INSURANCE TYPE File`
.05	FSC CONTROLLED	0;5	SET (BOOLEAN Data Type)	This field identifies whether or not this file is controlled by FSC. LAST EDITED: `FEB 13, 2023` HELP-PROMPT: `Enter 1 is FSC controlled or 0 if not.` DESCRIPTION: `This field identifies whether or not this file is controlled by FSC.`

Found Entries, Total: 45

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Fields | Found Entries | All