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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBTRH5H

Package: Integrated Billing

Routine: IBTRH5H


Information

IBTRH5H ;ALB/FA - HCSR Create 278 Request ;14-OCT-2014

Source Information

Source file <IBTRH5H.m>

Entry Points

Name Comments DBIA/ICR reference
NHOME() ;EP
; Screen for the 'Nursing Home Residential Status' Dictionary field (356.2216/2.08)
; to exclude 'DA' for a Professional Service Line and 'MJ' for an Institutional
; Service Line. Always exclude 'F2"
; Input: DA(1) - IEN of the 356.22 entry being edited
; DA - IEN of the Service Line multiple being edited
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
UNITS() ;EP
; Screen for the 'Unit or Basis For Measurement' Dictionary field (356.2216/1.1)
; to exclude 'DA' for a Professional Service Line and 'MJ' for an Institutional
; Service Line. Always exclude 'F2"
; Input: DA(1) - IEN of the 356.22 entry being edited
; DA - IEN of the Service Line multiple being edited
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
JUMPERR(INDENT)
ONEPD(IBTRIEN) ;EP
; Called from Input Template: IB ADD/EDIT 278
; Attempts to an Attending Physician Provider Data multiple into 356.22 for
; entries with a Inpatient/Outpatient Status of 'I'
; Only called if there are currently no Provider Data multiples
; Input: IBTRIEN - IEN of the selected entry
; Output: Attending Physician Provider Data multiple is filed into 356.2213
; (Potentially)
; Returns: 1 if one or more lines were added, 0 otherwise
ADMDFN(EVDT,DFN) ; Checks to see if the specified event date is for
; an admission, a scheduled admission or neither
; Input: EVDT - Fileman date/time of the admission being searched for
; DFN - IEN of the patient of the admission being searched for
; Returns: IEN of the found Attending Physician or "" if not found
DXTYPE() ;EP
; Called from within Input template IB ADD/EDIT 278
; Screens Diagnosis Type values based upon the Diagnosis multiple being
; added/edit
; Called from field: 356.223/.01
; Input: DA(1) - IEN of the 356.22 entry being edited
; DA - IEN of the diagnosis multiple being edited
; Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
HCSDFC() ;EP
; Called from within Input template IB ADD/EDIT 278
; Dictionary Screen for Health Care Services Delivery Frequency Code
; fields 4.07, 2216/5.07
; Input: Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
HCSDQQ() ;EP
; Called from within Input template IB ADD/EDIT 278
; Dictionary Screen for Health Care Services Delivery Quantity Qualifier
; fields 4.01, 2216/5.01
; Input: Y - Internal Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
PROVTYPE() ;EP
; Called from within Input template IB ADD/EDIT 278
; Dictionary Screen for allowable Provider Types.
; Called from field screens 356.2213/.01
; NOTE: Duplicate entries are allowed
; Input: X - External Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise
SPROVTYP() ;EP
; Called from within Input template IB ADD/EDIT 278
; Dictionary Screen for allowable Provider Types for Service Lines.
; Called from field screens 356.22168/.01
; NOTE: Duplicate entries are allowed
; Input: X - External Value of the user response
; Returns: 1 - Data input by the user is valid, 0 otherwise

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,$S(INDENT:$J(SPACES,INDENT),1:"")
  • Line Location: JUMPERR+6
Function Call: WRITE
  • Prompt: "^Field jumping is not allowed from this prompt",!
  • Line Location: JUMPERR+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBT(356.22 - [#356.22] GET1^DIQ
356.2216 GET1^DIQ
^DGS(41.1 - [#41.1] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call