STANDARD DATA DICTIONARY #771.9 -- HL7 DEGREE FILE 3/24/25 PAGE 1 STORED IN ^HL(771.9, (67 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.6) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- A list of educational degrees as specified in the HL7 standard, user-defined DEGREE table 0360. IDENTIFIED BY: ABBREVIATION (#2)[R] POINTED TO BY: CURRENT DEGREE LEVEL field (#12.1) of the NEW PERSON File (#200) CROSS REFERENCED BY: USING APPLICATION ACRONYM(AC), NAME(B), ABBREVIATION(D) 771.9,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>70!($L(X)<3)!'(X'?1P.E) X LAST EDITED: MAY 16, 2003 HELP-PROMPT: The HL7 educational degree (e.g., ASSOCIATE OF ARTS). Answer must be 3-70 characters in length DESCRIPTION: The HL7 educational degree (e.g., ASSOCIATE OF ARTS) CROSS-REFERENCE: 771.9^B 1)= S ^HL(771.9,"B",$E(X,1,70),DA)="" 2)= K ^HL(771.9,"B",$E(X,1,70),DA) 771.9,2 ABBREVIATION 0;2 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>10!($L(X)<2)!'(X'?1P.E) X LAST EDITED: MAY 16, 2003 HELP-PROMPT: The HL7 educational degree abbreviated value (e.g. AA or PharmD, etc.). Answer must be 2-10 characters in length DESCRIPTION: The HL7 educational degree abbreviated value (e.g. AA or PharmD, etc.) CROSS-REFERENCE: 771.9^D 1)= S ^HL(771.9,"D",$E(X,1,30),DA)="" 2)= K ^HL(771.9,"D",$E(X,1,30),DA) 771.9,3 VERSION V;0 POINTER Multiple #771.93 771.93,.01 VERSION 0;1 POINTER TO HL7 VERSION FILE (#771.5) LAST EDITED: APR 04, 2003 HELP-PROMPT: The versions of the standard that support this DEGREE value. DESCRIPTION: The versions of the standard that support this DEGREE value. CROSS-REFERENCE: 771.93^B 1)= S ^HL(771.9,DA(1),"V","B",$E(X,1,30),DA)="" 2)= K ^HL(771.9,DA(1),"V","B",$E(X,1,30),DA) 771.9,50 HL7 STANDARD ; COMPUTED MUMPS CODE: X ^DD(771.9,50,9.5) S X=$S(Y(771.9,50,2):Y(771.9,50,3),Y(771.9,50,4):X) 9.2 = F D=0:0 S (D,D1)=$O(^HL(771.9,D0,"V","B",DICOB,D)) Q:D'>0 I $D(^HL(771.9,D0,"V",D,0))#2 S X= $P(^(0),U) S:$D(^HL(771.5,+X,0)) X=$P(^(0),U) S:X'?." " Y(771.9,50,1)=Y(771.9,50,1)+1 Q:'$D(D) S D =D1 9.3 = S I(1)="""V""",J(1)=771.93 N DICOB S DICOB="" F S DICOB=$O(^HL(771.9,D0,"V","B",DICOB)) Q:DI COB="" X ^DD(771.9,50,9.2) Q:'$D(D) 9.4 = S Y(771.9,50,9.1,81)=$G(D1) X ^DD(771.9,50,9.3):D0>0 S X="" S D1=Y(771.9,50,9.1,81) 9.5 = S Y(771.9,50,1)="" X ^DD(771.9,50,9.4) S X=+Y(771.9,50,1)>0,Y(771.9,50,2)=$G(X) S X="YES",Y(7 71.9,50,3)=$G(X) S X=1,Y(771.9,50,4)=$G(X) S X="NO" ALGORITHM: $S(COUNT(VERSION)>0:"YES",1:"NO") LAST EDITED: MAY 14, 2003 TECHNICAL DESCR: Entries that originate from the HL7 standard, user-defined DEGREE table 0360, will have a version number in the VERSION field and consequently will have a value of "YES" in this field. Local entries not part of the HL7 standard will not have a version number in the VERSION field and consequently will have a value of "NO" in this field. 771.9,51 USING APPLICATION 51;0 Multiple #771.9051 LAST EDITED: MAY 15, 2003 DESCRIPTION: The application that has specific use for this HL7 DEGREE VALUE. TECHNICAL DESCR: Applications that have a need to select a subset of the HL7 DEGREE file can identify this entry as part of their subset. 771.9051,.01 USING APPLICATION ACRONYM 0;1 FREE TEXT (Required) (Multiply asked) INPUT TRANSFORM: K:$L(X)>6!($L(X)<2) X LAST EDITED: MAY 16, 2003 HELP-PROMPT: The acronym of the using application that has specific interest on this HL7 DEGREE VALUE (e.g., OAA, etc.). Answer must be 2-6 characters in length. DESCRIPTION: The acronym of the using application that has specific interest on this HL7 DEGREE VALUE (e.g., OAA, etc.) CROSS-REFERENCE: 771.9051^B 1)= S ^HL(771.9,DA(1),51,"B",$E(X,1,30),DA)="" 2)= K ^HL(771.9,DA(1),51,"B",$E(X,1,30),DA) CROSS-REFERENCE: 771.9^AC 1)= S ^HL(771.9,"AC",$E(X,1,30),DA(1),DA)="" 2)= K ^HL(771.9,"AC",$E(X,1,30),DA(1),DA) 771.9051,2 USING APPLICATION NAME 0;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>50!($L(X)<3) X LAST EDITED: MAY 15, 2003 HELP-PROMPT: The name of the using application that has specific interest on this HL7 Answer must be 3-50 characters in length FILES POINTED TO FIELDS HL7 VERSION (#771.5) VERSION:VERSION (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):