OUTPUT TRANSFORM: Q:'Y S Y=$P(^ACHSDENS($P(^ACHSDEN(DUZ(2),"D",DA,250),U),30,Y,0),U)
LAST EDITED: JUN 20, 2014
HELP-PROMPT: Answer must be 1-3 characters in length.
TECHNICAL DESCR: This is a free-text pointer to a multiple in the CHS DENIAL REASON FILE. The multiple is field 30, Alternate Resource Type. The output transform retrieves the actual value of the pointed-to entry in the CHS
DENIAL REASON FILE.
CROSS-REFERENCE: 9002071.1256^B
1)= S ^ACHSDEN(DA(2),"D",DA(1),256,"B",$E(X,1,30),DA)=""
2)= K ^ACHSDEN(DA(2),"D",DA(1),256,"B",$E(X,1,30),DA)