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: ^BCHGROUP

Package: IHS RPMS CHR System

Global: ^BCHGROUP


Information

FileMan FileNo FileMan Filename Package
90002.97 CHR GROUP FORM TEMP FILE IHS RPMS CHR System

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
IHS RPMS CHR System 2 BCHEGP    BCHEGP1    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
IHS RPMS CHR System 2 BCHEGP    BCHPOST    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IHS RPMS CHR System 1 CHR GROUP ASSESSMENTS(#90002.98)[.02, .03]    

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
IHS RPMS CHR System 6 CHR RECORD(#90002)[#90002.972101(.01)]    CHR ACTIVITY LOCATIONS(#90002.56)[.06]    CHR HEALTH PROBLEM CODES(#90002.53)[#90002.979101(.01)]    CHR PROGRAMS(#90002.51)[.02]    CHR REFERRALS(#90002.52)[.07, .08]    CHR SERVICE CODES(#90002.54)[#90002.979101(.02)]    
Kernel 1 NEW PERSON(#200)[.03]    
Utility Tables 1 LOCATION(#9999999.06)[.05]    

Fields, Total: 15

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

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JAN 03, 2005
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • CROSS-REFERENCE:  90002.97^B
    1)= S ^BCHGROUP("B",$E(X,1,30),DA)=""
    2)= K ^BCHGROUP("B",$E(X,1,30),DA)
.02 PROGRAM 0;2 POINTER TO CHR PROGRAMS FILE (#90002.51)
************************REQUIRED FIELD************************
CHR PROGRAMS(#90002.51)

  • LAST EDITED:  JAN 03, 2005
.03 CHR PROVIDER 0;3 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JAN 03, 2005
.04 DATE OF SERVICE 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X) K:X>DT X
  • LAST EDITED:  APR 04, 2012
  • HELP-PROMPT:  Enter a Date. Future dates not allowed.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  90002.97^C
    1)= S ^BCHGROUP("C",$E(X,1,30),DA)=""
    2)= K ^BCHGROUP("C",$E(X,1,30),DA)
.05 LOCATION OF ENCOUNTER 0;5 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  JAN 03, 2005
.06 ACTIVITY LOCATION 0;6 POINTER TO CHR ACTIVITY LOCATIONS FILE (#90002.56)
************************REQUIRED FIELD************************
CHR ACTIVITY LOCATIONS(#90002.56)

  • LAST EDITED:  JAN 03, 2005
.07 REFERRED TO CHR BY 0;7 POINTER TO CHR REFERRALS FILE (#90002.52) CHR REFERRALS(#90002.52)

  • LAST EDITED:  JAN 03, 2005
.08 REFERRED FROM CHR TO 0;8 POINTER TO CHR REFERRALS FILE (#90002.52) CHR REFERRALS(#90002.52)

  • LAST EDITED:  JAN 03, 2005
.11 TRAVEL TIME 0;11 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 03, 2005
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
.12 TOTAL NUMBER OF PATIENTS 0;12 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 03, 2005
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
2101 CHR RECORDS 21;0 POINTER Multiple #90002.972101 90002.972101
5101 SUBJECTIVE 51;0 WORD-PROCESSING #90002.975101
6101 OBJECTIVE 61;0 WORD-PROCESSING #90002.976101
7101 PLANS/TREATMENTS 71;0 WORD-PROCESSING #90002.977101
9101 ASSESSMENTS 91;0 POINTER Multiple #90002.979101 90002.979101
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All