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

Package: Mental Health Social Services

Global: ^AMHPTPM


Information

FileMan FileNo FileMan Filename Package
9002011.64 *MHSS PATIENT TP METHODS Mental Health Social Services

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Local Area Programs 1 AZAXDPM1    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
Mental Health Social Services 3 *MHSS PATIENT TP GOALS 2(#9002011.63)[.03]    *MHSS PATIENT TP PROBLEMS(#9002011.62)[.12]    MHSS PATIENT TREATMENT PLANS(#9002011.56)[.13]    
IHS Patient 1 PATIENT(#9000001)[.02]    
Kernel 1 NEW PERSON(#200)[.05, .09]    

Fields, Total: 12

Field # Name Loc Type Details
.01 METHOD # 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 04, 2000
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits
  • CROSS-REFERENCE:  9002011.64^B
    1)= S ^AMHPTPM("B",$E(X,1,30),DA)=""
    2)= K ^AMHPTPM("B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  JUL 26, 1994
  • CROSS-REFERENCE:  9002011.64^AC
    1)= S ^AMHPTPM("AC",$E(X,1,30),DA)=""
    2)= K ^AMHPTPM("AC",$E(X,1,30),DA)
.03 GOAL 0;3 POINTER TO *MHSS PATIENT TP GOALS 2 FILE (#9002011.63)
************************REQUIRED FIELD************************
*MHSS PATIENT TP GOALS 2(#9002011.63)

  • LAST EDITED:  DEC 04, 2000
  • CROSS-REFERENCE:  9002011.64^AD
    1)= S ^AMHPTPM("AD",$E(X,1,30),DA)=""
    2)= K ^AMHPTPM("AD",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002011.64^AY1^MUMPS
    1)= Q
    2)= Q
.04 DATE METHOD ESTABLISHED 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 03, 1997
.05 PERFORMED BY 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 03, 1997
.06 DATE METHOD REVIEWED W/CLIENT 0;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 03, 1997
.07 FREQUENCY 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  JUL 25, 2000
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
.09 ESTABLISHED BY 0;9 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUL 25, 2000
.12 TREATMENT PLAN PROBLEM 0;12 POINTER TO *MHSS PATIENT TP PROBLEMS FILE (#9002011.62) *MHSS PATIENT TP PROBLEMS(#9002011.62)

  • LAST EDITED:  JUL 25, 2000
.13 TREATMENT PLAN 0;13 POINTER TO MHSS PATIENT TREATMENT PLANS FILE (#9002011.56) MHSS PATIENT TREATMENT PLANS(#9002011.56)

  • LAST EDITED:  JUL 25, 2000
1101 METHOD 11;0 WORD-PROCESSING #9002011.641101

  • LAST EDITED:  MAY 03, 1997
1301 DURATION 13;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<2) X
  • LAST EDITED:  APR 05, 1995
  • HELP-PROMPT:  Answer must be 2-240 characters in length.
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  All