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: ^AMQQ(5

Package: PCC Medical Query

Global: ^AMQQ(5


Information

FileMan FileNo FileMan Filename Package
9009075 QMAN DICTIONARY OF TERMS PCC Medical Query

Description

Directly Accessed By Routines, Total: 54

Package Total Routines
PCC Medical Query 45 AMQ1POST    AMQQ1    AMQQAC    AMQQATA    AMQQATAL    AMQQATR1    AMQQAV    AMQQCMP3
AMQQCMPZ    AMQQDFN    AMQQEM2O    AMQQGTX    AMQQGTX0    AMQQHEL2    AMQQHELP    AMQQMGR
AMQQMGR3    AMQQMGR4    AMQQMGR6    AMQQMGR7    AMQQMGR8    AMQQMGR9    AMQQMULT    AMQQN2
AMQQPIR    AMQQPOS    AMQQPOST    AMQQQ0    AMQQQ1    AMQQQ2    AMQQREG    AMQQRMA
AMQQSEC    AMQQSQ    AMQQSQA    AMQQSQA0    AMQQSQA1    AMQQSQA2    AMQQSQAC    AMQQSQBP
AMQQSQL    AMQQSQUP    AMQQSQVS    AMQQTX    AMQQTXG    
Diabetes Registry 3 BDMFFS    BDMFUTIL    BDMPOST    
Patient Care Component Reports 3 APCLDF1    APCLRTC    APCLTAX0    
IHS Patient 1 AUPNCIXL    

Accessed By FileMan Db Calls, Total: 101

Package Total Routines
Patient Care Component Reports 43 APCL2A    APCLACC    APCLACG    APCLAL3    APCLAP4    APCLAP5    APCLAP6    APCLBP
APCLCAR    APCLCAW    APCLCH1    APCLCP1    APCLCR1    APCLCV    APCLDE3    APCLDF
APCLDF1    APCLDOD1    APCLDQMT    APCLDV3    APCLEL1    APCLEM1    APCLEM2    APCLFPC
APCLHH1    APCLM2    APCLNJ1    APCLNJ2    APCLOP1    APCLOS    APCLPIF1    APCLPIF2
APCLPP2    APCLPSU1    APCLREDU    APCLSILR    APCLT1    APCLTAX2    APCLTEN    APCLVL0
APCLVL01    APCLVL03    APCLYV5    
PCC Medical Query 17 AMQ1POST    AMQQ1    AMQQ33P1    AMQQ33P2    AMQQAC    AMQQATA    AMQQEM2O    AMQQMGR
AMQQMGR3    AMQQMGR7    AMQQMGR9    AMQQN2    AMQQPOS    AMQQPOST    AMQQREG    AMQQSQA0
AMQQSQBP    
Mental Health Social Services 13 AMHPHQM    AMHPHQO    AMHRAS3    AMHRDE3    AMHRDV3    AMHRGADM    AMHRGADO    AMHRL0
AMHRPPA    AMHRPSU1    AMHRPT1    AMHRSR3    AMHRSU5    
Patient Care Component 11 APCDCAFB    APCDCAFD    APCDCAFE    APCDCAFG    APCDCAFI    APCDCAFK    APCDCAFR    APCDCAFT
APCDFQA    APCDFQAC    APCDPTAB    
Computerized Public Health Activity Data 3 BNIGVL0    BNIRP1    BNIU    
Women's Health 3 BWGRVL0    BWRPPCD    BWRPSCR    
Diabetes Registry 2 BDMDR5    BDMRML    
IHS HIV Management System 2 BKM11PST    BKM1POST    
IHS RPMS CHR System 2 BCHRL0    BCHRPT1    
Alcohol Chemical Dependency 1 ACDRL0    
Asthma Tracking System 1 BATBLG    
Case Management System 1 ACMRL0    
IHS Release Of Information 1 BRNRU21    
Referred Care Information System 1 BMCRL0    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
PCC Medical Query 1 QMAN DICTIONARY OF TERMS(#9009075)[5.1]    
Taxonomy 1 LAB TAXONOMY(#9002228)[.07]    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
PCC Medical Query 4 QMAN DICTIONARY OF LINKS(#9009071)[4]    QMAN DATA TYPES(#9009074)[22141]
QMAN DICTIONARY OF TERMS(#9009075)[5.1]    QMAN ATTRIBUTE CLASS(#9009077)[35.3]    
Lab Service 2 LABORATORY TEST(#60)[#9009075.02(.01)]    TOPOGRAPHY FIELD(#61)[43]    

Fields, Total: 36

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

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X S X=$G(X) K:$L(X)>65!($L(X)<1)!'(X'?1P.E) X
  • LAST EDITED:  MAR 10, 1993
  • HELP-PROMPT:  ANSWER MUST BE 1-65 CHARACTERS IN LENGTH
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9009075^B
    1)= S ^AMQQ(5,"B",$E(X,1,30),DA)=""
    2)= K ^AMQQ(5,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9009075^SQCTOO^MUMPS
    1)= N %,Y,Z,A S A=$E(X,1,30),%=$P(^AMQQ(5,DA,0),U,20),Y=$P(^(0),U,22),Z=$P(^(0),U,21) S:Y'="" ^AMQQ(5,"SQF",Y,A)="" S:%'="" ^AMQQ(5,"SQC",%,A)="" S:Z'="" ^AMQQ(5,"SQT",Z,A)=""
    2)= N %,Z,Y,A S A=$E(X,1,30),%=$P(^AMQQ(5,DA,0),U,20),Z=$P(^(0),U,21),Y=$P(^(0),U,22) K:Y'="" ^AMQQ(5,"SQF",Y,A) K:%'="" ^AMQQ(5,"SQC",%,A) K:Z'="" ^AMQQ(5,"SQT",Z,A)
  • CROSS-REFERENCE:  9009075^ADTOO^MUMPS
    1)= N % I $D(^AMQQ(5,DA,0)) S %=$P(^(0),U,3) I %'="",X'="COHORT",X'="RANDOM SAMPLE" S ^AMQQ(5,"AD",$E(%,1,30),$E(X,1,30))=""
    2)= N % I $D(^AMQQ(5,DA,0)) S %=$P(^(0),U,3) I %'="" K ^AMQQ(5,"AD",$E(%,1,30),$E(X,1,30))
  • CROSS-REFERENCE:  9009075^AFTOO^MUMPS
    1)= N % I $D(^AMQQ(5,DA,0)) S %=$P(^(0),U,4) I %'="" S ^AMQQ(5,"AF",$E(%,1,30),$E(X,1,30))=""
    2)= N % I $D(^AMQQ(5,DA,0)) S %=$P(^(0),U,4) I %'="" K ^AMQQ(5,"AF",$E(%,1,30),$E(X,1,30))
