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 |  Pointed To By FileMan Files |  Fields |  All
Print Page as PDF
Global: ^ADEDNT

Package: IHS Dental System

Global: ^ADEDNT


Information

FileMan FileNo FileMan Filename Package
9002003.3 DENTAL DEFERRED NEED TYPES IHS Dental System

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
IHS Dental System 2 ADEPDFR    ADEPDIN    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IHS Dental System 1 DENTAL DEFERRED SVCS REGISTER(#9002003.4)[#9002003.43(.01)]    

Fields, Total: 6

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

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<5)!'(X'?1P.E) X
  • HELP-PROMPT:  ENTER A VALID DESCRIPTION
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID DESCRIPTION
  • CROSS-REFERENCE:  9002003.3^B
    1)= S ^ADEDNT("B",$E(X,1,30),DA)=""
    2)= K ^ADEDNT("B",$E(X,1,30),DA)
1 NUMERIC LOOKUP 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<1) X
  • LAST EDITED:  MAY 03, 1993
  • HELP-PROMPT:  ENTER A VALID NUMERIC LOOKUP
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID NUMERIC LOOKUP
  • CROSS-REFERENCE:  9002003.3^C
    1)= S ^ADEDNT("C",$E(X,1,30),DA)=""
    2)= K ^ADEDNT("C",$E(X,1,30),DA)
2 IHS CATEGORY OF NEED 0;3 SET
  • 'P' FOR PRIMARY/PREVENTIVE CARE;
  • 'S' FOR SECONDARY ACUTE & CHRONIC CARE;
  • 'T' FOR TERTIARY ACUTE & CHRONIC CARE;
  • 'X' FOR OTHER NEEDS;

  • LAST EDITED:  JUL 31, 1990
  • HELP-PROMPT:  ENTER A VALID IHS CATEGORY OF NEED
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID IHS CATEGORY OF NEED
3 FEE ESTIMATE 0;4 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>10000)!(X<0) X
  • HELP-PROMPT:  ENTER A VALID FEE ESTIMATE
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID FEE ESTIMATE
4 NARRATIVE DEFINITION 1;0 WORD-PROCESSING #9002003.34

  • HELP-PROMPT:  ENTER A VALID NARRATIVE DEFINITION
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID NARRATIVE DEFINITION
5 OUTPUT ABBR. 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<2) X
  • HELP-PROMPT:  ENTER A VALID OUTPUT ABBR.
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID OUTPUT ABBR.
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  All