Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Pointer To FileMan Files |  Fields |  All
Print Page as PDF
Global: ^DBTSPAT

Package: Uncategorized

Global: ^DBTSPAT


Information

FileMan FileNo FileMan Filename Package
1419200 DBTS PATIENT Uncategorized

Description

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
IHS Patient 1 PATIENT(#9000001)[.01]    

Fields, Total: 66

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • INPUT TRANSFORM:  I X'="" S DINUM=X
  • LAST EDITED:  JAN 05, 1999
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  1419200^B
    1)= S ^DBTSPAT("B",$E(X,1,30),DA)=""
    2)= K ^DBTSPAT("B",$E(X,1,30),DA)
.02 NAME-LAST UPDATE TO SQL 0;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
1 BP-LAST DFN BP;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
1.01 BP-DATE LAST SENT BP;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
2 WT-LAST DFN WT;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
2.01 WT-DATE LAST SENT WT;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
  • DESCRIPTION:  
    3
3 HT-LAST DFN HT;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
3.01 HT-DATE LAST SENT HT;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
4 AMPUTATION-LAST DFN AMP;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
4.01 AMPUTATION-DATE LAST SENT AMP;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
5 BREAST EXAM-LAST DFN BRE;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
5.01 BREAST EXAM-DATE LAST SENT BRE;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
6 DENTAL EXAM-LAST DFN DEN;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
6.01 DENTAL EXAM-DATE LAST SENT DEN;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
7 EKG-LAST DFN EKG;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
7.01 EKG-DATE LAST SENT EKG;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
8 EYE EXAM-LAST DFN EYE;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
8.01 EYE EXAM-DATE LAST SENT EYE;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
9 FOOT CHECK-LAST DFN FTC;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
9.01 FOOT CHECK-DATE LAST SENT FTC;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
10 FOOT EXAM-LAST DFN FTE;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
10.01 FOOT EXAM-DATE LAST SENT FTE;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
11 IMMUNIZATION-LAST DFN IMM;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
11.01 IMMUNIZATION-DATE LAST SENT IMM;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
12 MEDICATION-LAST DFN MED;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
12.01 MEDICATIONS-DATE LAST SENT MED;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
13 PELVIC EXAM-LAST DFN PEL;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
13.01 PELVIC EXAM-DATE LAST SENT PEL;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
14 PPD-LAST DFN PPD;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
14.01 PPD-DATE LAST SENT PPD;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
15 RECTAL EXAM-LAST DFN REC;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
15.01 RECTAL EXAM-DATE LAST SENT REC;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
16 EDUCATION-LAST DFN EDU;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
16.01 EDUCATION-DATE LAST SENT EDU;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
17 FAMILY HISTORY-LAST DFN FAM;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 12, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
17.01 FAMILY HISTORY-DATE LAST SENT FAM;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 12, 1999
18 HAC-LAST DFN HAC;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
18.01 HAC-DATE LAST SENT HAC;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
19 HDL-LAST DFN HDL;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
19.01 HDL-DATE LAST SENT HDL;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
20 LDL-LAST DFN LDL;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
20.01 LDL-DATE LAST SENT LDL;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
21 TOTAL CHOLESTORAL-LAST DFN CHO;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
21.01 TOTAL CHOL-DATE LAST SENT CHO;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
22 CREATININE-LAST DFN CRE;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
22.01 CREATININE-LAST DATE SENT CRE;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
23 ALBUMIN-LAST DFN ALB;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
23.01 ALBUMIN-LAST DATE SENT ALB;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
24 TRIGLYCERIDE-LAST DFN TRI;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 05, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
24.01 TRIGLYCERIDE-LAST DATE SENT TRI;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 1999
25 LIPIDS-LAST VISIT DFN LIP;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 13, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
25.01 LIPIDS-LAST DATE SENT LIP;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 13, 1999
26 RENAL-LAST VISIT DFN REN;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 13, 1999
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
26.01 RENAL-LAST DATE SENT REN;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 13, 1999
27 CARDIAC-LAST VISIT DFN CAR;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 26, 1999
  • HELP-PROMPT:  Type a Number between 0 and 99999999999999, 0 Decimal Digits
27.01 CARDIAC-DATE LAST SENT CAR;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 26, 1999
28 VISIT-LAST DFN V;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 04, 1999
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 0 Decimal Digits
28.01 VISIT-DATE LAST SENT V;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 04, 1999
29 DIAG-LAST DFN ICD;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 09, 1999
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 0 Decimal Digits
29.01 DIAG-DATE LAST SENT ICD;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 09, 1999
30 PROCEDURE-LAST DFN PRC;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 09, 1999
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 0 Decimal Digits
30.01 PROCEDURE-DATE LAST SENT PRC;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 09, 1999
31 PROBLEM-LAST DFN PROB;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 02, 1999
  • HELP-PROMPT:  Type a Number between 0 and 999999999999, 0 Decimal Digits
31.01 PROBLEM-DATE LAST SENT PROB;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 02, 1999
40 NEW DATA CHECK DATE/TIME A;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 29, 1999
40.01 NEW DATA SWITCHES A;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
  • LAST EDITED:  OCT 29, 1999
  • HELP-PROMPT:  Answer must be 1-200 characters in length.
Info |  Desc |  Pointer To FileMan Files |  Fields |  All