.02 AKA 1;0 Multiple #9009075.01 9009075.01
.03 GOLD STANDARD 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  APR 12, 1991
  • HELP-PROMPT:  Answer must be 1-12 characters in length.
1 SUBJECT CLASS 0;2 SET
  • 'P' FOR PATIENT;
  • 'V' FOR VISIT;
  • 'H' FOR HEALTH CARE PROVIDER;
  • 'D' FOR DIAGNOSIS;

  • LAST EDITED:  JUN 21, 1991
2 ATTRIBUTE DATA TYPE 0;3 POINTER TO QMAN DATA TYPES FILE (#9009074) QMAN DATA TYPES(#9009074)

  • LAST EDITED:  AUG 12, 1989
  • CROSS-REFERENCE:  9009075^AD^MUMPS
    1)= S ^AMQQ(5,"AD",$E(X,1,30),$P(^AMQQ(5,DA,0),U))=""
    2)= K ^AMQQ(5,"AD",$E(X,1,30),$P(^AMQQ(5,DA,0),U))
3 ATTRIBUTE CLASS 0;4 POINTER TO QMAN ATTRIBUTE CLASS FILE (#9009077) QMAN ATTRIBUTE CLASS(#9009077)

  • LAST EDITED:  SEP 11, 1990
  • CROSS-REFERENCE:  9009075^AF^MUMPS
    1)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" S ^AMQQ(5,"AF",$E(X,1,30),$E(%,1,30))=""
    2)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" K ^AMQQ(5,"AF",$E(X,1,30),$E(%,1,30))
