Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBTRH5A

Package: Integrated Billing

Routine: IBTRH5A


Information

IBTRH5A ;ALB/FA - HCSR Create 278 Request ;12-AUG-2014

Source Information

Source file <IBTRH5A.m>

Entry Points

Name Comments DBIA/ICR reference
RCAUSE(FIELD) ;EP
; Dictionary Screen function called from the following fields: 2.08,2.09,2.1
; Prevents the same Related Cause from being entered in more than one field.
; Input: FIELD - Field # of the field being checked
; DA - IEN of the 356.22 entry being edited
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
RCAUSEP(FIELD) ;EP
; Called from Input Template IB CREATE 278 REQUEST for fields: 2.08, 2.09
; Checks to see if subsequent Related Causes entries have values.
; Input: FIELD - Field # of the field being checked
; Set to 'ALL' to see if any of the 3 have a value
; DA - IEN of the 356.22 entry being edited
; Returns: 1 - Subsequent entries have values, 0 otherwise
DXCODE() ;EP
; Dictionary Screen function called from field: 3.02
; Prevents a duplicate ICD-9/ICD-10 or DRG Diagnosis from being entered
; Input: DA - IEN of Diagnosis multiple being entered/edited 95.3
; DA(1) - IEN of the 356.22 entry being edited
; DIC - Contains the global ref of dictionary being checked
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
CERTCAT(IBPSTAT)
CERTCOND(FIELD) ;EP
; Dictionary Screen function called from the following Certification Condition
; fields in file 356.22: 4.1,4.11,4.12,4.13,4.14 (Ambulance Cert Conditions)
; 5.02,5.03,5.04,5.05,5.06 (Chiropractic Cert Conds)
; 5.08,5.09,5.1,5.11,5.12 (DME Cert Conditions)
; 5.14,5.15,5.16,5.17,5.18 (Oxygen Cert Conditions)
; 6.02,6.03,6.04,6.05,6.06 (Functional Limit Cert Cond)
; 6.08,6.09,6.1,6.11,6.12 (Activities Cert Conditions)
; 6.14,6.15,6.16,6.17,6.18 (Mental Health Cert Conds)
; Prevents the same Certification Condition from being answered in the
; specified Certification Condition Category (e.g. Ambulance, Chiropractic,
; etc.). Also restricts user selection to a specified list by Certification
; Condition Category. Finally, also prevents the user from deleting any EXCEPT
; the last entered Certification Condition in any category.
; Input: FIELD - Field # of the field being checked
; DA - IEN of the 356.22 entry being edited
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
CERTCNDP(IBTRIEN,FIELD) ;EP
; Called from Input Template IB CREATE 278 REQUEST for Certification Condition
; fields. Checks to see if subsequent Certification Condition entries have
; values.
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field the being checked
; Returns: 1 - Subsequent entries have values, 0 otherwise
CONDAMB(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Ambulance Certification Conditions and it's not a
; duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDCHR(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Chiropractic Certification Conditions and it's not a
; duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDDME(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for DME Certification Conditions and it's not a
; duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDOXY(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Oxygen Certification Conditions and it's not a
; duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDFL(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Functional Limitations Certification Conditions and
; it's not a duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDA(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Activities Certification Conditions and
; it's not a duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CONDMS(IBTRIEN,FIELD,VALUE) ; Makes sure the user entry for a Certification
; Condition is valid for Mental Status Certification Conditions and
; it's not a duplicate
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; FIELD - Field number of the field value being checked
; VALUE - Internal value being validated
; Returns: 1 if the field value is valid, 0 otherwise
CHKDUPS(FPCE,VALUE,NDE,PCES) ;EP
; Generic duplicate field checker. Checks for a duplicate value in a list of
; fields to prevent the same value from being entered in more than field in
; the list
; Input: FPCE - Piece # of the field being checked
; VALUE - Internal Value of the user response
; NDE - HCSR Transmission file node that contains the fields
; PCES - '^' delimited list of storage locations for above fields
; Returns: 1 - No duplicates found, 0 otherwise

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD9 - [#80] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call