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

Package: Alcohol Chemical Dependency

Global: ^ACDPAT


Information

FileMan FileNo FileMan Filename Package
9002172.8 CDMIS CLIENT CATEGORY Alcohol Chemical Dependency

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Alcohol Chemical Dependency 4 ACDAUTO1    ACDAUTO3    ACDCSD    ACDPPFIX    
Local Area Programs 1 AZAXDPM1    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Alcohol Chemical Dependency 1 ACDCSD    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
Alcohol Chemical Dependency 2 CDMIS COMPONENT(#9002170.1)[.03]    CDMIS PROGRAM(#9002173)[2]    
IHS Patient 1 PATIENT(#9000001)[#9002172.81(.01)]    
Kernel 1 STATE(#5)[#9002172.81(23)]    
Utility Tables 1 TRIBE(#9999999.03)[#9002172.81(24)]    

Fields, Total: 5

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

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JAN 07, 1994
  • HELP-PROMPT:  Answer must be 3-100 characters in length.
  • CROSS-REFERENCE:  9002172.8^B
    1)= S ^ACDPAT("B",$E(X,1,30),DA)=""
    2)= K ^ACDPAT("B",$E(X,1,30),DA)
.03 COMPONENT (CODE) 0;3 POINTER TO CDMIS COMPONENT FILE (#9002170.1)
************************REQUIRED FIELD************************
CDMIS COMPONENT(#9002170.1)

  • INPUT TRANSFORM:  S DIC("S")="S %=$P(^(0),U,2) I %'=""CLO"",%'=""DIS""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 19, 1997
  • SCREEN:  S DIC("S")="S %=$P(^(0),U,2) I %'=""CLO"",%'=""DIS"""
  • EXPLANATION:  CLOSED and DISCHARGED not allowed
.04 COMPONENT (TYPE) 0;4 SET
************************REQUIRED FIELD************************
  • 'A' FOR ADULT;
  • 'Y' FOR YOUTH;
  • 'M' FOR MIXED (ADULT&YOUTH);
  • 'F' FOR FAMILY;
  • 'W' FOR WOMEN ONLY;
  • 'E' FOR ELDERLY ONLY;
  • 'S' FOR STAFF;

  • LAST EDITED:  JAN 13, 1995
1 CLIENT 1;0 POINTER Multiple #9002172.81 9002172.81
2 CDMIS PROGRAM 0;2 POINTER TO CDMIS PROGRAM FILE (#9002173)
************************REQUIRED FIELD************************
CDMIS PROGRAM(#9002173)

  • LAST EDITED:  MAY 20, 1994
  • CROSS-REFERENCE:  9002172.8^C
    1)= S ^ACDPAT("C",$E(X,1,30),DA)=""
    2)= K ^ACDPAT("C",$E(X,1,30),DA)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  All