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: EASUFNC3

Package: Enrollment Application System

Routine: EASUFNC3


Information

EASUFNC3 ;ALB/CPM/EJG/GN - BILLING TRANSMISSION UTILITIES ; 13-JUN-94 [12/22/03 10:30am]

Source Information

Source file <EASUFNC3.m>

Entry Points

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IVM(301.61 - [#301.61] Classic Fileman Calls
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call