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

Package: Mental Health Social Services

Global: ^AMHPROB


Information

FileMan FileNo FileMan Filename Package
9002012.2 MHSS PROBLEM/POV CODES Mental Health Social Services

Description

Directly Accessed By Routines, Total: 169

Package Total Routines
Mental Health Social Services 69 AMH30P10    AMH30P4C    AMH30P6    AMH30P8    AMH40P10    AMH40P2    AMH40P4    AMH40P7
AMH40P8    AMH40P9    AMHBHRU    AMHBPL1    AMHBPL2    AMHDMHPL    AMHDPEE    AMHEGR
AMHEGR1    AMHEGRPV    AMHEHR1    AMHEXD2    AMHGBPL    AMHGPCCL    AMHGSBPL    AMHHS
AMHHS1    AMHLCD    AMHLE2    AMHLEA    AMHLEA1    AMHLEAR    AMHLEDV1    AMHLEFP2
AMHLEFPP    AMHLEGP    AMHLEL    AMHLENS    AMHLEP1    AMHLEPOV    AMHLETN    AMHLRDSP
AMHNAVRP    AMHPCCL1    AMHPDSM    AMHPL1    AMHPREI    AMHPREI1    AMHPREI2    AMHRBV1
AMHRC3    AMHRC4    AMHRE1    AMHRLKUP    AMHRLP3    AMHRLU2    AMHRNOAT    AMHRNS
AMHRNSM    AMHRP1    AMHRP31    AMHRP4P    AMHRP8P    AMHRP9P    AMHRPS    AMHRPS1
AMHRPSP    AMHRPTST    AMHRSU5    AMHUTIL    AMHUTIL1    
IHS GPRA Information System 62 BGP0D25    BGP0D5    BGP0D51    BGP0D54    BGP0D55    BGP0D5A    BGP1D25    BGP1D5
BGP1D51    BGP1D54    BGP1D55    BGP1D5A    BGP2D25    BGP2D5    BGP2D51    BGP2D54
BGP2D55    BGP2D5A    BGP3D25    BGP3D5    BGP3D51    BGP3D54    BGP3D55    BGP3D5A
BGP4D25    BGP4D5    BGP4D51    BGP4D54    BGP4D55    BGP4D5A    BGP5D25    BGP5D27
BGP5D5    BGP5D51    BGP5D54    BGP5D55    BGP5D5A    BGP6D25    BGP6D27    BGP6D51
BGP6D54    BGP6D55    BGP6D5A    BGP7D25    BGP7D27    BGP7D51    BGP7D54    BGP7D55
BGP7D5A    BGP8D25    BGP8D27    BGP8D51    BGP8D54    BGP8D55    BGP8D5A    BGP8PC11
BGP8PC12    BGP8PC13    BGP9D25    BGP9D5    BGP9D51    BGP9D54    
Diabetes Registry 17 BDMAPIU    BDMD012    BDMD112    BDMD412    BDMD512    BDMD612    BDMD712    BDMD812
BDMD912    BDMDA12    BDMDB12    BDMDC12    BDMDD12    BDMDE12    BDMDF12    BDMDG12
BDMS9B1    
IHS Uniform Data System 5 BUDBRP6Q    BUDCRP6Q    BUDDRP6Q    BUDERP6Q    BUDHRP6Q    
Patient Care Component Reports 5 APCLAPIU    APCLD512    APCLD612    APCLD712    APCLD812    
Health Summary Components 3 BHSBH    BHSBH1    BHSDM1    
Patient Care Component 2 APCHS9B1    APCHSM03    
Patient Chart 1 BPCBHRU    
iCare 1 BQICASUI    

Accessed By FileMan Db Calls, Total: 38

Package Total Routines
Mental Health Social Services 38 AMH30P1    AMH30P10    AMH30P2    AMH30P3    AMH30P4    AMH30P4C    AMH30P5    AMH30P6
AMH30P8    AMH40ENV    AMH40P1    AMH40P10    AMH40P2    AMH40P4    AMH40P5    AMH40P7
AMH40P8    AMH40P9    AMHEGRPV    AMHEHR    AMHEHR1    AMHGBPL    AMHGD    AMHGDA
AMHGDAD    AMHGDCM    AMHGDCOM    AMHGDGP    AMHGUA    AMHLEA1    AMHLEPOV    AMHPL1
AMHPOST    AMHPREI    AMHPREI1    AMHPREI2    AMHRE1    AMHUTIL2    

Pointed To By FileMan Files, Total: 7

