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

VEN8I01A.m

Go to the documentation of this file. 
  1. VEN8I01A ; IHS/OIT/GIS - DIFROM SUPPLIMENT TO KIDS ; 
  1.  ;;2.6;PCC+;**1,3**;APR 03, 2012;Build 24
  1.  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
  1. Q Q
  1.  ;;^UTILITY(U,$J,19707.17,2897,0)
  1.  ;;=18^Discuss handling negative peer pressure^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2897,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2898,0)
  1.  ;;=18^Continue to build decision-making skills, understand consequences of behavior^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2898,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2899,0)
  1.  ;;=18^Importance of listening and communicating^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2899,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2900,0)
  1.  ;;=24^Respect rights and needs of others^^CHA-BH^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2900,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2901,0)
  1.  ;;=24^Follow family rules (curfew, car)^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2901,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2902,0)
  1.  ;;=24^Share in household chores^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2902,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2903,0)
  1.  ;;=24^Take on new responsibilities^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2903,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2904,0)
  1.  ;;=24^Learn new skills (lifesaving, mentoring)^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2904,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2905,0)
  1.  ;;=24^Discuss taking responsibility for own health and using preventive services^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2905,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2906,0)
  1.  ;;=24^Increased independence and decision making^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2906,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2907,0)
  1.  ;;=25^Be responsible for attendance, homework, course selection^^CHA-BH^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2907,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2908,0)
  1.  ;;=25^Discuss frustrations or thoughts of dropping out^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2908,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2909,0)
  1.  ;;=25^Participate in school activities^^CHA-BH^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2909,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2910,0)
  1.  ;;=25^Identify  and pursue talents and interests^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2910,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2911,0)
  1.  ;;=25^Make plans for after high school^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2911,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2912,0)
  1.  ;;=19^Ask for resources or referrals if needed^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2912,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2913,0)
  1.  ;;=19^Discuss current events^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2913,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2914,0)
  1.  ;;=19^Explore cultural heritage, diversity^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2914,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2915,0)
  1.  ;;=19^Advocate for community programs^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2915,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2916,0)
  1.  ;;=19^Ask about health programs and services in school^^CHA-BH^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2916,2)
  1.  ;;=^^CHA-BH^^^
  1.  ;;^UTILITY(U,$J,19707.17,2917,0)
  1.  ;;=21^Show affection and praise good behavior^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2917,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2918,0)
  1.  ;;=21^Model respect, family values, safe driving practices, healthy behaviors^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2918,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2919,0)
  1.  ;;=21^Respect teen's need for privacy^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2919,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2920,0)
  1.  ;;=21^Establish realistic expectations, clear limits, consequences.^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2920,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2921,0)
  1.  ;;=21^Anticipate challenges to parental authority^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2921,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2922,0)
  1.  ;;=21^Minimize criticism.  Avoid nagging and negative messages^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2922,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2923,0)
  1.  ;;=21^Emphasize importance of school, show interest in school activities^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2923,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2924,0)
  1.  ;;=21^Ask for resources or referrals if needed^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2924,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2925,0)
  1.  ;;=21^Keep guns unloaded and locked up, or remove from home.^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2925,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2926,0)
  1.  ;;=21^Normal development^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2926,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2927,0)
  1.  ;;=21^Signs of emotional/physical disease^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2927,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2928,0)
  1.  ;;=21^Be a healthy  role model^^CHA-PA^4880^6100^^^^^1^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2928,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2929,0)
  1.  ;;=21^Help teens avoid harmful behaviors (drugs, alcohol, tobacco or sex)^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2929,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2930,0)
  1.  ;;=21^Spend time with adolescent^^CHA-PA^4880^6100^^^^^0^^160^200
  1.  ;;^UTILITY(U,$J,19707.17,2930,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2931,0)
  1.  ;;=11^Keep home and car smoke-free^^CHA-PA^6100^7686^^^^^0^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2931,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2932,0)
  1.  ;;=11^Try to get 8 hours of sleep a night^^CHA-PA^6100^7686^^^^^0^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2932,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2933,0)
  1.  ;;=11^Engage in physical activity 30-60 minutes 3+ times a week^^CHA-PA^6100^7686^^^^^0^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2933,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2934,0)
  1.  ;;=11^Athletic conditioning, weights, fluids, weight gain/loss, supplements^^CHA-PA^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2934,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2935,0)
  1.  ;;=11^Time management^^CHA-PA^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2935,2)
  1.  ;;=^^CHA-PA^^^CHA-PARENTING
  1.  ;;^UTILITY(U,$J,19707.17,2936,0)
  1.  ;;=23^Use lap and shoulder belt in car; be sure passengers wear them too^^^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2936,2)
  1.  ;;=^^CHA-S^^^CHA-SAFETY
  1.  ;;^UTILITY(U,$J,19707.17,2937,0)
  1.  ;;=23^Follow speed limits, drive responsibly, avoid distractions^^^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2937,2)
  1.  ;;=^^CHA-S^^^CHA-SAFETY
  1.  ;;^UTILITY(U,$J,19707.17,2938,0)
  1.  ;;=23^Don't drink alcohol^^^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2938,2)
  1.  ;;=^^CHA-S^^^CHA-SAFETY
  1.  ;;^UTILITY(U,$J,19707.17,2939,0)
  1.  ;;=23^Alcohol consequences when driving, biking, swimming, operating machinery^^^6100^7686^^^^^1^^200^252
  1.  ;;^UTILITY(U,$J,19707.17,2939,2)
  1.  ;;=^^CHA-S^^^CHA-SAFETY
  1.  ;;^UTILITY(U,$J,19707.17,2940,0)
  1.  ;;=23^Plan to rise with designated driver or call for ride if drinking^^^6100^7686^^^^^1^^200^252