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

PXRMGECY.m

Go to the documentation of this file. 
PXRMGECY ;SLC/JVS - GEC Debug Utilities#2 ;08/21/2003  08:55

 ;;2.0;CLINICAL REMINDERS;;Feb 04, 2005

 ;

 Q

MATCHB ;Build tmp global with origingal health factor names from PXRMGECY

 ;

 N GECNA,I,GECDA

 S CNT=0

 S GECNA=""

 F I=1:1:300 S GECNA=$P($TEXT(MATCH+I),";",4) S CNT=CNT+1 Q:GECNA=""  D

 .S GECDA=$P($TEXT(MATCH+I),";",3)

 .S ^TMP("PXRMGEC",$J,"MATCH",GECNA,$S(GECDA="":0,1:$P($T(MATCH+I),";",3)))=""

 ;

 Q

 ;

MATCH ;MATCH AGINST

 ;;334;GEC REFERRAL ADDITIONAL INFO

 ;;97;GEC ADVANCE DIRECTIVE-NO

 ;;98;GEC ADVANCE DIRECTIVE-YES

 ;;126;GEC BETTER OTHER LIVING ENVIRONMENT-NO

 ;;127;GEC BETTER OTHER LIVING ENVIRONMENT-YES

 ;;167;GEC DIFFICULT TO ENTER/LEAVE HOME-NO

 ;;168;GEC DIFFICULT TO ENTER/LEAVE HOME-YES

 ;;192;GEC DPOA FINANCIAL

 ;;193;GEC DPOA HEALTH CARE

 ;;205;GEC FIDUCIARY/CONSERVATOR

 ;;221;GEC GUARDIAN

 ;;257;GEC LEFT ALONE LAST 7D-NO

 ;;258;GEC LEFT ALONE LAST 7D-YES

 ;;307;GEC OTHERS MOVED IN W/PT LAST 90D-NO

 ;;308;GEC OTHERS MOVED IN W/PT LAST 90D-YES

 ;;321;GEC PHYSICAL ACTIVITY 2HRS LAST 7D-NO

 ;;322;GEC PHYSICAL ACTIVITY 2HRS LAST 7D-YES

 ;;346;GEC REFERRAL HOMEBOUND STATUS

 ;;229;GEC HOMEBOUND-NO

 ;;230;GEC HOMEBOUND-YES

 ;;348;GEC REFERRAL IADL

 ;;169;GEC DIFFICULT TRANSPORTATION/LAST 7D-NO

 ;;170;GEC DIFFICULT TRANSPORTATION/LAST 7D-YES

 ;;171;GEC DIFFICULTY MANAGING MEDS/LAST 7D-NO

 ;;172;GEC DIFFICULTY MANAGING MEDS/LAST 7D-YES

 ;;173;GEC DIFFICULTY MNG FINANCES/LAST 7D-NO

 ;;174;GEC DIFFICULTY MNG FINANCES/LAST 7D-YES

 ;;175;GEC DIFFICULTY PREPARE MEALS/LAST 7D-NO

 ;;176;GEC DIFFICULTY PREPARE MEALS/LAST 7D-YES

 ;;177;GEC DIFFICULTY USING PHONE/LAST 7D-NO

 ;;178;GEC DIFFICULTY USING PHONE/LAST 7D-YES

 ;;179;GEC DIFFICULTY W/ HOUSEWORK/LAST 7D-NO

 ;;180;GEC DIFFICULTY W/ HOUSEWORK/LAST 7D-YES

 ;;181;GEC DIFFICULTY WITH SHOPPING/LAST 7D-NO

 ;;182;GEC DIFFICULTY WITH SHOPPING/LAST 7D-YES

 ;;266;GEC MEALS PREPARED BY OTHERS/LAST 7D-NO

 ;;267;GEC MEALS PREPARED BY OTHERS/LAST 7D-YES

 ;;332;GEC RECENT CHANGE IN IADL FX-YES

 ;;331;GEC RECENT CHANGE IN IADL RX-NO

 ;;349;GEC REFERRAL LANGUAGE

 ;;202;GEC ENGLISH

 ;;292;GEC OTHER LANGUAGE

 ;;382;GEC SPANISH

 ;;350;GEC REFERRAL LIVING SITUATION

 ;;128;GEC BOARD AND CARE/ASSISTED LIVING

 ;;184;GEC DOMICILIARY

 ;;237;GEC HOMELESS

 ;;238;GEC HOMELESS SHELTER

 ;;261;GEC LIVES WHERE-OTHER

 ;;278;GEC NURSING HOME

 ;;325;GEC PRIVATE HOME/APT

 ;;351;GEC REFERRAL LIVING SITUATION-WITH WHO

 ;;101;GEC ALONE

 ;;145;GEC CHILD (NOT SPOUSE)

 ;;220;GEC GROUP SETTING WITH NON-RELATIVES

 ;;262;GEC LIVES WITH SPOUSE & OTHERS

 ;;306;GEC OTHERS (NOT SPOUSE OR CHILDREN)

 ;;386;GEC SPOUSE ONLY

 ;;355;GEC REFERRAL PRIMARY UNPAID CAREGIVER

 ;;90;GEC ACCESSIBLE TO PT-NO

 ;;91;GEC ACCESSIBLE TO PT-YES

 ;;94;GEC ADL HELP

 ;;99;GEC ADVICE/EMOTIONAL SUPPORT

 ;;136;GEC CAREGIVER CITY

 ;;137;GEC CAREGIVER FIRST NAME

 ;;138;GEC CAREGIVER LAST NAME

 ;;139;GEC CAREGIVER LIVES WITH PT-NO

 ;;140;GEC CAREGIVER LIVES WITH PT-YES

 ;;141;GEC CAREGIVER PHONE

 ;;142;GEC CAREGIVER STATE

 ;;143;GEC CAREGIVER STREET ADDRESS

 ;;144;GEC CAREGIVER ZIPCODE

 ;;146;GEC CHILD/CHILD-IN-LAW

 ;;208;GEC FRIEND/NEIGHBOR

 ;;249;GEC IADL HELP

 ;;274;GEC NO CAREGIVER

 ;;302;GEC OTHER RELATIVE

 ;;385;GEC SPOUSE

 ;;433;GEC WILLING/ABLE TO INCREASE HELP-NO

 ;;434;GEC WILLING/ABLE TO INCREASE HELP-YES

 ;;359;GEC REFERRAL SERVICES IN THE HOME

 ;;227;GEC HOME HEALTH AIDE/LAST 14D-NO

 ;;228;GEC HOME HEALTH AIDE/LAST 14D-YES

 ;;372;GEC RN HOME VISIT(T+/-30D)-NO

 ;;373;GEC RN HOME VISIT(T+/-30D)-YES

 ;;380;GEC SOCIAL WORK ASSISTANCE/LAST 14D-NO

 ;;381;GEC SOCIAL WORK ASSISTANCE/LAST 14D-YES

 ;;362;GEC REFERRAL SOURCE OF REFERRAL

 ;;150;GEC COMMUNITY NRSNG HOME (REFERRED FROM)

 ;;224;GEC HOME BASED PR. CARE (REFERRED FROM

 ;;246;GEC HOSPITAL < 7 DAYS

 ;;247;GEC HOSPITAL > 6 DAYS

 ;;301;GEC OTHER REFERRAL SOURCE

 ;;309;GEC OUTPATIENT CLINIC

 ;;416;GEC VA DOMICILIARY (REFERRED FROM)

 ;;424;GEC VA NURSING HOME

 ;;335;GEC REFERRAL BASIC ADL

 ;;119;GEC BATHING HELP/SUPERVISION LAST 7D-NO

 ;;120;GEC BATHING HELP/SUPERVISION LAST 7D-YES

 ;;121;GEC BATHING PHYS ASST NEEDED LAST 7D-NO

 ;;122;GEC BATHING PHYS ASST NEEDED LAST 7D-YES

 ;;123;GEC BED POSITIONING HELP LAST 7D-NO

 ;;124;GEC BED POSITIONING HELP LAST 7D-YES

 ;;194;GEC DRESS HELP/SUPERVISION LAST 7D-NO

 ;;195;GEC DRESS HELP/SUPERVISION LAST 7D-YES

 ;;198;GEC EATING HELP/SUPERVISION LAST 7D-NO

 ;;199;GEC EATING HELP/SUPERVISION LAST 7D-YES

 ;;252;GEC INDEPENDENT IN WC LAST 7D-NO

 ;;253;GEC INDEPENDENT IN WC LAST 7D-YES

 ;;272;GEC MOVING AROUND INDOORS LAST 7D-NO

 ;;273;GEC MOVING AROUND INDOORS LAST 7D-YES

 ;;329;GEC RECENT CHANGE IN ADL FX-NO

 ;;330;GEC RECENT CHANGE IN ADL FX-YES

 ;;402;GEC TOILET HELP/SUPERVISION LAST 7D-NO

 ;;403;GEC TOILET HELP/SUPERVISION LAST 7D-YES

 ;;406;GEC TRANSFERS HELP/SPRVISION LAST 7D-NO

 ;;407;GEC TRANSFERS HELP/SPRVISION LAST 7D-YES

 ;;336;GEC REFERRAL COGNITIVE STATUS

 ;;129;GEC CAN BE UNDERSTOOD LAST 7D-NO

 ;;130;GEC CAN BE UNDERSTOOD LAST 7D-YES

 ;;200;GEC ENDANGERED SAFETY LAST 90D-NO

 ;;201;GEC ENDANGERED SAFETY LAST 90D-YES

 ;;264;GEC MADE REASONABLE DECISION LAST 7D-YES

 ;;265;GEC MADE REASONABLE DECISIONS LAST 7D-NO

 ;;338;GEC REFERRAL CONTINENCE

 ;;389;GEC STOOL INCONTINENT-NO

 ;;390;GEC STOOL INCONTINENT-YES

 ;;413;GEC URINE INCONTINENT-NO

 ;;414;GEC URINE INCONTINENT-YES

 ;;339;GEC REFERRAL DIET

 ;;270;GEC MODIFIED DIET

 ;;365;GEC REGULAR DIET

 ;;341;GEC REFERRAL EQUIPMENT/PROSTHETICS

 ;;93;GEC ADL EQUIPMENT

 ;;131;GEC CANE

 ;;248;GEC HOSPITAL BED

 ;;288;GEC ORTHOTIC/SPLINT

 ;;291;GEC OTHER EQUIPMENT

 ;;383;GEC SPECIAL MATTRESS

 ;;408;GEC TRAPEZE

 ;;429;GEC WALKER/ASSISTIVE DEVICE

 ;;432;GEC WHEELCHAIR

 ;;354;GEC REFERRAL PATIENT BEHAVIORS/SYMPTOM

 ;;222;GEC HALLUCINATIONS/DELUSIONS LAST 7D-NO

 ;;223;GEC HALLUCINATIONS/DELUSIONS LAST 7D-YES

 ;;323;GEC PHYSICALLY ABUSIVE LAST 7D-NO

 ;;324;GEC PHYSICALLY ABUSIVE LAST 7D-YES

 ;;368;GEC RESISTS CARE LAST 7D-NO

 ;;369;GEC RESISTS CARE LAST 7D-YES

 ;;426;GEC VERBALLY ABUSIVE LAST 7D-NO

 ;;427;GEC VERBALLY ABUSIVE LAST 7D-YES

 ;;430;GEC WANDERING LAST 7D-NO

 ;;431;GEC WANDERING LAST 7D-YES

 ;;356;GEC REFERRAL PROGNOSIS

 ;;132;GEC CAPABLE INCREASED INDEPENDENCE-YES

 ;;133;GEC CAPABLE INCREASED INDEPENDENCE-NO

 ;;203;GEC EXACERBATION CHR ILLNESS LAST 7D-YES

 ;;204;GEC EXACERBATION CHR ILLNESS LAST 7D-NO

 ;;259;GEC LIFE EXPECTANCY < 6MO-NO

 ;;260;GEC LIFE EXPECTANCY < 6MO-YES

 ;;360;GEC REFERRAL SKILLED CARE

 ;;154;GEC CPAP/BIPAP/VENT-NO

 ;;155;GEC CPAP/BIPAP/VENT-YES

 ;;157;GEC PRESSURE ULCER CARE-NO

 ;;158;GEC PRESSURE ULCER CARE-YES

 ;;159;GEC PRESSURE ULCER-STAGE 1

 ;;160;GEC PRESSURE ULCER-STAGE 2

 ;;161;GEC PRESSURE ULCER-STAGE 3

 ;;162;GEC PRESSURE ULCER-STAGE 4

 ;;163;GEC DIALYSIS (CENTER-BASED)-NO

 ;;164;GEC DIALYSIS (CENTER-BASED)-YES

 ;;165;GEC DIALYSIS (HOME-BASED)-NO

 ;;166;GEC DIALYSIS (HOME-BASED)-YES

 ;;196;GEC DYSPHAGIA DIET-NO

 ;;197;GEC DYSPHAGIA DIET-YES

 ;;206;GEC FREQ RN OBSERVATION >QWEEK-NO

 ;;207;GEC FREQ RN OBSERVATION >QWEEK-YES

 ;;255;GEC IV INFUSIONS-NO

 ;;256;GEC IV INFUSIONS-YES

 ;;268;GEC MEDICATIONS BY INJECTION-NO

 ;;269;GEC MEDICATIONS BY INJECTION-YES

 ;;289;GEC OSTOMY CARE (NOT TRACH)-NO

 ;;290;GEC OSTOMY CARE (NOT TRACH)-YES

 ;;303;GEC OTHER SKILLED CARE-1

 ;;304;GEC OTHER SKILLED CARE-2

 ;;310;GEC OXYGEN-NO

 ;;311;GEC OXYGEN-YES

 ;;314;GEC PARENTERAL FEEDING-NO

 ;;315;GEC PARENTERAL FEEDING-YES

 ;;327;GEC PT/OT/SPEECH/KIN-NO

 ;;328;GEC PT/OT/SPEECH/KIN-YES

 ;;397;GEC SUBSTANCE ABUSE TX-NO

 ;;398;GEC SUBSTANCE ABUSE TX-YES

 ;;399;GEC SUCTIONING-NO

 ;;400;GEC SUCTIONING-YES

 ;;404;GEC TRACH CARE-NO

 ;;405;GEC TRACH CARE-YES

 ;;409;GEC TUBEFEEDING-NO

 ;;410;GEC TUBEFEEDING-YES

 ;;411;GEC URINARY CATHETER CARE-NO

 ;;412;GEC URINARY CATHETER CARE-YES

 ;;435;GEC WOUND CARE (NON-PRESSURE ULCER)-NO

 ;;436;GEC WOUND CARE (NON-PRESSURE ULCER)-YES

 ;;361;GEC REFERRAL SKIN

 ;;377;GEC SKIN PROBLEMS LAST 30D-NO

 ;;378;GEC SKIN PROBLEMS LAST 30D-YES

 ;;364;GEC REFERRAL WEIGHT BEARING

 ;;209;GEC FULL WEIGHT BEARING

 ;;275;GEC NON WEIGHTBEARING

 ;;316;GEC PARTIAL WEIGHT BEARING

 ;;342;GEC REFERRAL EST. DURATION OF SERVICES

 ;;87;GEC 2-3 MONTHS

 ;;88;GEC 2-3 WEEKS

 ;;89;GEC 4-6 MONTHS

 ;;251;GEC INDEFINITE

 ;;286;GEC ONE MONTH

 ;;287;GEC ONE WEEK OR LESS

 ;;344;GEC REFERRAL GOALS OF CARE

 ;;125;GEC BEHAVIOR STABILIZATION

 ;;250;GEC IMPROVE COMPLIANCE MEDS/TREATMENTS

 ;;271;GEC MONITORING TO AVOID COMPLICATIONS

 ;;312;GEC PALLIATIVE/END OF LIFE CARE

 ;;319;GEC PATIENT/FAMILY EDUCATION

 ;;333;GEC REDUCE ER VISITS/HOSPITALIZATIONS

 ;;366;GEC REHABILITATION/IMPROVED FX

 ;;371;GEC RESPITE FOR CAREGIVER

 ;;376;GEC SKILLED NURSING CARE

 ;;401;GEC SUPERVISED/SUPPORTIVE LVNG SITUATION

 ;;358;GEC REFERRAL REFERRING TO

 ;;92;GEC ADL ASSISTANCE IN HOME

 ;;96;GEC ADULT DAY HEALTH CARE (REFERRING TO