STANDARD DATA DICTIONARY #714.5 -- EAS LTC MONTHLY MAX CALCULATIONS FILE 3/24/25 PAGE 1
STORED IN ^EASPFS(714.5, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file stores the data relating to maximum Long Term Care (LTC) copayment calculations. When an HL7 message is received and an
EAS protocol event is invoked the Enrollment Application System will calculate the LTC copayment amounts and store the data
received and calculated in this file. The data is later on extracted and sent back to the requesting application via HL7
messaging.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: LAST DATE(AC), PATIENT NAME(B)
714.5,.01 PATIENT NAME 0;1 POINTER TO PATIENT FILE (#2) (Required)
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the patient for these LTC calculated amounts.
DESCRIPTION: This patient field is used to identify who the calculated LTC amounts stored in this file relate
to.
UNEDITABLE
CROSS-REFERENCE: 714.5^B
1)= S ^EASPFS(714.5,"B",$E(X,1,30),DA)=""
2)= K ^EASPFS(714.5,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^714.5^.09
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^EASPFS(714.5,D0,0)):^(0),1:"") S X=$P(Y(1),U,9),X=X
S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(714.5,.01,1,2,1.4)
1.4)= S DIH=$G(^EASPFS(714.5,DIV(0),0)),DIV=X S $P(^(0),U,9)=DIV,DIH=714.5,DIG=.09 D ^DICR
2)= Q
CREATE VALUE)= NOW
DELETE VALUE)= NO EFFECT
FIELD)= DATE ADDED
714.5,.02 LAST DATE 0;2 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:X<1 X I $G(X),$E($$FMADD^XLFDT(X,1),4,5)=$E(X,4,5) K X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the last day of the month to be calculated.
DESCRIPTION: This is the date these calculated values relate to. The date value must be the last day of the
month for the calculation.
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 714.5^AC
1)= S ^EASPFS(714.5,"AC",$E(X,1,30),DA)=""
2)= K ^EASPFS(714.5,"AC",$E(X,1,30),DA)
714.5,.03 LTC LOS 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1.N) X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the Long Term Care total Length of Stay.
DESCRIPTION: This is the Long Term Care Length of Stay to be used for this calculation. The LOS should exclude
pass days, ASIH days and discharge date.
UNEDITABLE
714.5,.04 LTC EXEMPT 0;4 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter if the patient is exempt from LTC copayment.
DESCRIPTION:
This indicator specifies if the patient is designated as exempt for the specified date.
UNEDITABLE
714.5,.05 EXEMPT REASON 0;5 POINTER TO LTC CO-PAY EXEMPTION FILE (#714.1)
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the reason the patient is exempt.
DESCRIPTION:
This is the reason for the exemption that was specified in the LTC EXEMPT (#.04) field.
UNEDITABLE
714.5,.06 180 DAY MAX CHARGE 0;6 NUMBER
INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0)!(X?.E1"."3.N) X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the 180 day or less max charge.
DESCRIPTION: This is the calculated value that a patient can be charged for the specified month if his stay is
180 days or less.
UNEDITABLE
714.5,.07 GREATER THAN 180 DAY AMOUNT 0;7 NUMBER
INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0)!(X?.E1"."3.N) X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the greater than 180 day max charge.
DESCRIPTION: This is the calculated value that a patient can be charged for the specified month if his stay is
greater than 180 days.
UNEDITABLE
714.5,.08 MAX OUTPATIENT CHARGE 0;8 NUMBER
INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0)!(X?.E1"."3.N) X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the max outpatient LTC copay.
DESCRIPTION: This is the calculated maximum charge the specified patient can be charged for LTC outpatient
services for the month.
UNEDITABLE
714.5,.09 DATE ADDED 0;9 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
LAST EDITED: SEP 08, 2005
HELP-PROMPT: Enter the date this entry was added.
DESCRIPTION:
This field is automatically populated based on the date this entry is added.
WRITE AUTHORITY: ^
UNEDITABLE
NOTES: TRIGGERED by the PATIENT NAME field of the EAS LTC MONTHLY MAX CALCULATIONS File
FILES POINTED TO FIELDS
LTC CO-PAY EXEMPTION (#714.1) EXEMPT REASON (#.05)
PATIENT (#2) PATIENT NAME (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):