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 |  Fields |  All
Print Page as PDF
Global: ^IBQ(538

Package: Utilization Management Rollup

Global: ^IBQ(538


Information

FileMan FileNo FileMan Filename Package
538 UTILIZATION MANAGEMENT ROLLUP Utilization Management Rollup

Description

Directly Accessed By Routines, Total: 12

Package Total Routines
Utilization Management Rollup 12 IBQL538    IBQLD1    IBQLD2    IBQLD3    IBQLD4    IBQLPRG    IBQLR1    IBQLR2
IBQLR3    IBQLR4    IBQLSCR    IBQLT    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Utilization Management Rollup 2 IBQLLD1    IBQLPRG    

Fields, Total: 23

Field # Name Loc Type Details
.01 ENTRY ID 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<1001)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Type a Number between 1001 and 99999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is a unique number assigned by the Claims Tracking entry. The first 3 characters of the number are the stations site number.
  • CROSS-REFERENCE:  538^B
    1)= S ^IBQ(538,"B",$E(X,1,30),DA)=""
    2)= K ^IBQ(538,"B",$E(X,1,30),DA)
.02 SITE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<3) X
  • LAST EDITED:  SEP 28, 1995
  • HELP-PROMPT:  Answer must be 3-7 characters in length.
  • DESCRIPTION:  
    This is a 3 digit station number plus any modifiers.
  • CROSS-REFERENCE:  538^ASITE^MUMPS
    1)= S IBQ=$P($G(^IBQ(538,DA,1)),"^",8) I IBQ]"" S ^IBQ(538,"ASITE",X,IBQ,DA)=""
    2)= S IBQ=$P($G(^IBQ(538,DA,1)),"^",8) I IBQ]"" K ^IBQ(538,"ASITE",X,IBQ,DA)
    This MUMPS cross-reference index 'ASITE' of the SITE field works with the MUMPS cross-reference index 'ASITE1' of the ROLLUP DATE in setting up the "ASITE" cross reference.
.03 SSN 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X
  • LAST EDITED:  AUG 09, 1995
  • HELP-PROMPT:  Answer must be 9 characters in length.
  • DESCRIPTION:  
    This is a nine digit Social Security Number field.
  • CROSS-REFERENCE:  538^C
    1)= S ^IBQ(538,"C",$E(X,1,30),DA)=""
    2)= K ^IBQ(538,"C",$E(X,1,30),DA)
    Cross reference used to lookup Entry ID by SSN.
.04 ADMITTING DIAGNOSIS 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<1) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Answer must be 1-7 characters in length.
  • DESCRIPTION:  
    ICD 9 Code Number
.05 ENROLLEMENT CODE 0;5 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<3) X
  • LAST EDITED:  APR 18, 1995
  • HELP-PROMPT:  Answer must be 3-5 characters in length.
  • DESCRIPTION:  
    This field contains the three internal enrollement sample codes (Random, Disease specific, or Local) from the Claims Tracking entry seperated by hyphens.  Example: 1--, 0-3-0, 0-0-1.
.06 ADMITTING PHYSICIAN CODE 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 18, 1995
  • HELP-PROMPT:  Type a NEW PERSON IEN Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    Contains the Physician's IEN number from the NEW PERSON File (#200)
.07 ATTENDING PHYSICIAN CODE 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 18, 1995
  • HELP-PROMPT:  Type a NEW PERSON IEN Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    Contains the Physician's IEN number from the NEW PERSON File (#200).
.08 RESIDENT PHYSICIAN CODE 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 18, 1995
  • HELP-PROMPT:  Type a NEW PERSON IEN Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    Contains the Physician's IEN number from the NEW PERSON File (#200).
.09 ACUTE CARE ADMISSION DATE 0;9 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 18, 1995
.1 ACUTE CARE DISCHARGE DATE 0;10 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 18, 1995
  • CROSS-REFERENCE:  538^ADIS
    1)= S ^IBQ(538,"ADIS",$E(X,1,30),DA)=""
    2)= K ^IBQ(538,"ADIS",$E(X,1,30),DA)
    This is a regular cross-reference indexing ACUTE CARE DISCHARGE DATE for quicker date range reporting.
