Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: VEN8I01E

VEN8I01E.m

Go to the documentation of this file.
VEN8I01E ; IHS/OIT/GIS - DIFROM SUPPLIMENT TO KIDS ; 
 ;;2.6;PCC+;**1,3**;APR 03, 2012;Build 24
 Q:'DIFQR(19707.17)  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.17,3137,0)
 ;;=29^Vision (screen if indicated)^^^396^488^^^^^^^13^16
 ;;^UTILITY(U,$J,19707.17,3139,0)
 ;;=27^Feet, gait, walking^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3140,0)
 ;;=27^Early childhood caries or dental injuries^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3141,0)
 ;;=27^Signs of possible abuse/neglect, excessive bruising or injuries^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3142,0)
 ;;=28^Anemia (if not done)^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3143,0)
 ;;=28^Lead (if not done)^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3144,0)
 ;;=28^Autism^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3145,0)
 ;;=29^At risk for TB: PPD^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3146,0)
 ;;=29^Hearing (screen if indicated)^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3147,0)
 ;;=29^Vision (screen if indicated)^^^488^671^^^^^^^16^22
 ;;^UTILITY(U,$J,19707.17,3149,0)
 ;;=27^Early childhood caries or dental injuries^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3150,0)
 ;;=27^Signs of possible abuse/neglect, excessive bruising or injuries^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3151,0)
 ;;=27^Eyes - strabismus^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3152,0)
 ;;=28^Lead^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3153,0)
 ;;=28^Autism^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3154,0)
 ;;=29^At risk for TB: PPD^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3155,0)
 ;;=29^Hearing (screen if indicated)^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3156,0)
 ;;=29^Vision (screen if indicated)^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3157,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^671^915^^^^^^^22^30
 ;;^UTILITY(U,$J,19707.17,3159,0)
 ;;=27^Teeth, caries^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3160,0)
 ;;=27^Excessive injuries or bruising^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3161,0)
 ;;=27^Screening:  Vision, BP^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3162,0)
 ;;=29^At risk for TB: PPD^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3163,0)
 ;;=29^Hearing (screen if indicated)^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3164,0)
 ;;=29^Vision (screen if indicated)^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3165,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3166,0)
 ;;=29^Anemia screen^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3167,0)
 ;;=29^Lead^^^915^1281^^^^^^^30^42
 ;;^UTILITY(U,$J,19707.17,3169,0)
 ;;=27^Gait^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3170,0)
 ;;=27^Teeth, caries^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3171,0)
 ;;=27^Signs of possible abuse/neglect^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3172,0)
 ;;=28^Vision^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3173,0)
 ;;=28^Hearing^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3174,0)
 ;;=28^BP^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3175,0)
 ;;=29^At risk for TB: PPD^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3176,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3177,0)
 ;;=29^Anemia screen^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3178,0)
 ;;=29^Lead ^^^1281^1708^^^^^^^42^56
 ;;^UTILITY(U,$J,19707.17,3180,0)
 ;;=27^Teeth, caries^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3181,0)
 ;;=27^Signs of possible abuse/neglect^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3182,0)
 ;;=28^BP^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3183,0)
 ;;=28^Vision^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3184,0)
 ;;=28^Hearing^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3185,0)
 ;;=28^UA^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3186,0)
 ;;=29^At risk for TB: PPD^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3187,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3188,0)
 ;;=29^Anemia screen^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3189,0)
 ;;=29^Lead ^^^1708^2013^^^^^^^56^66
 ;;^UTILITY(U,$J,19707.17,3191,0)
 ;;=27^Teeth^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3192,0)
 ;;=27^Signs of possible abuse or neglect^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3193,0)
 ;;=28^Vision^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3194,0)
 ;;=28^Hearing^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3195,0)
 ;;=28^BP^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3196,0)
 ;;=29^At risk for TB: PPD^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3197,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3198,0)
 ;;=29^Anemia screen^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3199,0)
 ;;=29^Lead ^^^2013^2745^^^^^^^66^90
 ;;^UTILITY(U,$J,19707.17,3201,0)
 ;;=27^Note early puberty (girls), scoliosis^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3202,0)
 ;;=27^Teeth, caries^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3203,0)
 ;;=27^Abuse or neglect^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3204,0)
 ;;=28^BP^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3205,0)
 ;;=28^Vision^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3206,0)
 ;;=28^Hearing^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3207,0)
 ;;=29^At risk for TB: PPD^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3208,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3209,0)
 ;;=29^Anemia screen^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3210,0)
 ;;=29^Lead^^^2745^3477^^^^^^^90^114
 ;;^UTILITY(U,$J,19707.17,3212,0)
 ;;=27^Tanner Stage^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3213,0)
 ;;=27^Teeth, caries^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3214,0)
 ;;=27^Neglect/abuse^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3215,0)
 ;;=27^Scoliosis screen when females Tanner 2, males Tanner 3-4 ^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3216,0)
 ;;=28^Vision^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3217,0)
 ;;=28^Hearing^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3218,0)
 ;;=28^BP^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3219,0)
 ;;=29^At risk for TB: PPD^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3220,0)
 ;;=29^Family hx of lipid disorder, diabetes, acanthosis: Lipid screen^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3221,0)
 ;;=29^Anemia screen^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3222,0)
 ;;=29^Lead ^^^3477^3843^^^^^^^114^126
 ;;^UTILITY(U,$J,19707.17,3224,0)
 ;;=27^Tanner Stage^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3225,0)
 ;;=27^Scoliosis or kyphosis (Only valid for Tanner 2 girls, Tanner 3-4 males)^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3226,0)
 ;;=27^Evidence of neglect/abuse^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3227,0)
 ;;=27^Eating disorders/obesity^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3228,0)
 ;;=27^Sports injuries^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3229,0)
 ;;=27^Orthopedic problems^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3230,0)
 ;;=27^Teeth (e.g., orthodontia needs, caries)^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3231,0)
 ;;=27^Acne^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3232,0)
 ;;=27^Tattoos^^^3843^4880^^^^^^^126^160
 ;;^UTILITY(U,$J,19707.17,3233,0)
 ;;=27^Piercing^^^3843^4880^^^^^^^126^160