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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^HBHC(633.2

Package: Hospital Based Home Care

Global: ^HBHC(633.2


Information

FileMan FileNo FileMan Filename Package
633.2 HBHC MEDICAL FOSTER HOME Hospital Based Home Care

Description

Directly Accessed By Routines, Total: 30

Package Total Routines
Hospital Based Home Care 30 DIETITIAN INSPECTION    END OF LIFE ISSUES TRAIN DATE    FIRE/SAFETY INSPECTION    FIRE/SAFETY TRAINING DATE    HBHCDEM    HBHCFILE    HBHCPS24    HBHCRP10
HBHCRP26    HBHCRP27    HBHCRP28    HBHCRP29    HBHCRP30    HBHCRP31    HBHCTXT2    HBHCUPDM
HBHCUTL1    ^HBHC(633.2    ^HBHC(634.7    HBHCUTL5    HBHCWORK    HBHCXMM    HBHCXMT    HOME OPERATION TRAINING DATE
INFECTION CONTROL TRAIN DATE    MEDICATION MANAGEMENT TRN DATE    NURSE INSPECTION    OTHER TRAINING DATE    PERSONAL CARE TRAINING DATE    SOCIAL WORK INSPECTION    

Accessed By FileMan Db Calls, Total: 6

Package Total Routines
Hospital Based Home Care 6 HBHCDEM    HBHCPS24    HBHCUPDM    HBHCUTL5    HBHCWORK    HBHCXMT    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Hospital Based Home Care 2 HBHC PATIENT(#631)[89]    HBHC MEDICAL FOSTER HOME ERROR(S)(#634.7)[.01]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Hospital Based Home Care 1 HBHC VALID STATE CODE(#631.8)[9]    
Kernel 1 NEW PERSON(#200)[32#633.213(1)#633.214(1)#633.215(1)#633.216(1)]    
Registration 1 MEDICAL CENTER DIVISION(#40.8)[35]    

Fields, Total: 36

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  OCT 31, 2007
  • HELP-PROMPT:  Answer with Medical Foster Home (MFH) Name. Answer must be 3-30 alphanumeric characters in length.
  • DESCRIPTION:  
    This field represents the HBHC Medical Foster Home (MFH) Name.
  • CROSS-REFERENCE:  633.2^B
    1)= S ^HBHC(633.2,"B",$E(X,1,30),DA)=""
    2)= K ^HBHC(633.2,"B",$E(X,1,30),DA)
1 OPENED DATE 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:3991231X) X
  • LAST EDITED:  JUL 20, 2006
  • HELP-PROMPT:  Answer with Date the Medical Foster Home (MFH) was Opened. Answer must be between 1/1/2000 & 12/31/2099 inclusive.
  • DESCRIPTION:  
    This field represents the Date the Medical Foster Home was Opened.
2 PRIMARY CAREGIVER NAME 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<3)!($L(X,",")'=2)!(X'?1.E1","1.E) X
  • LAST EDITED:  JUL 19, 2006
  • HELP-PROMPT:  Answer with the Primary Caregiver Name, using lastname, firstname format.
  • DESCRIPTION:  
    This field represents the Primary Caregiver Name for the Medical Foster Home (MFH).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
3 MAXIMUM PATIENTS 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>3)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 19, 2006
  • HELP-PROMPT:  Answer with Number between 1 and 3 inclusive, for Maximum Patients for Medical Foster Home (MFH).
  • DESCRIPTION:  
    This field represents the Maximum Patients for the Medical Foster Home (MFH).
4 BEDBOUND PATIENT MAXIMUM 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>2)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 03, 2006
  • HELP-PROMPT:  Answer with number between 0 and 2, inclusive, for Bedbound Patient Maximum for Medical Foster Home (MFH).
  • DESCRIPTION:  
    This field represents the Bedbound Patient Maximum for the Medical Foster Home (MFH).
5 CLOSURE DATE 0;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:3991231X) X
  • LAST EDITED:  JUL 19, 2006
  • HELP-PROMPT:  Answer with the Medical Foster Home (MFH) Closure Date. Answer must be between 1/1/2000 & 12/31/2099 inclusive.
  • DESCRIPTION:  
    This field represents Date of Medical Foster Home (MFH) Closure.
6 VOLUNTARY CLOSURE 0;7 SET
  • 'Y' FOR Yes;
  • 'N' FOR No;

  • LAST EDITED:  JUL 19, 2006
  • HELP-PROMPT:  Answer with 1 alphanumeric digit representing whether Medical Foster Home (MFH) Closure was Voluntary.
  • DESCRIPTION:  
    This field represents whether Medical Foster Home (MFH) Closure was Voluntary.
