Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All
Print Page as PDF
Global: ^AMHRHF

Package: Mental Health Social Services

Global: ^AMHRHF


Information

FileMan FileNo FileMan Filename Package
9002011.08 MHSS RECORD HEALTH FACTORS Mental Health Social Services

Description

Directly Accessed By Routines, Total: 42

Package Total Routines
IHS GPRA Information System 24 BGP0D26    BGP0D5    BGP0D55    BGP1D26    BGP1D5    BGP1D55    BGP2D26    BGP2D5
BGP2D55    BGP3D26    BGP3D5    BGP3D55    BGP4D26    BGP4D5    BGP4D55    BGP5D26
BGP5D5    BGP5D55    BGP6D26    BGP6D55    BGP7D26    BGP7D55    BGP8D55    BGP9D5
Mental Health Social Services 13 AMHEHR    AMHGEVF    AMHGU    AMHHS    AMHLEFP2    AMHLESHF    AMHPCCL1    AMHRAS1
AMHRAS2    AMHRAS31    AMHRLU2    AMHRSB1    AMHUTIL3    
Patient Care Component Reports 4 APCLAL1    APCLAL1A    APCLAL2    APCLAL31    
Local Area Programs 1 AZAXDPM1    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Mental Health Social Services 4 AMHEHR    AMHGDVF1    AMHGDVF2    AMHGEVF    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Mental Health Social Services 1 MHSS RECORD HEALTH FACTORS(#9002011.08)[1208]    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Mental Health Social Services 2 MHSS RECORD(#9002011)[.03]    MHSS RECORD HEALTH FACTORS(#9002011.08)[1208]    
IHS Patient 1 PATIENT(#9000001)[.02]    
Kernel 1 NEW PERSON(#200)[.0512021204]
Scheduling 1 CLINIC STOP(#40.7)[1203]    
Utility Tables 1 HEALTH FACTORS(#9999999.64)[.01]    

Fields, Total: 16

Field # Name Loc Type Details
.01 HEALTH FACTOR 0;1 POINTER TO HEALTH FACTORS FILE (#9999999.64)
************************REQUIRED FIELD************************
HEALTH FACTORS(#9999999.64)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,10)=""F"",$P(^(0),U,13)'=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 10, 1996
  • HELP-PROMPT:  Select the health factor identified at the visit.
  • DESCRIPTION:  
    This is the entry in the Health Factor file that most closely represents the patient's health factor status at the encounter for a given health factor category.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTHF")
  • SCREEN:  S DIC("S")="I $P(^(0),U,10)=""F"",$P(^(0),U,13)'=1"
  • EXPLANATION:  Prevents selection of inactive and/or category health factor entries.
  • CROSS-REFERENCE:  9002011.08^B
    1)= S ^AMHRHF("B",$E(X,1,30),DA)=""
    2)= K ^AMHRHF("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002011.08^AV9^MUMPS
    1)= S:$D(AMHLOOK) DIC("DR")=""
    2)= Q
.02 PATIENT NAME 0;2 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  FEB 17, 1993
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDPAT")
    UNEDITABLE
  • CROSS-REFERENCE:  9002011.08^AC
    1)= S ^AMHRHF("AC",$E(X,1,30),DA)=""
    2)= K ^AMHRHF("AC",$E(X,1,30),DA)
.03 MHSS RECORD 0;3 POINTER TO MHSS RECORD FILE (#9002011)
************************REQUIRED FIELD************************
MHSS RECORD(#9002011)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,8)=$P(^AMHRHF(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 04, 2002
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDVSIT")
  • SCREEN:  S DIC("S")="I $P(^(0),U,8)=$P(^AMHRHF(DA,0),U,2)"
  • EXPLANATION:  VISIT MUST BE FOR CURRENT PATIENT
    UNEDITABLE
  • CROSS-REFERENCE:  9002011.08^AD
    1)= S ^AMHRHF("AD",$E(X,1,30),DA)=""
    2)= K ^AMHRHF("AD",$E(X,1,30),DA)
.04 LEVEL/SEVERITY 0;4 SET
  • 'M' FOR MINIMAL;
  • 'MO' FOR MODERATE;
  • 'H' FOR HEAVY/SEVERE;

  • LAST EDITED:  JAN 28, 1993
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTLS")
.05 PROVIDER 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P($G(^VA(200,+Y,0)),U),+Y)),$S($D(BVC):1,$P($G(^VA(200,+Y,""PS"")),U,4)="""":1,1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 05, 2000
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTPRO")
  • SCREEN:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P($G(^VA(200,+Y,0)),U),+Y)),$S($D(BVC):1,$P($G(^VA(200,+Y,""PS"")),U,4)="""":1,1:0)"
  • EXPLANATION:  Must be an active provider.
.06 QUANTITY 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  JAN 10, 1995
  • HELP-PROMPT:  Type a Number between 0 and 99999, 2 Decimal Digits
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTQTY")
1201 EVENT DATE AND TIME 12;1 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1994
  • HELP-PROMPT:  Enter the date and time the health factor was recorded.
  • DESCRIPTION:  This is the date and time the health factor was recorded by the provider. This date and time may be different from the visit date and time. For example, for clinic appointment visits, the visit date and time is the date
    and time of the appointment, not the time the provider performed the clinical event.  The date may be an imprecise date.
    Date and time may be within 30 days before or after the visit date, with the restriction the date cannot be a future date.
  • TECHNICAL DESCR:  The PCE User Interface, which allows manual entry of data, will be the prmary source of the event date and time. The event date prompt defaults to the visit date and the time is entered to reflect the actual time the exam
    was given. The event date does not have to be the visit date, but it must be within 30
    If a user wants to enter an historical measurement, the user should use the Historical Encounter entry action to document the historical measurement. Historical entries will not be eligible for credit.
    PCE data sources for automatic (scanning) data capture will be blank unless the event date and time are passed to PCE for filing.
    APCDALVR Variable = APCDALVR("APCDTCDT")
1202 ORDERING PROVIDER 12;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))",D="AK.PROVIDER" D IX^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 26, 1994
  • HELP-PROMPT:  Enter the provider who ordered this health factor recorded.
  • DESCRIPTION:  
    This field can be used to document the provider who ordered the health factor recorded.
  • TECHNICAL DESCR:  
    The person entered here must hold the "AK.PROVIDER" security key.  APCDALVR Variable = APCDALVR("APCDTPRV")
  • SCREEN:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))"
  • EXPLANATION:  Must be a Provider.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1203 CLINIC 12;3 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • LAST EDITED:  JUL 09, 1996
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTCLN")
1204 ENCOUNTER PROVIDER 12;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 19, 1994
  • HELP-PROMPT:  Enter the provider who recorded the health factor.
  • DESCRIPTION:  
    This is the provider who recorded the health factor.
  • TECHNICAL DESCR:  
    This person can be any person in the new person file.  The person does not have to hold the "AK.PROVIDER" security key.  APCDALVR Variable = APCDALVR("APCDTEPR")
