Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 90002.979101

Package: IHS RPMS CHR System

CHR GROUP FORM TEMP FILE(#90002.97)-->90002.979101

Sub-Field: 90002.979101


Information

Parent File Name Number Package
CHR GROUP FORM TEMP FILE(#90002.97) ASSESSMENTS 90002.979101 IHS RPMS CHR System

Details

Field # Name Loc Type Details
.01 ASSESSMENTS 0;1 POINTER TO CHR HEALTH PROBLEM CODES FILE (#90002.53)
************************REQUIRED FIELD************************
CHR HEALTH PROBLEM CODES(#90002.53)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,6)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 01, 2006
  • SCREEN:  S DIC("S")="I '$P(^(0),U,6)"
  • EXPLANATION:  MUST BE AN ACTIVE CODE.
  • CROSS-REFERENCE:  90002.979101^B
    1)= S ^BCHGROUP(DA(1),91,"B",$E(X,1,30),DA)=""
    2)= K ^BCHGROUP(DA(1),91,"B",$E(X,1,30),DA)
.02 SERVICE CODE 0;2 POINTER TO CHR SERVICE CODES FILE (#90002.54)
************************REQUIRED FIELD************************
CHR SERVICE CODES(#90002.54)

  • LAST EDITED:  JAN 03, 2005
.03 MINUTES 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 03, 2005
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
.04 NARRATIVE 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<2) X
  • LAST EDITED:  JAN 03, 2005
  • HELP-PROMPT:  Answer must be 2-80 characters in length.
Info |  Details |  All