.11 WARD 0;11 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Enter the ward on which the patient was placed.
  • DESCRIPTION:  
    Enter in this field the name of the ward location as selectable using bed control options in MAS.
.12 TREATING SPECIALTY 0;12 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Enter the Treating Specialty assigned to this patient with this movement.
  • DESCRIPTION:  
    Contains the name of the facility treating specialty.  Types of treating specialties may vary between Facilities.
.13 ACUTE ADMISSION (Y/N)? 0;13 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 18, 1995
1.01 SEVERITY OF ILLNESS 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Answer with SI/IS CATEGORIES CODE, 2 characters in length.
  • DESCRIPTION:  
    Enter the Severity of Illness (SI) category code that best describes the criteria met for continued stay days of care. Select the PRIMARY category for the reason.
1.02 INTENSITY OF SERVICE 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Answer with SI/IS CATEGORIES CODE, 2 characters in length.
  • DESCRIPTION:  
    Enter the Intensity of Service (IS) category code that best describes the criteria met for continued stay days of care.  Select the PRIMARY category for this reason.
1.03 REASON FOR NON-ACUTE ADMISSION 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<4) X
  • LAST EDITED:  JUN 29, 1995
  • HELP-PROMPT:  Answer with NON-ACUTE CLASSIFICATIONS CODE seperated by space if more than one, 4-18 characters in length.
  • DESCRIPTION:  
    This is the external reference which is uniquely known.
1.04 PROVIDER INTERVIEWED (Y/N)? 1;4 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 18, 1995
1.05 ADMISSION INFLUENCED (Y/N)? 1;5 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 18, 1995
1.06 LOCAL, NATIONAL, OR BOTH 1;6 SET
************************REQUIRED FIELD************************
  • 'L' FOR LOCAL;
  • 'N' FOR NATIONAL;
  • 'B' FOR BOTH;

  • LAST EDITED:  MAY 12, 1995
1.07 SERVICE 1;7 SET
************************REQUIRED FIELD************************
  • 'M' FOR MEDICINE;
  • 'S' FOR SURGERY;
  • 'P' FOR PSYCHIATRY;
  • 'NH' FOR NHCU;
  • 'NE' FOR NEUROLOGY;
  • 'I' FOR INTERMEDIATE MED;
  • 'R' FOR REHAB MEDICINE;
  • 'SCI' FOR SPINAL CORD INJURY;
  • 'D' FOR DOMICILIARY;
  • 'B' FOR BLIND REHAB;
  • 'RE' FOR RESPITE CARE;

  • LAST EDITED:  JUL 06, 1995
  • HELP-PROMPT:  Enter the SERVICE Code describing this admission review.
  • DESCRIPTION:  
    This field contains the Service code for the entries Admission review.
1.08 ROLLUP DATE 1;8 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 26, 1995
  • DESCRIPTION:  
    This field is for National Database use.  It will hold the date of transmission to the National Database.
  • CROSS-REFERENCE:  538^ASITE1^MUMPS
    1)= S IBQ=$P(^IBQ(538,DA,0),"^",2) I IBQ]"" S ^IBQ(538,"ASITE",IBQ,X,DA)=""
    2)= S IBQ=$P(^IBQ(538,DA,0),"^",2) I IBQ]"" K ^IBQ(538,"ASITE",IBQ,X,DA)
    This cross reference index 'ASITE1' of the ROLLUP DATE field works with the MUMPS cross reference index 'ASITE' of the SITE field in setting up the "ASITE" cross reference.
1.09 ARCHIVED? 1;9 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  SEP 26, 1995
  • DESCRIPTION:  
    This field is for National Database use.  This field will be true on the National Database if the entry has been archived to tape.
13 DAY 13;0 Multiple #538.113 538.113

  • DESCRIPTION:  
    Contains Continued Stay Reviews.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Fields |  All