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.015

Package: Integrated Billing

Global: ^IBE(365.015

Information

FileMan FileNo	FileMan Filename	Package
365.015	X12 271 TIME PERIOD QUALIFIER	Integrated Billing

Description

This file contains all the corresponding X.12 271 EB06 codes (Time Period Qualifier). Per VHA Directive 10-93-142, this file definition should not be modified.

Accessed By FileMan Db Calls, Total: 6

Pointed To By FileMan Files, Total: 3

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_TIME_PERIOD.` CROSS-REFERENCE: `365.015^B` `1)= S ^IBE(365.015,"B",$E(X,1,30),DA)=""` `2)= K ^IBE(365.015,"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_TIME_PERIOD.` CROSS-REFERENCE: `^^TRIGGER^365.015^.04` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.015,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.015,.02,1,1,1.4)` `1.4)= S DIH=$G(^IBE(365.015,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.015,DIG=.04 D ^DICR` `2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.015,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.015,.02,1,1,2.4)` `2.4)= S DIH=$G(^IBE(365.015,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.015,DIG=.04 D ^DICR` `CREATE VALUE)= NOW` `DELETE VALUE)= NOW` `FIELD)= DATE LAST EDITED` `Update the 'DATE LAST EDITED' whenever the Description is changed.` CROSS-REFERENCE: `365.015^C^MUMPS` `1)= S ^IBE(365.015,"C",$$UP^XLFSTR($E(X,1,30)),DA)=""` `2)= K ^IBE(365.015,"C",$$UP^XLFSTR($E(X,1,30)),DA)` `This index is used to provide a lookup by description.`
.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 13, 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 TIME PERIOD QUALIFIER File`
.05	FSC CONTROLLED	0;5	SET (BOOLEAN Data Type)	This field identifies whether or not this file is controlled by FSC. LAST EDITED: `MAR 06, 2023` HELP-PROMPT: `Enter 1 if FSC controlled or 0 if not.` DESCRIPTION: `This field identifies whether or not this file is controlled by FSC.`

Found Entries, Total: 19

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