Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^IBA(351.81

Package: Integrated Billing

Global: ^IBA(351.81


Information

FileMan FileNo FileMan Filename Package
351.81 LTC COPAY CLOCK Integrated Billing

Description

Accessed By FileMan Db Calls, Total: 8

Package Total Routines
Integrated Billing 8 IBAECB1    IBAECC    IBAECM2    IBAECP    IBAECP1    IBAECU    IBARXMI    IBOMTLTC

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[4.01, 4.03]    
Registration 1 PATIENT(#2)[.02]    

Fields, Total: 12

Field # Name Loc Type Details
.01 FACILITY CLOCK NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1000)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 24, 2002
  • HELP-PROMPT:  Type a Number between 1000 and 999999999999, 0 Decimal Digits.
  • DESCRIPTION:  
    This number is formed by Concatenating the Facility Site number with the next available entry number in the file.
  • CROSS-REFERENCE:  351.81^B
    1)= S ^IBA(351.81,"B",$E(X,1,30),DA)=""
    2)= K ^IBA(351.81,"B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter the Patient's name.
  • DESCRIPTION:  
    This is the patient that is associated with this LTC clock.
  • CROSS-REFERENCE:  351.81^C
    1)= S ^IBA(351.81,"C",$E(X,1,30),DA)=""
    2)= K ^IBA(351.81,"C",$E(X,1,30),DA)
  • RECORD INDEXES:  AE (#149)
.03 CLOCK BEGIN DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 24, 2002
  • HELP-PROMPT:  Please enter the Begin Date of the Clock .
  • DESCRIPTION:  
    This is the beginning date of the clock entry.
  • RECORD INDEXES:  AE (#149)
.04 CLOCK EXPIRATION DATE 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter the Clock Expiration Date. This should be one year from the Clock Begin Date - 1 day.
  • DESCRIPTION:  
    This is the date this LTC clock will expire. After which a new clock entry will be created.
.05 STATUS 0;5 SET
************************REQUIRED FIELD************************
  • '1' FOR OPEN;
  • '2' FOR CLOSED;
  • '3' FOR CANCELLED;

  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter 1 or 2 or 3 for the correct status.
  • DESCRIPTION:  
    This is the current status of this LTC clock.
.06 EXEMPT DAYS REMAINING 0;6 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>365)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter the total EXEMPT DAYS REMAINING.
  • DESCRIPTION:  
    This is the number of free (exempt) days that have not been used yet.
.07 CURRENT EVENTS DATE 0;7 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 25, 2002
  • HELP-PROMPT:  Enter the earliest date to review for LTC transactions.
  • DESCRIPTION:  
    This is a flag indicating this patient needs to be reviewed for LTC transactions. The date stored here is the earliest date to review from.
  • CROSS-REFERENCE:  351.81^AD
    1)= S ^IBA(351.81,"AD",$E(X,1,30),DA)=""
    2)= K ^IBA(351.81,"AD",$E(X,1,30),DA)
1 EXEMPT DAY NUMBER 1;0 Multiple #351.811 351.811
4.01 USER ADDING ENTRY 4;1 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  APR 24, 2002
  • HELP-PROMPT:  Enter the name of the person who created the entry.
  • DESCRIPTION:  
    This is the name of the person who created the entry.
  • TECHNICAL DESCR:  
    This is a pointer to file #200 NEW PERSONS.
4.02 DATE ENTRY ADDED 4;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter the date the entry was created.
  • DESCRIPTION:  
    This is the date the entry was added.
  • TECHNICAL DESCR:  
    This field contains the date that this entry was created.
4.03 USER LAST UPDATING 4;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 23, 2002
  • HELP-PROMPT:  Please enter the name of the person last updating this field.
  • DESCRIPTION:  
    This is the name of the last person to update this field.
  • TECHNICAL DESCR:  
    This field is a pointer to file #200 NEW PERSONS.
4.04 DATE LAST UPDATED 4;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  DEC 31, 2001
  • HELP-PROMPT:  Please enter the date this entry was last updated.
  • DESCRIPTION:  
    This field contains the last date that this entry was updated.
  • TECHNICAL DESCR:  
    This is the date the entry was last updated.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields