VENKI003 ; ; 16-MAR-2007
;;2.6;PCC+;;NOV 12, 2007
Q:'DIFQR(19707.11) F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
Q Q
;;^UTILITY(U,$J,19707.11,23,5)
;;=9000010.46^1
;;^UTILITY(U,$J,19707.11,24,0)
;;=WCAG RESPONSIBILITY^^1^^1^^^^PT ED - RESPONSIBILITY^M^1^CH^BH
;;^UTILITY(U,$J,19707.11,24,2,0)
;;=^^1^1^3051130^
;;^UTILITY(U,$J,19707.11,24,2,1,0)
;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR RESPONSIBILITY
;;^UTILITY(U,$J,19707.11,24,4)
;;=9000010.16^1^^.02
;;^UTILITY(U,$J,19707.11,24,5)
;;=9000010.46^1
;;^UTILITY(U,$J,19707.11,25,0)
;;=WCAG SCHOOL & VOCATION GOALS^^1^^1^^^^PT ED - SCHOOL & VOCATION GOAL^M^1^CH^BH
;;^UTILITY(U,$J,19707.11,25,2,0)
;;=^^1^1^3051130^
;;^UTILITY(U,$J,19707.11,25,2,1,0)
;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR SCHOOL & VOCATION GOALS
;;^UTILITY(U,$J,19707.11,25,4)
;;=9000010.16^1^^.02
;;^UTILITY(U,$J,19707.11,25,5)
;;=9000010.46^1
;;^UTILITY(U,$J,19707.11,26,0)
;;=WCAG SUBSTANCE USE & ABUSE^^1^^1^^^^PT ED - SUBSTANCE USE & ABUSE^M^1^CH^AOD
;;^UTILITY(U,$J,19707.11,26,2,0)
;;=^^1^1^3051130^
;;^UTILITY(U,$J,19707.11,26,2,1,0)
;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR SUBSTANCE USE & ABUSE
;;^UTILITY(U,$J,19707.11,26,4)
;;=9000010.16^1^^.02
;;^UTILITY(U,$J,19707.11,26,5)
;;=9000010.46^1
;;^UTILITY(U,$J,19707.11,27,0)
;;=WCEX AGE-SPECIFIC EXAMS^^1^^1^^^^AGE-SPECIFIC EXAMS^M^4
;;^UTILITY(U,$J,19707.11,27,2,0)
;;=^^1^1^3051226^^^^
;;^UTILITY(U,$J,19707.11,27,2,1,0)
;;=NATL. STANDARDS FOR AGE-SPECIFC PHISICAL EXAMS
;;^UTILITY(U,$J,19707.11,27,4)
;;=9000010.46^6^^.02
;;^UTILITY(U,$J,19707.11,28,0)
;;=WCEX GENERAL HEALTH SCREEN^^1^^1^^^^GENERAL HEALTH SCREEN^M^8
;;^UTILITY(U,$J,19707.11,28,2,0)
;;=^^1^1^3051227^^
;;^UTILITY(U,$J,19707.11,28,2,1,0)
;;=NATL. STANDARDS FOR GENERAL HEALTH SCREEN
;;^UTILITY(U,$J,19707.11,28,4)
;;=9000010.46^8^^.02
;;^UTILITY(U,$J,19707.11,29,0)
;;=WCEX SPECIAL RISK SCREEN^^1^^1^^^^SPECIAL RISK SCREEN^M^3
;;^UTILITY(U,$J,19707.11,29,2,0)
;;=^^1^1^3051226^^
;;^UTILITY(U,$J,19707.11,29,2,1,0)
;;=NATL. STANDARDS FOR SPECIAL RISK SCREEN
;;^UTILITY(U,$J,19707.11,29,4)
;;=9000010.46^4^^.02
;;^UTILITY(U,$J,19707.11,30,0)
;;=WCEX BEHAVIORAL HEALTH SCREEN^^1^^1^^^^BEHAVIORAL HEALTH SCREEN^M^7
;;^UTILITY(U,$J,19707.11,30,2,0)
;;=^^1^1^3051227^^^^
;;^UTILITY(U,$J,19707.11,30,2,1,0)
;;=NATL. STANDARDS FOR BEHAVIORAL HEALTH SCREEN
;;^UTILITY(U,$J,19707.11,30,4)
;;=9000010.46^7^^.02
;;^UTILITY(U,$J,19707.11,31,0)
;;=WCAG PRIMARY TOOTH CARE^^1^^1^^^^PT ED - PRIMARY TOOTH CARE^M^1^CH^ECC
;;^UTILITY(U,$J,19707.11,33,0)
;;=WCAG MENTAL HEALTH^^1^^1^^^^PT ED - MENTAL HEALTH^M
;;^UTILITY(U,$J,19707.11,33,2,0)
;;=^^1^1^3051130^
;;^UTILITY(U,$J,19707.11,33,2,1,0)
;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR MENTAL HEALTH
;;^UTILITY(U,$J,19707.11,34,0)
;;=WCDA DEVEL FINE MOTOR^^^1^1^^^^FINE MOTOR (% at this age)^M^2
;;^UTILITY(U,$J,19707.11,34,2,0)
;;=^^2^2^3051215^
;;^UTILITY(U,$J,19707.11,34,2,1,0)
;;=This table shows fine motor developmental milestones and the
;;^UTILITY(U,$J,19707.11,34,2,2,0)
;;=expected % of achievement at this age
;;^UTILITY(U,$J,19707.11,35,0)
;;=WCDA DEVEL GROSS MOTOR^^^1^1^^^^GROSS MOTOR (% at this age)^M^2
;;^UTILITY(U,$J,19707.11,35,2,0)
;;=^^2^2^3051215^
;;^UTILITY(U,$J,19707.11,35,2,1,0)
;;=This table shows gross motor developmental milestones and the
;;^UTILITY(U,$J,19707.11,35,2,2,0)
;;= expected % of achievement at this age.
;;^UTILITY(U,$J,19707.11,36,0)
;;=WCDA DEVEL LANGUAGE^^^1^1^^^^LANGUAGE (% at this age)^M^2
;;^UTILITY(U,$J,19707.11,36,2,0)
;;=^^2^2^3051215^
;;^UTILITY(U,$J,19707.11,36,2,1,0)
;;=This table shows language developmental milestones and the
;;^UTILITY(U,$J,19707.11,36,2,2,0)
;;=expected % of achievement at this age.
;;^UTILITY(U,$J,19707.11,37,0)
;;=WCDA DEVEL SOCIAL^^^1^1^^^^SOCIAL (% at this age)^M^2
;;^UTILITY(U,$J,19707.11,37,2,0)
;;=^^2^2^3051215^
;;^UTILITY(U,$J,19707.11,37,2,1,0)
;;=This table shows social developmental milestones and the
;;^UTILITY(U,$J,19707.11,37,2,2,0)
;;=expected % of achievement at this age.
;;^UTILITY(U,$J,19707.11,38,0)
;;=WCDA DEVEL PROBLEM SOLVING^^^1^1^^^^PROBLEM SOLVING (% at this age)^M^2
;;^UTILITY(U,$J,19707.11,38,2,0)
;;=^^2^2^3051215^
;;^UTILITY(U,$J,19707.11,38,2,1,0)
;;=This table shows problem solving developmental milestones and the
;;^UTILITY(U,$J,19707.11,38,2,2,0)
;;=expected % of achievement at this age.
VENKI003 ; ; 16-MAR-2007
+1 ;;2.6;PCC+;;NOV 12, 2007
+2 IF 'DIFQR(19707.11)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
IF X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
IF $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
IF $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,19707.11,23,5)
+2 ;;=9000010.46^1
+3 ;;^UTILITY(U,$J,19707.11,24,0)
+4 ;;=WCAG RESPONSIBILITY^^1^^1^^^^PT ED - RESPONSIBILITY^M^1^CH^BH
+5 ;;^UTILITY(U,$J,19707.11,24,2,0)
+6 ;;=^^1^1^3051130^
+7 ;;^UTILITY(U,$J,19707.11,24,2,1,0)
+8 ;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR RESPONSIBILITY
+9 ;;^UTILITY(U,$J,19707.11,24,4)
+10 ;;=9000010.16^1^^.02
+11 ;;^UTILITY(U,$J,19707.11,24,5)
+12 ;;=9000010.46^1
+13 ;;^UTILITY(U,$J,19707.11,25,0)
+14 ;;=WCAG SCHOOL & VOCATION GOALS^^1^^1^^^^PT ED - SCHOOL & VOCATION GOAL^M^1^CH^BH
+15 ;;^UTILITY(U,$J,19707.11,25,2,0)
+16 ;;=^^1^1^3051130^
+17 ;;^UTILITY(U,$J,19707.11,25,2,1,0)
+18 ;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR SCHOOL & VOCATION GOALS
+19 ;;^UTILITY(U,$J,19707.11,25,4)
+20 ;;=9000010.16^1^^.02
+21 ;;^UTILITY(U,$J,19707.11,25,5)
+22 ;;=9000010.46^1
+23 ;;^UTILITY(U,$J,19707.11,26,0)
+24 ;;=WCAG SUBSTANCE USE & ABUSE^^1^^1^^^^PT ED - SUBSTANCE USE & ABUSE^M^1^CH^AOD
+25 ;;^UTILITY(U,$J,19707.11,26,2,0)
+26 ;;=^^1^1^3051130^
+27 ;;^UTILITY(U,$J,19707.11,26,2,1,0)
+28 ;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR SUBSTANCE USE & ABUSE
+29 ;;^UTILITY(U,$J,19707.11,26,4)
+30 ;;=9000010.16^1^^.02
+31 ;;^UTILITY(U,$J,19707.11,26,5)
+32 ;;=9000010.46^1
+33 ;;^UTILITY(U,$J,19707.11,27,0)
+34 ;;=WCEX AGE-SPECIFIC EXAMS^^1^^1^^^^AGE-SPECIFIC EXAMS^M^4
+35 ;;^UTILITY(U,$J,19707.11,27,2,0)
+36 ;;=^^1^1^3051226^^^^
+37 ;;^UTILITY(U,$J,19707.11,27,2,1,0)
+38 ;;=NATL. STANDARDS FOR AGE-SPECIFC PHISICAL EXAMS
+39 ;;^UTILITY(U,$J,19707.11,27,4)
+40 ;;=9000010.46^6^^.02
+41 ;;^UTILITY(U,$J,19707.11,28,0)
+42 ;;=WCEX GENERAL HEALTH SCREEN^^1^^1^^^^GENERAL HEALTH SCREEN^M^8
+43 ;;^UTILITY(U,$J,19707.11,28,2,0)
+44 ;;=^^1^1^3051227^^
+45 ;;^UTILITY(U,$J,19707.11,28,2,1,0)
+46 ;;=NATL. STANDARDS FOR GENERAL HEALTH SCREEN
+47 ;;^UTILITY(U,$J,19707.11,28,4)
+48 ;;=9000010.46^8^^.02
+49 ;;^UTILITY(U,$J,19707.11,29,0)
+50 ;;=WCEX SPECIAL RISK SCREEN^^1^^1^^^^SPECIAL RISK SCREEN^M^3
+51 ;;^UTILITY(U,$J,19707.11,29,2,0)
+52 ;;=^^1^1^3051226^^
+53 ;;^UTILITY(U,$J,19707.11,29,2,1,0)
+54 ;;=NATL. STANDARDS FOR SPECIAL RISK SCREEN
+55 ;;^UTILITY(U,$J,19707.11,29,4)
+56 ;;=9000010.46^4^^.02
+57 ;;^UTILITY(U,$J,19707.11,30,0)
+58 ;;=WCEX BEHAVIORAL HEALTH SCREEN^^1^^1^^^^BEHAVIORAL HEALTH SCREEN^M^7
+59 ;;^UTILITY(U,$J,19707.11,30,2,0)
+60 ;;=^^1^1^3051227^^^^
+61 ;;^UTILITY(U,$J,19707.11,30,2,1,0)
+62 ;;=NATL. STANDARDS FOR BEHAVIORAL HEALTH SCREEN
+63 ;;^UTILITY(U,$J,19707.11,30,4)
+64 ;;=9000010.46^7^^.02
+65 ;;^UTILITY(U,$J,19707.11,31,0)
+66 ;;=WCAG PRIMARY TOOTH CARE^^1^^1^^^^PT ED - PRIMARY TOOTH CARE^M^1^CH^ECC
+67 ;;^UTILITY(U,$J,19707.11,33,0)
+68 ;;=WCAG MENTAL HEALTH^^1^^1^^^^PT ED - MENTAL HEALTH^M
+69 ;;^UTILITY(U,$J,19707.11,33,2,0)
+70 ;;=^^1^1^3051130^
+71 ;;^UTILITY(U,$J,19707.11,33,2,1,0)
+72 ;;=NATL. ANTICIPETORY GUIDANCE STANDARDS FOR MENTAL HEALTH
+73 ;;^UTILITY(U,$J,19707.11,34,0)
+74 ;;=WCDA DEVEL FINE MOTOR^^^1^1^^^^FINE MOTOR (% at this age)^M^2
+75 ;;^UTILITY(U,$J,19707.11,34,2,0)
+76 ;;=^^2^2^3051215^
+77 ;;^UTILITY(U,$J,19707.11,34,2,1,0)
+78 ;;=This table shows fine motor developmental milestones and the
+79 ;;^UTILITY(U,$J,19707.11,34,2,2,0)
+80 ;;=expected % of achievement at this age
+81 ;;^UTILITY(U,$J,19707.11,35,0)
+82 ;;=WCDA DEVEL GROSS MOTOR^^^1^1^^^^GROSS MOTOR (% at this age)^M^2
+83 ;;^UTILITY(U,$J,19707.11,35,2,0)
+84 ;;=^^2^2^3051215^
+85 ;;^UTILITY(U,$J,19707.11,35,2,1,0)
+86 ;;=This table shows gross motor developmental milestones and the
+87 ;;^UTILITY(U,$J,19707.11,35,2,2,0)
+88 ;;= expected % of achievement at this age.
+89 ;;^UTILITY(U,$J,19707.11,36,0)
+90 ;;=WCDA DEVEL LANGUAGE^^^1^1^^^^LANGUAGE (% at this age)^M^2
+91 ;;^UTILITY(U,$J,19707.11,36,2,0)
+92 ;;=^^2^2^3051215^
+93 ;;^UTILITY(U,$J,19707.11,36,2,1,0)
+94 ;;=This table shows language developmental milestones and the
+95 ;;^UTILITY(U,$J,19707.11,36,2,2,0)
+96 ;;=expected % of achievement at this age.
+97 ;;^UTILITY(U,$J,19707.11,37,0)
+98 ;;=WCDA DEVEL SOCIAL^^^1^1^^^^SOCIAL (% at this age)^M^2
+99 ;;^UTILITY(U,$J,19707.11,37,2,0)
+100 ;;=^^2^2^3051215^
+101 ;;^UTILITY(U,$J,19707.11,37,2,1,0)
+102 ;;=This table shows social developmental milestones and the
+103 ;;^UTILITY(U,$J,19707.11,37,2,2,0)
+104 ;;=expected % of achievement at this age.
+105 ;;^UTILITY(U,$J,19707.11,38,0)
+106 ;;=WCDA DEVEL PROBLEM SOLVING^^^1^1^^^^PROBLEM SOLVING (% at this age)^M^2
+107 ;;^UTILITY(U,$J,19707.11,38,2,0)
+108 ;;=^^2^2^3051215^
+109 ;;^UTILITY(U,$J,19707.11,38,2,1,0)
+110 ;;=This table shows problem solving developmental milestones and the
+111 ;;^UTILITY(U,$J,19707.11,38,2,2,0)
+112 ;;=expected % of achievement at this age.