7 ADDRESS 0;8 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  FEB 21, 2007
  • HELP-PROMPT:  Answer with Medical Foster Home (MFH) street Address. Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field represents the Medical Foster Home (MFH) street Address.
8 CITY 0;9 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  AUG 28, 2008
  • HELP-PROMPT:  Answer with Medical Foster Home (MFH) City. Answer must be 3-15 characters in length.
  • DESCRIPTION:  
    This field represents the Medical Foster Home (MFH) City.
9 STATE CODE 0;10 POINTER TO HBHC VALID STATE CODE FILE (#631.8)
************************REQUIRED FIELD************************
HBHC VALID STATE CODE(#631.8)

  • LAST EDITED:  MAY 14, 2007
  • HELP-PROMPT:  Answer with 2 digit numeric State Code. State Codes must exist in State file (#5). State Code must exist in HBHC VALID STATE CODE file (#631.8).
  • DESCRIPTION:  
    This field represents the 2 digit numeric State Code where Medical Foster Home (MFH) is located. All State Codes must exist in State file (#5). State Code must exist in HBHC VALID STATE CODE file (#631.8).
10 ZIP CODE 0;11 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<5) X
  • LAST EDITED:  FEB 21, 2007
  • HELP-PROMPT:  Answer with either 5 digit or 9 digit ZIP Code of Medical Foster Home (MFH).
  • DESCRIPTION:  
    This field represents either the 5 digit or 9 digit ZIP Code of Medical Foster Home (MFH).
11 LICENSE REQUIRED 0;12 SET
************************REQUIRED FIELD************************
  • 'Y' FOR Yes;
  • 'N' FOR No;

  • LAST EDITED:  FEB 21, 2007
  • HELP-PROMPT:  Answer with 1 digit alphanumeric code representing whether Medical Foster Home (MFH) Requires a License.
  • DESCRIPTION:  
    This field represents the 1 digit alphanumeric code indicating whether Medical Foster Home (MFH) Requires a License.
12 LICENSE EXPIRATION DATE 0;13 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:3991231X) X
  • LAST EDITED:  APR 29, 2008
  • HELP-PROMPT:  Answer with Date the Medical Foster Home (MFH) License Expires. Answer with date between 1/1/2000 & 12/31/2099 inclusive.
  • DESCRIPTION:  
    This field represents the Medical Foster Home (MFH) License Expiration Date.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
13 NURSE INSPECTION 1;0 DATE Multiple #633.213 633.213

  • LAST EDITED:  APR 29, 2008
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Nurse Inspection multiple.
14 SOCIAL WORK INSPECTION 2;0 DATE Multiple #633.214 633.214

  • DESCRIPTION:  
    This subfile represents Medical Foster Home (MFH) Social Work Inspection multiple.
15 DIETITIAN INSPECTION 3;0 DATE Multiple #633.215 633.215

  • LAST EDITED:  AUG 08, 2007
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Dietitian Inspection multiple.
16 FIRE/SAFETY INSPECTION 4;0 DATE Multiple #633.216 633.216

  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Fire/Safety Inspection multiple.
17 PHONE NUMBER 0;14 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<4)!'(X?4.20NP) X
  • LAST EDITED:  MAY 14, 2007
  • HELP-PROMPT:  Answer must be 4-20 characters in length. Only numeric/punctuation characters accepted. Field represents Phone Number of Medical Foster Home (MFH).
  • DESCRIPTION:  
    This field represents the Phone Number of the Medical Foster Home (MFH).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
18 HOME OPERATION TRAINING DATE 5;0 DATE Multiple #633.218 633.218

  • LAST EDITED:  APR 02, 2007
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Home Operation Training Date multiple.
19 FIRE/SAFETY TRAINING DATE 6;0 DATE Multiple #633.219 633.219

  • LAST EDITED:  APR 17, 2007
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Fire/Safety Training Date multiple.
20 MEDICATION MANAGEMENT TRN DATE 7;0 DATE Multiple #633.21 633.21

  • LAST EDITED:  APR 17, 2007
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Medication Management Training Date multiple.
21 PERSONAL CARE TRAINING DATE 8;0 DATE Multiple #633.221 633.221

  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Personal Care Training Date multiple.
22 INFECTION CONTROL TRAIN DATE 9;0 DATE Multiple #633.222 633.222

  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Infection Control Training Date multiple.
23 END OF LIFE ISSUES TRAIN DATE 10;0 DATE Multiple #633.223 633.223

  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) End of Life Issues Training Date multiple.
