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 |  Found Entries |  All
Print Page as PDF
Global: ^AUPNFHR

Package: IHS Patient

Global: ^AUPNFHR


Information

FileMan FileNo FileMan Filename Package
9000014.1 FAMILY HISTORY FAMILY MEMBERS IHS Patient

Description

Directly Accessed By Routines, Total: 9

Package Total Routines
Health Summary Components 3 BHSAST1    BHSFH    BHSFH1    
Patient Care Component 3 APCDFH    APCHS61    APCHSAS1    
GUI Objects 2 BGOFHX    BGOREL    
Patient Care Component Reports 1 APCLVLU1    

Accessed By FileMan Db Calls, Total: 11

Package Total Routines
iCare 5 BQIPTFHD    BQIPTFHE    BQIPTFHR    BQIPTFHS    BQIVFTRF    
Patient Care Component 4 APCDFH    APCDFH1    APCDFHA    BJPC2EV3    
GUI Objects 2 BGOFHX    BGOREL    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IHS Patient 1 FAMILY HISTORY(#9000014)[.09]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
IHS Patient 1 PATIENT(#9000001)[.02]    
Utility Tables 1 RELATIONSHIP(#9999999.36)[.01]    

Fields, Total: 10

Field # Name Loc Type Details
.01 RELATIONSHIP 0;1 POINTER TO RELATIONSHIP FILE (#9999999.36)
************************REQUIRED FIELD************************
RELATIONSHIP(#9999999.36)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^(21)),U,1)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 23, 2008
  • SCREEN:  S DIC("S")="I $P($G(^(21)),U,1)"
  • EXPLANATION:  Must be a valid Family History Relationship.
  • CROSS-REFERENCE:  9000014.1^B
    1)= S ^AUPNFHR("B",$E(X,1,30),DA)=""
    2)= K ^AUPNFHR("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000014.1^AATOO^MUMPS
    1)= I $P(^AUPNFHR(DA,0),U,2)]"" S ^AUPNFHR("AA",$P(^AUPNFHR(DA,0),U,2),X,DA)=""
    2)= I $P(^AUPNFHR(DA,0),U,2)]"" K ^AUPNFHR("AA",$P(^AUPNFHR(DA,0),U,2),X,DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#9000001) PATIENT(#9000001)

  • LAST EDITED:  MAY 29, 2008
  • CROSS-REFERENCE:  9000014.1^AA^MUMPS
    1)= I $P(^AUPNFHR(DA,0),U,1) S ^AUPNFHR("AA",X,$P(^AUPNFHR(DA,0),U,1),DA)=""
    2)= I $P(^AUPNFHR(DA,0),U,1) K ^AUPNFHR("AA",X,$P(^AUPNFHR(DA,0),U,1),DA)
.03 RELATION DESCRIPTION 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  MAY 28, 2008
  • HELP-PROMPT:  Enter a description that will uniquely identify this family member, e.g. Cousin 1, Mom's sister
.04 STATUS 0;4 SET
  • 'L' FOR LIVING;
  • 'D' FOR DECEASED;
  • 'U' FOR UNKNOWN;
  • 'R' FOR PT REFUSED TO ANSWER;

  • LAST EDITED:  MAY 28, 2008
  • HELP-PROMPT:  Enter the status of the specified family member.
.05 AGE AT DEATH 0;5 SET
  • 'I' FOR In Infancy;
  • '1' FOR Before Age 20;
  • '2' FOR At age 20-29;
  • '3' FOR At age 30-39;
  • '4' FOR At age 40-49;
  • '5' FOR At age 50-59;
  • '6' FOR 60 and older;
  • 'U' FOR Age Unknown;

  • LAST EDITED:  MAY 30, 2008
  • HELP-PROMPT:  Select the age range at death for this family member.
.06 CAUSE OF DEATH 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<2) X
  • LAST EDITED:  SEP 02, 2010
  • HELP-PROMPT:  Enter a Cause of Death, answer must be 2-60 characters in length.
.07 MULTIPLE BIRTH? 0;7 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  MAY 28, 2008
  • HELP-PROMPT:  Was this family member a multiple birth (e.g. twin)?
.08 MULTIPLE BIRTH TYPE 0;8 SET
  • 'TU' FOR TWIN, UNSPECIFIED;
  • 'IT' FOR IDENTICAL TWIN;
  • 'FT' FOR FRATERNAL TWIN;
  • 'TR' FOR TRIPLET;
  • 'OTH' FOR OTHER MULTIPLE;

  • LAST EDITED:  JUN 13, 2008
  • HELP-PROMPT:  Select the type of multiple birth for the family member.
.09 DATE UPDATED 0;9 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 29, 2008
.11 DATE ADDED 0;11 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 16, 2008
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All