Package Total FileMan Files
Mental Health Social Services 7 MHSS GROUP(#9002011.67)[#9002011.6721(.01)]    MHSS CASE DATES(#9002011.58)[.09]    MHSS PATIENT PROBLEM LIST(#9002011.51)[.01]    MHSS PATIENT TREATMENT PLANS(#9002011.56)[.11, .13, .14]
BH CD STAGING TOOL(#9002011.06)[.03]    MHSS RECORD PROBLEMS (POVS)(#9002011.01)[.01]    MHSS REPORT SORT(#9002013.3)[99999.02]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Mental Health Social Services 2 MHSS PROBLEM CODES(#9002012.4)[.03]    MHSS DIAGNOSIS CATEGORY(#9002012.6)[.07, #9002012.31(.01)]    

Fields, Total: 20

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

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>8!($L(X)<1) X
  • LAST EDITED:  DEC 19, 2012
  • HELP-PROMPT:  Answer must be 1-8 characters in length.
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  9002012.2^B
    1)= S ^AMHPROB("B",$E(X,1,30),DA)=""
    2)= K ^AMHPROB("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002012.2^D^MUMPS
    1)= S ^AMHPROB("D",X_" ",DA)=""
    2)= K ^AMHPROB("D",X_" ",DA)
  • CROSS-REFERENCE:  ^^TRIGGER^9002012.2^99999
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AMHPROB(D0,99999)):^(99999),1:"") S X=$P(Y(1),U,1),X=X S DIU=X K Y S X=DIV S X=+DIV S DIH=$G(^AMHPROB(DIV(0),99999)),DIV=X S $P(^(99999),U,1)=DIV,DIH=9002012.2,DIG=99999 D ^D
    ICR
    2)= Q
    CREATE VALUE)= +#.01
    DELETE VALUE)= NO EFFECT
    FIELD)= #99999
  • CROSS-REFERENCE:  9002012.2^BA^MUMPS
    1)= S ^AMHPROB("BA",$S(+X:+X,1:X),DA)=""
    2)= K ^AMHPROB("BA",$S(+X:+X,1:X),DA)
  • CROSS-REFERENCE:  9002012.2^BAA^MUMPS
    1)= D SETBAA^AMHUTIL
    2)= D KILLBAA^AMHUTIL
.02 NARRATIVE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>160!($L(X)<2) X
  • LAST EDITED:  MAR 05, 2014
  • HELP-PROMPT:  Answer must be 2-160 characters in length.
  • CROSS-REFERENCE:  9002012.2^C
    1)= S ^AMHPROB("C",X,DA)=""
    2)= K ^AMHPROB("C",X,DA)
.03 MHSS PROBLEM CODE 0;3 POINTER TO MHSS PROBLEM CODES FILE (#9002012.4)
************************REQUIRED FIELD************************
MHSS PROBLEM CODES(#9002012.4)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,4)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 27, 2007
  • SCREEN:  S DIC("S")="I '$P(^(0),U,4)"
  • EXPLANATION:  Must not be an inactive code.
  • CROSS-REFERENCE:  9002012.2^AC
    1)= S ^AMHPROB("AC",$E(X,1,30),DA)=""
    2)= K ^AMHPROB("AC",$E(X,1,30),DA)
.05 ICD-9 CODE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<1) X
  • LAST EDITED:  DEC 19, 2012
  • HELP-PROMPT:  Answer must be 1-7 characters in length.
.06 AXIS I/II 0;6 SET
  • 'I' FOR I;
  • 'II' FOR II;

  • LAST EDITED:  OCT 18, 1993
.07 DX CATEGORY 0;7 POINTER TO MHSS DIAGNOSIS CATEGORY FILE (#9002012.6) MHSS DIAGNOSIS CATEGORY(#9002012.6)

  • LAST EDITED:  NOV 30, 1993
.08 PASS PROVIDER NARRATIVE AS IS 0;8 SET
  • '1' FOR NO;

  • LAST EDITED:  SEP 27, 1994
.09 SEE PROVIDER NARRATIVE 0;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 28, 1994
.1 CODING SYSTEM 0;10 SET
  • '4' FOR DSM-IV;
  • '5' FOR DSM-V;
  • '9' FOR ICD-9;
  • '0' FOR ICD10;
  • 'P' FOR PROBLEM CODE;

  • LAST EDITED:  DEC 17, 2013
.11 TENTATIVE DX NARRATIVE 0;11 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 14, 1994
.12 SPECIAL EXCEPTIONS 0;12 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  AUG 01, 1994
.13 INACTIVE FLAG 0;13 SET
  • '1' FOR INACTIVE FLAG;

  • LAST EDITED:  NOV 25, 1996
.14 INACTIVE DATE 0;14 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 25, 1996
.15 EHR CODE DEFAULT 0;15 SET
  • '1' FOR YES, USE THIS CODE;

  • LAST EDITED:  JUL 13, 2007
.16 ACTIVATION DATE 0;16 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 15, 2011
.17 ICD-10 CODE 0;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
  • LAST EDITED:  DEC 19, 2012
  • HELP-PROMPT:  Answer must be 1-8 characters in length.
.18 NOT SELECTABLE IN BH 0;18 SET
  • '1' FOR YES, NO BH SELECTION;

  • LAST EDITED:  FEB 27, 2014
2101 LONG DESCRIPTION 21;0 WORD-PROCESSING #9002012.22101
3100 DX CATEGORY 31;0 POINTER Multiple #9002012.31 9002012.31
99999 NUMERICAL 99999;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  JAN 14, 2008
  • HELP-PROMPT:  Type a Number between 0 and 9999, 2 Decimal Digits
  • NOTES:  TRIGGERED by the CODE field of the MHSS PROBLEM/POV CODES File
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All