EASUFNC3 ;ALB/CPM/EJG/GN - BILLING TRANSMISSION UTILITIES ; 13-JUN-94 [12/22/03 10:30am]
Source file <EASUFNC3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REV(IVMREF,DFN,IVMCL,IVMTYP,IVMBF,IVMBT,IVMAB,IVMHLD) | ; Interface w/ Rev fct.
; Input: IVMREF -- Bill reference number ; DFN -- Pointer to the patient in file #2 ; IVMCL -- Bill Classification [ 1-Inpt, 2-Opt ] ; IVMTYP -- Bill Type [ 2-Copayment, 3-Per Diem ] ; IVMBF -- Bill From Date in FM format ; IVMBT -- Bill To Date in FM format ; IVMAB -- Amount Billed ; IVMHLD -- Charge placed on hold? [ 1-Yes, 0-No ] |
|
| REVQ | ||
| ADD(X) | ; Add a new entry to file #301.61
; Input: X -- Reference number to be used as the .01 field ; Output: IVM -- Internal entry number to new entry, or 0. |
|
| ADDQ | ||
| CHK(DFN) | ; Is the insurance patient recorded in file #301.61?
; Input: DFN -- Pointer to the patient in file #2 ; Output: 1 -- Patient recorded in #301.61; otherwise, 0 |
|
| FT1(IVMTDA) | ; Entry point to build FT1 segment from file #301.61
; Input: IVMTDA -- Pointer to the transmission record in #301.61 ; The HL7 variables HLFS, HLQ and HLECH must also be defined ; Output: String in the form of the HL7 FT1 segment |
|
| FT1Q | ||
| SETATR(DA,DFN) | ; Mumps cross reference add logic ;EAS*1*47
|
|
| KILLATR(DA,DFN) | ; Mumps cross reference kill logic ;EAS*1*47
|
| FileNo | Call Tags |
|---|---|
| ^IVM(301.61 - [#301.61] | Classic Fileman Calls |