1208 PARENT 12;8 POINTER TO MHSS RECORD HEALTH FACTORS FILE (#9002011.08) MHSS RECORD HEALTH FACTORS(#9002011.08)

  • LAST EDITED:  JUL 09, 1996
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTPNT")
1209 EXTERNAL KEY 12;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  SEP 25, 1996
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTEXK")
1210 OUTSIDE PROVIDER NAME 12;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 25, 1996
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTOPR")
80101 EDITED 801;1 SET
  • '1' FOR EDITED;

  • LAST EDITED:  APR 01, 1994
  • HELP-PROMPT:  Answer is automatically entered by PCE filing logic.
  • DESCRIPTION:  
    This field is automatically set to 1 if PCE detects that any original health factor data is being edited.
  • TECHNICAL DESCR:  
    PCE filing logic automatically compares the before and after pictures of the record to determine if the edited flag should be set to "1".
80102 DATA SOURCE 801;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>85!($L(X)<2) X
  • LAST EDITED:  APR 01, 1994
  • HELP-PROMPT:  Answer is automatically entered by the PCE filing logic.
  • DESCRIPTION:  
    This field is populated automatically by the PCE filing logic.  The format of the field is as follows:  Pointer to PCE data source file_"-"_A for Add or E for Edit_" "_DUZ of the person who entered the data_";"...
  • TECHNICAL DESCR:  The PCE filing logic requires a pointer to the PCE data source file. If this is not passed, then PCE filing logic will not process the data.
    If the record is a new record, then an "A" is used to specify the source that the old and new records of information.  An "E" will automatically be used if the filing logic finds the data has been edited.  If "E" is used,
    then the Edited Flag field is automatically set to 1.
    The DUZ is stored in its internal format to represent the user who performed the adding or editing of data for this record.
    Iterations of editing will be concatenated to the previous data source value, up to 85 characters.
81101 COMMENTS 811;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  JUL 11, 1995
  • HELP-PROMPT:  Enter a comment 1-245 characters in length.
  • DESCRIPTION:  
    This is a comment related to the patient's health factor.  The provider may enter this manually via the PCE User Interface.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All