IBECECX1 ;BSL/DVA - BILLING EXTRACTION AND FILING UTILITIES FOR IN PATIENT ACCUMULATOR INTERFACE ; 16 May 2022 8:47 AM
Source file <IBECECX1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN) | ;Retrieve existing Billing clock if present for this patient
|
|
| INPT(DFN) | ;Gather inpatient data
; Retrieve most recent Admission and Discharge dates from the PTF file |
|
| CCINPT(DFN,IBADMIT) | ;Gather inpatient data for CC billing
; Retrieve most recent Admission and Discharge dates from the PTF file |
|
| NOCLOCK | ;Set variables if no clock found
|
|
| CLSDT(IBECDT) | ;Calculate billing clock closed date taking into acct leap year
|
|
| VRSNCHK(IB351IEN) | ;Verify Version matches incoming versions
|
|
| GETIEN(DFN,IBADM1) | ;Get Means Test Billing clock (#351) file ien
|
|
| WRAP(IBCOL1,IBCOL2,IBTEXT) | ;Wrap text in IBTEXT variable
; Input Parameters Description: ; IBCOL1: Left Column to start ; IBCOL2: Cols to wrap in ; IBTEXT: Text to wrap |
|
| ERR1(IBERRMSG) | ;Handle error responses for network and software failure issues
|
|
| ERR2(IBERRMSG) | ;Handle error responses for Clock Discrepancy issues
|
|
| UDCL | ;Update original billing clock so nightly querys are not sent for patients without TFL's
|
|
| EDTCLCK(DFN,IBADMIT,IBCURIEN) | ;Called from Billing Clock Maintenance option
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBE(351 - [#351] | Classic Fileman Calls, GET1^DIQ |
| ^DIC(4 - [#4] | FIND^DIC |
