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

Package: IHS GPRA Information System

Global: ^BGPTAXKB


Information

FileMan FileNo FileMan Filename Package
90554.09 BGP 15 TAXONOMY TEMP IHS GPRA Information System

Description

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Kernel 2 PACKAGE(#9.4)[#90554.13101(.01)]    NEW PERSON(#200)[.05]    
MailMan 1 BULLETIN(#3.6)[.07]    
PCC Medical Query 1 QMAN DICTIONARY OF LINKS(#9009071)[.12]    
Utility Tables 1 LOCATION(#9999999.06)[.03.18]    
VA Fileman 1 FILE(#1)[.15]    

Fields, Total: 24

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

  • INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JAN 02, 2006
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • DELETE TEST:  .01,0)= I '$D(ATXDEL)
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  90554.09^B
    1)= S ^BGPTAXKB("B",$E(X,1,30),DA)=""
    2)= K ^BGPTAXKB("B",$E(X,1,30),DA)
.02 BRIEF DESCRIPTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAY 27, 1990
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.03 LOCATION 0;3 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  APR 17, 1991
  • HELP-PROMPT:  Enter the visit location for which bulletins are to be sent. No location entered means bulletins sent regardless of where the patient was seen.
.04 NODELETE 0;4 SET
  • 'n' FOR NODELETE;
.05 CREATOR 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUL 14, 1994
.06 STARTING DATE FOR PATIENT LIST 0;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1!(DT+10000
  • LAST EDITED:  APR 12, 1991
  • HELP-PROMPT:  Enter the date you would like the patient list to begin. You may start from any date in the past or a future date up to one year from today.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 BULLETIN 0;7 POINTER TO BULLETIN FILE (#3.6) BULLETIN(#3.6)

  • LAST EDITED:  MAR 01, 1993
  • HELP-PROMPT:  ENTER THE NAME OF THE BULLETIN ASSOCIATED WITH THIS TAXONOMY
.08 CREATED BY TAXONOMY SYSTEM 0;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAR 07, 1990
  • HELP-PROMPT:  TO BE ENTERED BY SOFTWARE ONLY!
.09 DATE CREATED 0;9 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 12, 1990
.11 BULLETIN SERVICE CATEGORY 0;11 SET
  • 'A' FOR AMBULATORY;
  • 'H' FOR HOSPITALIZATION;
  • 'B' FOR BOTH AMBULATORY AND HOSPITALIZATION;

  • LAST EDITED:  AUG 16, 1990
  • HELP-PROMPT:  Enter the service category type for which you would like a bulletin issued.
.12 QMAN LINK 0;12 POINTER TO QMAN DICTIONARY OF LINKS FILE (#9009071) QMAN DICTIONARY OF LINKS(#9009071)

  • LAST EDITED:  FEB 25, 1991
  • CROSS-REFERENCE:  90554.09^AC
    1)= S ^BGPTAXKB("AC",$E(X,1,30),DA)=""
    2)= K ^BGPTAXKB("AC",$E(X,1,30),DA)
.13 NON-CANONIC 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 25, 1991
  • HELP-PROMPT:  If an entry in the file for which you are creating a taxonomy can have leading or trailing zeros, enter yes. For example, the ICD Diagnosis Code 250.00 or the dental code 0110. Otherwise enter no.
.14 X-REF 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<1) X
  • LAST EDITED:  FEB 25, 1991
  • HELP-PROMPT:  Enter the X-Ref used to determine range.
.15 FILE 0;15 POINTER TO FILE FILE (#1) FILE(#1)

  • LAST EDITED:  MAR 11, 1992
  • HELP-PROMPT:  Enter the name of the file which is the source for entries in the taxonomy file.
.16 RANGE 0;16 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 25, 1991
  • HELP-PROMPT:  If the file for which this taxonomy is being created contains code numbers (e.g. ICD file) answer 1 or YES.
.17 SEND BULLETIN IF RECENTLY SENT 0;17 SET
  • 'N' FOR NO;
  • 'Y' FOR YES;

  • LAST EDITED:  JUN 05, 1992
  • HELP-PROMPT:  Enter if you want another bulletin sent if the same diagnosis was entered for this patient within a 30 day period
.18 LOCATION OF ENCOUNTER 0;18 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  OCT 26, 1992
  • HELP-PROMPT:  Indicate visit location for which patients are to be entered. If no location is entered, patients will be entered into this taxonomy regardless of location of encounter.
.19 SEND BULLETIN-1ST VISIT ONLY 0;19 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 08, 1996
  • HELP-PROMPT:  A 'YES' answer will send a Mail Bulletin ONLY on First Visit
  • EXECUTABLE HELP:  W !,"A REVIST for same DX will NOT send Bulletin"
.21 VISIT TYPE 0;21 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1)!'(X?1.9AN) X
  • LAST EDITED:  JUL 15, 1996
  • HELP-PROMPT:  Enter any Visit Type Code combination for which you wish to receive a Bulletin - up to 9 characters
  • EXECUTABLE HELP:  W !,?5,"I=IHS C=CONTRACT T=TRIBE O=OTHER 6=TRIBE/638 V=VA P=TRIBE/COMPACT",!,?5,"U=URBAN S=STATE",!!,?5,"Example- CI would send bulletins Only on CONTRACT & IHS",!
.22 READ ONLY 0;22 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUL 19, 2004
  • HELP-PROMPT:  Enter yes if this taxonomy is view/read only.
1101 EXTENDED DESCRIPTION 11;0 WORD-PROCESSING #90554.10101
2101 VALUE 21;0 Multiple #90554.11101 90554.11101
3101 PRE BULLETIN CODE 31;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 10, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
4101 PACKAGE 41;0 POINTER Multiple #90554.13101 90554.13101
Info |  Desc |  Pointer To FileMan Files |  Fields |  All