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: ^APCDTHFD

Package: Patient Care Component

Global: ^APCDTHFD


Information

FileMan FileNo FileMan Filename Package
9001005.9 TEMP HEALTH FACTORS FOR DISTRIBUTION Patient Care Component

Description

Directly Accessed By Routines, Total: 4

Package Total Routines
Patient Care Component 4 BJPC2ENP    BJPC2EVH    BJPC2P1    BJPC2P5    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Patient Care Component 3 BJPC2ENP    BJPC2P1    BJPC2P5    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Patient Care Component 1 TEMP HEALTH FACTORS FOR DISTRIBUTION(#9001005.9)[#9001005.901101(.01)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Patient Care Component 1 TEMP HEALTH FACTORS FOR DISTRIBUTION(#9001005.9)[#9001005.901101(.01)]    

Fields, Total: 19

Field # Name Loc Type Details
.01 FACTOR 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JUL 17, 1996
  • HELP-PROMPT:  Answer must be 3-40 characters in length.
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  9001005.9^B
    1)= S:'$P(^APCDTHFD(DA,0),"^",15) ^APCDTHFD("B",$E(X,1,40),DA)=""
    2)= K ^APCDTHFD("B",$E(X,1,40),DA)
.02 CODE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<4) X
  • LAST EDITED:  MAY 20, 2004
  • HELP-PROMPT:  Answer must be 4 characters in length.
  • CROSS-REFERENCE:  9001005.9^C
    1)= S ^APCDTHFD("C",$E(X,1,30),DA)=""
    2)= K ^APCDTHFD("C",$E(X,1,30),DA)
.03 CATEGORY 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  SEP 23, 2009
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • CROSS-REFERENCE:  9001005.9^AC
    1)= S ^APCDTHFD("AC",$E(X,1,30),DA)=""
    2)= K ^APCDTHFD("AC",$E(X,1,30),DA)
.04 SHORT NAME 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<2) X
  • LAST EDITED:  JUL 01, 1991
  • HELP-PROMPT:  Answer must be 2-10 characters in length.
.05 USE ONLY WITH SEX 0;5 SET
  • 'F' FOR FEMALE;
  • 'M' FOR MALE;

  • LAST EDITED:  JUL 01, 1991
.06 LOWER AGE 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 01, 1991
  • HELP-PROMPT:  Type a Number between 0 and 99999, 0 Decimal Digits
.07 UPPER AGE 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 01, 1991
  • HELP-PROMPT:  Type a Number between 0 and 99999, 0 Decimal Digits
.08 DISPLAY ON HEALTH SUMMARY 0;8 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUL 01, 1991
.09 SYNONYM 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  JUL 01, 1991
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • CROSS-REFERENCE:  9001005.9^D
    1)= S ^APCDTHFD("D",$E(X,1,30),DA)=""
    2)= K ^APCDTHFD("D",$E(X,1,30),DA)
.1 ENTRY TYPE 0;10 SET
************************REQUIRED FIELD************************
  • 'C' FOR CATEGORY;
  • 'F' FOR FACTOR;

  • LAST EDITED:  OCT 15, 1991
  • HELP-PROMPT:  Enter C if this entry represents a category to which other entries will refer, otherwise enter F.
  • CROSS-REFERENCE:  9001005.9^AD
    1)= S ^APCDTHFD("AD",$E(X,1,30),DA)=""
    2)= K ^APCDTHFD("AD",$E(X,1,30),DA)
.11 PHRASE FOR QUANTITY 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  MAY 22, 1996
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
.12 PHRASE FOR LEVEL 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  MAY 22, 1996
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
.13 INACTIVE FLAG 0;13 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 10, 1996
.14 HEALTH SUMMARY FLAG 0;14 SET
  • '1' FOR MOST RECENT WITHIN CATEGORY;
  • '2' FOR MOST RECENT OF EACH FACTOR;

  • LAST EDITED:  SEP 02, 2003
  • TECHNICAL DESCR:  
    This field is introduced with patch AUT*98.1*13.
.15 INACTIVE DATE 0;15 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 05, 2004
1101 NOT USED WITH 11;0 POINTER Multiple #9001005.901101 9001005.901101
8801 MNEMONIC 88;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  MAY 20, 2004
  • HELP-PROMPT:  Enter the mnemonic for this Health Factor, 1-6 Characters.
  • DESCRIPTION:  A word or string which is intended to be easier to remember than the thing it stands for. Most often used in "instruction mnemonic" which are so called because they are easier to remember than the binary patterns they
    stand for.  Non-printing ASCII characters also have mnemonics like NAK, ESC, DEL intended to evoke their meaning on certain systems.
  • TECHNICAL DESCR:  
    Added by AUT*98.1*11.
  • CROSS-REFERENCE:  9001005.9^E
    1)= S ^APCDTHFD("E",$E(X,1,30),DA)=""
    2)= K ^APCDTHFD("E",$E(X,1,30),DA)
9901 NEW NAME 99;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 15, 2008
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
9902 INACTIVATE THIS PATCH? 99;2 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 15, 2008
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All