24 OTHER TRAINING DATE 11;0 DATE Multiple #633.224 633.224

  • LAST EDITED:  APR 17, 2007
  • DESCRIPTION:  
    This subfile represents the Medical Foster Home (MFH) Other Training Date multiple.
25 COUNTY CODE 0;15 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S Z0=$S($P($G(^HBHC(633.2,D0,0)),U,10):+^HBHC(631.8,$P(^HBHC(633.2,D0,0),U,10),0),1:0) K:'Z0 X Q:'Z0!'$D(^DIC(5,Z0,1,0)) S DIC="^DIC(5,Z0,1,",DIC(0)="QEM" D ^DIC S X=+Y K:Y'>0 X K Z0,DIC
  • OUTPUT TRANSFORM:  S Y(0)=Y Q:Y']"" S Z0=$S($P($G(^HBHC(633.2,D0,0)),U,10):+^HBHC(631.8,$P(^HBHC(633.2,D0,0),U,10),0),1:"") Q:'Z0 S Y=$P($S($D(^DIC(5,Z0,1,Y,0)):^(0),1:""),U)_" ("_$P($S($D(^(0)):^(0),1:""),U,3)_")"
  • LAST EDITED:  DEC 07, 2015
  • HELP-PROMPT:  Answer with 3 digit numeric county code, or county name, of county where Medical Foster Home (MFH) is located. County codes are checked for validity of State Code entered.
  • DESCRIPTION:  This field represents 3 digit numeric code of County, in State file (#5), of Medical Foster Home (MFH) location. County codes are checked for validity of State Code entered. Input transform also validates State for
    existence in HBHC VALID STATE CODE file (#631.8).
    Output transform displays both County Name & County Code in (nnn).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
26 CAREGIVER DATE OF BIRTH 0;16 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S DOB21=DT-210000 S X=Y K:X>DOB21&(X'=DOB21) X K:Y=-1 X
  • LAST EDITED:  OCT 19, 2017
  • HELP-PROMPT:  Answer with Caregiver Date of Birth. Caregiver must be 21 years of age or older.
  • DESCRIPTION:  
    This field represents the Caregiver Date of Birth. Caregiver must be over 21 years of age or older.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
27 FORM 7 TRANSMIT STATUS 12;1 SET
  • 'F' FOR Record in Transmit File;
  • 'N' FOR Record Needs Transmitting;
  • 'T' FOR Record Transmitted;

  • LAST EDITED:  JAN 25, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Field updated with record transmit status.
  • DESCRIPTION:  This field represents Form 7 (Medical Foster Home (MFH)) Transmit Status. Field will contain either 'F' (Record in Transmit File), 'N' (Record Needs Transmitting), or 'T' (Record Transmitted). Field updated by package
    only, no user input.
  • CROSS-REFERENCE:  633.2^AC
    1)= S ^HBHC(633.2,"AC",$E(X,1,30),DA)=""
    2)= K ^HBHC(633.2,"AC",$E(X,1,30),DA)
    This cross-reference represents regular 'AC' file index of HBHC Medical Foster Home file (#633.2), Form 7 (Medical Foster Home) Transmit Status field (#27). Form 7 Transmit Status field updated by package only, no user
    input.
28 FORM 7 FILED IN HBHC(634) 12;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 15, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Field represents Date/Time Form 7 filed in Transmit file.
  • DESCRIPTION:  This field represents date & time Form 7 (Medical Foster Home (MFH)) record was filed in Transmit (634) file. Field transmitted to Austin for unique record identification purposes. Field updated by package only, no user
    input.
29 FORM 7 BATCH INITIAL MM MSG # 12;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Number represents first MM msg # in transmission batch. Record may be transmitted in different msg, if multiple msgs transmitted.
  • DESCRIPTION:  This field represents MailMan message number of 'First' MailMan message in Austin transmission batch. Record 'may' be transmitted in different message, if multiple messages are transmitted in one transmission batch.
    Field updated by package only, no user input.
30 FORM 7 MAIL MESSAGE DATE 12;4 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Field represents Date of Form 7 Medical Foster Home (MFH) record transmission via MailMan to Austin.
  • DESCRIPTION:  
    This field represents date of Form 7 (Medical Foster Home (MFH)) record transmission via MailMan to Austin. Field updated by package only, no user input.
31 FORM 7 TRANSMIT FLAG EDIT DATE 12;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated be package only, no user input. Field is updated with current date when user requests Form 7 Transmit Status Flag by reset (allowing editing of transmitted record).
  • DESCRIPTION:  
    This field represents date Form 7 (Medical Foster Home (MFH)) Transmit Status Flag was requested by user to be reset (allowing editing of previously transmitted record). Field updated by package only, no user input.
32 FORM 7 TRANSMIT FLAG EDIT DUZ 12;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Field is updated with user's DUZ when user requests Form 7 Transmit Status Flag be reset (allowing editing of transmitted record).
  • DESCRIPTION:  
    This field represents the user requesting Form 7 (Medical Foster Home (MFH)) Transmit Status Flag be reset (allowing editing of previously transmitted record). Field updated by package only, no user input.
33 FORM 7 RE-TRANS BATCH MM MSG # 12;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Number represents first MM msg # in re-transmission batch. Record may be transmitted in different msg, if multiple msgs transmitted.
  • DESCRIPTION:  This field represents MailMan message number of 'First' MailMan message in re-transmission batch to Austin. Record 'may' be transmitted in different message, if multiple messages are transmitted in one re-transmission
    batch. Field updated by package only, no user input.
34 FORM 7 RE-TRANSMIT DATE 12;8 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 24, 2008
  • HELP-PROMPT:  Field updated by package only, no user input. Field represents Date of Form 7 Medical Foster Home (MFH) record re-transmission via MailMan to Austin..
  • DESCRIPTION:  
    This field represents date of Form 7 (Medical Foster Home (MFH)) record re-transmission via MailMan to Austin. Field updated by package only, no user input.
35 PARENT SITE 13;1 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
************************REQUIRED FIELD************************
MEDICAL CENTER DIVISION(#40.8)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^HBHC(631.9,1,1,""B"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 02, 2021
  • HELP-PROMPT:  Select the HBPC Program Facility associated to this Medical Foster Home.
  • DESCRIPTION:  The Parent Site prompt provides selection of the HBPC Program Facility which has been defined in the local HBHC SITE PARAMETERS (#631.9) file. If only one site has been defined as a parent site, that site will default into
    this prompt for selection. Otherwise, users will be required to select the HBPC Program Facility associated to the Medical Foster Home.
    The selected site's code will be used for AITC record transmissions for this Medical Foster Home and for patients in this Medical Foster Home.
    If you are not locating the appropriate HBPC Program Site for selection, please contact your HBPC Program Manager for assistance.
  • TECHNICAL DESCR:  
    Entries in this field must be predefined in the PARENT SITE (#9) multiple field of the HBHC SYSTEM PARAMETERS (#631.9) file.
  • SCREEN:  I $D(^HBHC(631.9,1,1,"B",+Y))
  • EXPLANATION:  Entry must be pre-defined as a parent site in the HBHC SYSTEM PARAMETERS (#631.9) file.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

External References

Name Field # of Occurrence
^%DT 1+1, 5+1, 12+1, 26+1, 28+1, 30+1, 31+1, 34+1
^DIC 25+1, 35+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] 25+1, 25OT+1
^HBHC(631.8 - [#631.8] 25+1, 25OT+1
^HBHC(631.9 - [#631.9] 35SCR+1
^HBHC(633.2 - [#633.2] .01(XREF 1S), .01(XREF 1K), 25+1, 25OT+1, 27(XREF 1S), 27(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 25OT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 1+1*, 5+1*, 12+1*, 26+1*, 28+1*, 30+1*, 31+1*, 34+1*
>> D0 25+1, 25OT+1
>> DA .01(XREF 1S), .01(XREF 1K), 27(XREF 1S), 27(XREF 1K)
DIC 25+1*!, 35+1!*
DIC("S" 35+1*
DIC(0 25+1*
>> DIE 35+1
>> DOB21 26+1*
DT 26+1
U 25+1, 25OT+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 2+1!, 3+1!, 4+1!, 5+1*!, 7+1!, 8+1!
, 10+1!, 12+1*!, 17+1!, 25+1!*, 26+1*!, 27(XREF 1S), 27(XREF 1K), 28+1*!, 29+1!, 30+1*!
, 31+1*!, 33+1!, 34+1*!, 35+1*!
>> Y 1+1, 5+1, 12+1, 25+1, 25OT+1*, 26+1, 28+1, 30+1, 31+1, 34+1
, 35+1, 35SCR+1
>> Y(0 25OT+1*
Z0 25+1*!, 25OT+1*
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All