4 LINK 0;5 POINTER TO QMAN DICTIONARY OF LINKS FILE (#9009071) QMAN DICTIONARY OF LINKS(#9009071)

  • LAST EDITED:  JUL 07, 2005
  • CROSS-REFERENCE:  9009075^LINK
    1)= S ^AMQQ(5,"LINK",$E(X,1,30),DA)=""
    2)= K ^AMQQ(5,"LINK",$E(X,1,30),DA)
5 BOOLEAN SYMBOL 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-9 CHARACTERS IN LENGTH
5.1 PARENT 5;1 POINTER TO QMAN DICTIONARY OF TERMS FILE (#9009075) QMAN DICTIONARY OF TERMS(#9009075)

  • LAST EDITED:  MAY 14, 1992
5.2 FAMILY 5;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."7N.N) X
  • LAST EDITED:  MAY 14, 1992
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 6 Decimal Digits
5.3 DESCENDANT ATTRIBUTE CLASS 5;3 POINTER TO QMAN ATTRIBUTE CLASS FILE (#9009077) QMAN ATTRIBUTE CLASS(#9009077)

  • LAST EDITED:  MAY 14, 1992
5.4 MODIFIER 5;4 SET
  • '1' FOR VALUE;
  • '0' FOR ATTRIBUTE;

  • LAST EDITED:  MAY 14, 1992
6 FUNCTION LOCATION 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-9 CHARACTERS IN LENGTH
8 SCRIPT 2;0 WORD-PROCESSING #9009075.08
9 NUMBER OF CONDITIONS 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 20, 1988
  • HELP-PROMPT:  Type a Number between 0 and 9, 0 Decimal Digits
10 GOAL CONTEXT 0;9 SET
  • 'P' FOR PATIENT;
  • 'V' FOR VISIT;
  • 'H' FOR HEALTH CARE PROVIDER;
  • 'I' FOR INFO FROM V FILE;
  • 'D' FOR DIAGNOSIS;

  • LAST EDITED:  SEP 29, 1989
  • CROSS-REFERENCE:  9009075^GOAL^MUMPS
    1)= S ^AMQQ(5,"GOAL",$P(^AMQQ(5,DA,0),U))=""
    2)= K ^AMQQ(5,"GOAL",$P(^AMQQ(5,DA,0),U))
11 SINGULARITY 0;10 SET
  • '0' FOR NO TRUTH OR SINGULARITY;
  • '1' FOR TRUTH;
  • '2' FOR SINGULARITY;
  • '3' FOR COMPUTED;
  • '4' FOR SAVE;

  • LAST EDITED:  JAN 15, 1989
12 FUNCTION OUTPUT HEADER 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • LAST EDITED:  DEC 30, 1988
  • HELP-PROMPT:  Answer must be 1-9 characters in length.
13 TAXONOMY 0;14 SET
  • '0' FOR NONE;
  • '1' FOR TEXT;
  • '2' FOR CODES AND RANGES;
  • '3' FOR STD LOOKUP;
  • '4' FOR SET OF CODES;
  • '5' FOR HYBRID;

  • LAST EDITED:  MAY 23, 1990
14 TAX QUERY 0;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>19!($L(X)<1) X
  • LAST EDITED:  MAY 15, 1989
  • HELP-PROMPT:  Answer must be 1-19 characters in length.
15 TAX DIC GLOBAL 0;16 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>19!($L(X)<1) X
  • LAST EDITED:  MAY 15, 1989
  • HELP-PROMPT:  Answer must be 1-19 characters in length.
16 TAX TRANSLATION CODE 3;E1,245 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  MAY 15, 1989
  • HELP-PROMPT:  Answer must be 1-240 characters in length.
17 TAX XREF 0;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • LAST EDITED:  JUN 25, 1989
  • HELP-PROMPT:  Answer must be 1-9 characters in length.
