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 |  Fields |  All
Print Page as PDF
Global: ^ADEDIT

Package: IHS Dental System

Global: ^ADEDIT


Information

FileMan FileNo FileMan Filename Package
9002007.9 DENTAL EDIT IHS Dental System

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
IHS Dental System 6 ADE0602    ADE697B    ADECD45    ADEGRL5A    ADEGRL5B    ADEUTL    

Accessed By FileMan Db Calls, Total: 12

Package Total Routines
IHS Dental System 12 ADE0602    ADE0608    ADE697B    ADE6P162    ADE6P172    ADE6P175    ADE6P182    ADE6P202
ADECD44    ADECD45    ADECDT    ADEUTL    

Fields, Total: 11

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<4) X
  • LAST EDITED:  DEC 04, 1992
  • HELP-PROMPT:  Answer must be 4-30 characters in length.
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID CODE
  • CROSS-REFERENCE:  9002007.9^B
    1)= S ^ADEDIT("B",$E(X,1,30),DA)=""
    2)= K ^ADEDIT("B",$E(X,1,30),DA)
1 EDIT TYPE 0;2 SET
  • '1' FOR INCOMPATIBLE CODES;
  • '2' FOR TIME LIMIT ON CODES;
  • '3' FOR AGE SCREEN;
  • '4' FOR PERMISSIBLE OPSITES;

  • LAST EDITED:  FEB 21, 1997
  • HELP-PROMPT:  ENTER A VALID EDIT TYPE
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID EDIT TYPE
  • CROSS-REFERENCE:  9002007.9^AD^MUMPS
    1)= D SETTYP^ADEUTL
    2)= D KILTYP^ADEUTL
    Sets and kills the code-edit type crossreference.
1.3 OPSITE SPECIFIC? 0;3 SET
  • 'y' FOR YES;

  • LAST EDITED:  NOV 27, 1992
  • HELP-PROMPT:  ENTER A VALID OPSITE SPECIFIC?
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID OPSITE SPECIFIC?
1.4 ENABLED? 0;4 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  FEB 13, 1997
  • HELP-PROMPT:  Enter N to disable the code edit
2 CONFLICT CODE 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>250!($L(X)<4) X
  • LAST EDITED:  OCT 31, 1991
  • HELP-PROMPT:  Answer must be 4-250 characters in length.
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID CONFLICT CODE
2.4 AGE EDIT 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  DEC 11, 1992
  • HELP-PROMPT:  Enter an age screen in the format OPERATOR AGE (No space between the two) where OPERATOR is <, > or = and AGE is patient's age in years, eg <14
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID AGE EDIT
3 EDIT TIME 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  DEC 12, 1992
  • HELP-PROMPT:  Enter Time Limit (in days) and Number of Procedures permitted within that time. User format DAYS;NUMBER_PROCEDURES
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID EDIT TIME
4 RESOLUTION TYPE 2;2 SET
  • '1' FOR REJECT CODE;
  • '2' FOR CHANGE CODE;
  • '3' FOR FLAG CODE UNREPORTABLE;

  • LAST EDITED:  DEC 11, 1992
  • HELP-PROMPT:  ENTER A VALID RESOLUTION TYPE
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID RESOLUTION TYPE
  • CROSS-REFERENCE:  9002007.9^AC^MUMPS
    1)= D SETEDT^ADEUTL
    2)= D KILEDT^ADEUTL
4.1 OPSITES PERMITTED 4;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  DEC 11, 1992
  • HELP-PROMPT:  Enter the Operative sites (or an entry from DENTAL CODE GROUP preceded by "[") which are permitted for this code
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID OPSITES PERMITTED
5 RESOLUTION CODE 2;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4) X
  • LAST EDITED:  OCT 31, 1991
  • HELP-PROMPT:  Answer must be 4 characters in length.
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID RESOLUTION CODE
6 RESOLUTION MESSAGE 3;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>250!($L(X)<1) X
  • LAST EDITED:  OCT 31, 1991
  • HELP-PROMPT:  Answer must be 1-250 characters in length.
  • DESCRIPTION:  
    FIELD WILL CONTAIN VALID RESOLUTION MESSAGE
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Fields |  All