INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:2781001>X X
LAST EDITED: SEP 30, 2011
HELP-PROMPT: Enter a date not earlier than Oct 1, 1978.
DESCRIPTION: This field contains the effective date for the DRGs for a fiscal year. It should normally be the first day of October of the fiscal year. Each year a new entry will be created and the DRG's hierarchy will reside within
this field.
CROSS-REFERENCE: 80.071^B
1)= S ^ICD9(DA(1),3,"B",$E(X,1,30),DA)=""
2)= K ^ICD9(DA(1),3,"B",$E(X,1,30),DA)
^ICD9(IEN1,3,"B",EFF,IEN2) - Where IEN1 is the internal entry number in the ICD fiel #80, EFF is the effective date for the DRG and IEN2 is the internal entry number in the DRG GROUPER multiple where the DRG is stored.