18 TAX LOOKUP GLOBAL 0;18 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X S X=$G(X) K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  MAR 10, 1993
  • HELP-PROMPT:  Answer must be 1-12 characters in length.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9009075^AC^MUMPS
    1)= I $D(@(U_X_"0)")) N %,Y,Z S %=+$P(@(U_X_"0)"),U,2),Z=$P(^AMQQ(5,DA,0),U,5) I Z,% S Y=$P(^AMQQ(1,Z,0),U,4) I Y=.01 S ^AMQQ(5,"AC",%,Z)=""
    2)= I $D(@(U_X_"0)")) N %,Y,Z S %=+$P(@(U_X_"0)"),U,2),Z=$P(^AMQQ(5,DA,0),U,5) I Z,% S Y=$P(^AMQQ(1,Z,0),U,4) I Y=.01 K ^AMQQ(5,"AC",%,DA)
19 SECURITY CODE 0;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  SEP 16, 1989
  • HELP-PROMPT:  Answer must be 1-3 characters in length.
20 SUBQUERY CONTEXT 0;20 SET
  • 'L' FOR LINK;
  • 'V' FOR VISIT;
  • 'B' FOR BOOLEAN;
  • 'D' FOR DATES;
  • 'N' FOR NULL;
  • 'T' FOR TRUTH;
  • 'C' FOR COMPUTED;
  • 'O' FOR ORDINAL;
  • 'M' FOR MULTIPLE;
  • 'R' FOR RELATIVE DATE;
  • 'P' FOR PLACEHOLDER;
  • 'S' FOR SET OF CODES;

  • LAST EDITED:  MAR 30, 1991
  • CROSS-REFERENCE:  9009075^SQC^MUMPS
    1)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" S ^AMQQ(5,"SQC",X,$E(%,1,30))=""
    2)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" K ^AMQQ(5,"SQC",X,$E(%,1,30))
21 SUBQUERY TYPE 0;21 POINTER TO QMAN DATA TYPES FILE (#9009074) QMAN DATA TYPES(#9009074)

  • LAST EDITED:  JUN 26, 1990
  • CROSS-REFERENCE:  9009075^SQT^MUMPS
    1)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" S ^AMQQ(5,"SQT",X,$E(%,1,30))=""
    2)= N % S %=$P(^AMQQ(5,DA,0),U) I %'="" K ^AMQQ(5,"SQT",X,$E(%,1,30))
40 LAB COMPANION TEST 4.1;0 POINTER Multiple #9009075.02 9009075.02
41 LAB DATA TYPE 4;1 POINTER TO QMAN DATA TYPES FILE (#9009074) QMAN DATA TYPES(#9009074)

  • LAST EDITED:  MAY 21, 1991
  • CROSS-REFERENCE:  9009075^AQ^MUMPS
    1)= D AQ^AMQQMGR3
    2)= D AQKILL^AMQQMGR3
    LAB DATA TYPE XREF
42 LAB ACCESSION NUMBER 4;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 30, 2013
  • HELP-PROMPT:  Type a number between 0 and 9999999999, 0 decimal digits.
43 LAB SITE 4;3 POINTER TO TOPOGRAPHY FIELD FILE (#61) TOPOGRAPHY FIELD(#61)

  • LAST EDITED:  APR 04, 1991
44 LAB HEADER 4;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  APR 04, 1991
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
45 LAB HEADER WIDTH 4;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>64)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 04, 1991
  • HELP-PROMPT:  Type a Number between 1 and 64, 0 Decimal Digits
46 LAB UNITS 4;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>16!($L(X)<1) X
  • LAST EDITED:  APR 04, 1991
  • HELP-PROMPT:  Answer must be 1-16 characters in length.
47 LAB OUTPUT TRANSFORM 4;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<1) X
  • LAST EDITED:  APR 04, 1991
  • HELP-PROMPT:  Answer must be 1-120 characters in length.
99 ENTRY NUMBER COMPUTED

  • MUMPS CODE:  S X=D0
  • ALGORITHM:  S X=D0
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All