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: 9003202.2101

Package: Diabetes Registry

DMS EPI RECORD DEFINITION(#9003202.1)-->9003202.2101

Sub-Field: 9003202.2101


Information

Parent File Name Number Package
DMS EPI RECORD DEFINITION(#9003202.1) ITEMS 9003202.2101 Diabetes Registry

Details

Field # Name Loc Type Details
.01 ITEMS 0;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  JAN 06, 2011
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • CROSS-REFERENCE:  9003202.2101^B
    1)= S ^BDMRECD(DA(1),11,"B",$E(X,1,30),DA)=""
    2)= K ^BDMRECD(DA(1),11,"B",$E(X,1,30),DA)
.02 BEGINNING COLUMN 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 02, 2012
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
  • CROSS-REFERENCE:  9003202.2101^AC
    1)= S ^BDMRECD(DA(1),11,"AC",$E(X,1,30),DA)=""
    2)= K ^BDMRECD(DA(1),11,"AC",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9003202.2101^D
    1)= S ^BDMRECD(DA(1),11,"D",$E(X,1,30),DA)=""
    2)= K ^BDMRECD(DA(1),11,"D",$E(X,1,30),DA)
.03 ENDING COLUMN 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 2009
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
  • CROSS-REFERENCE:  9003202.2101^C
    1)= S ^BDMRECD(DA(1),11,"C",$E(X,1,30),DA)=""
    2)= K ^BDMRECD(DA(1),11,"C",$E(X,1,30),DA)
.04 LENGTH 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1995
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
.05 REQUIRED? 0;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 21, 1995
.06 EDIT CRITERIA 0;6 SET
  • 'RB' FOR RIGHT BLANK FILL;
  • 'LB' FOR LEFT BLANK FILL;
  • 'LZ' FOR LEFT ZERO FILL;
  • 'RZ' FOR RIGHT ZERO FILL;

  • LAST EDITED:  SEP 21, 1995
1101 GET CODE 11;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 06, 1995
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
1201 DESCRIPTION 12;0 WORD-PROCESSING #9003202.210112
Info |  Details |  All