EASUFNC3 ;ALB/CPM/EJG/GN - BILLING TRANSMISSION UTILITIES ; 13-JUN-94 [12/22/03 10:30am]
Source file <EASUFNC3.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 4 | NOW^%DTC FILE^DICN ^DIE IX1^DIK |
Health Level Seven | 1 | $$HLDATE^HLFNC |
Registration | 1 | $$LST^DGMTU |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Enrollment Application System | 1 | EASPTRN5 |
Income Verification Match | 1 | ^IVM(301.61 |
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 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IVM(301.61 - [#301.61] | REV+14, REV+18*, CHK+4, FT1+7, SETATR+3, SETATR+11*, KILLATR+3, KILLATR+8! |
Name | Field # of Occurrence |
---|---|
^(1 | REV+18* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | REV+18, ADD+10 |
DA | REV+12~, REV+19*, ADD+4~, ADD+7*, SETATR~, SETATR+3, SETATR+11, KILLATR~, KILLATR+3, KILLATR+8 |
DD | ADD+4~ |
DFN | REV~, REV+13, REV+18, CHK~, CHK+4, SETATR~, SETATR+1, SETATR+6, SETATR+11, KILLATR~ , KILLATR+1, KILLATR+5, KILLATR+8 |
DIC | ADD+4~, ADD+6*, ADD+10 |
DIC(0 | ADD+6* |
DIE | ADD+4~, ADD+10* |
DIK | REV+12~, REV+19* |
DLAYGO | ADD+4~, ADD+6* |
DO | ADD+4~ |
>> DR | ADD+10* |
DT | REV+18 |
DUZ | REV+18, ADD+10 |
>> HLECH | FT1+8 |
>> HLFS | FT1+10, FT1+11, FT1+12, FT1+13, FT1+16, FT1+19, FT1+20, FT1Q |
>> HLQ | FT1+11, FT1+16 |
ICYR | SETATR+2~, SETATR+6*, SETATR+8*, SETATR+9, SETATR+11, KILLATR+2~, KILLATR+5*, KILLATR+7*, KILLATR+8 |
IVM | ADD+4~, ADD+5*, ADD+7*, ADDQ |
IVMAB | REV~, REV+18 |
IVMBF | REV~, REV+18 |
IVMBT | REV~, REV+18 |
IVMCL | REV~, REV+18 |
IVMHLD | REV~, REV+18 |
IVMN | FT1+5~, FT1+7*, FT1+11, FT1+12, FT1+13, FT1+16, FT1+19, FT1+20 |
IVMREF | REV~, REV+13, REV+14, REV+15 |
IVMSEP | FT1+5~, FT1+8*, FT1+16 |
IVMTDA | REV+12~, REV+14*, REV+15*, REV+18, REV+19, FT1~, FT1+6, FT1+7 |
IVMTYP | REV~, REV+18 |
IVMY | FT1+5~, FT1+10*, FT1+11*, FT1+12*, FT1+13*, FT1+16*, FT1+19*, FT1+20*, FT1Q |
TSTDT | SETATR+2~, SETATR+3*, SETATR+4, SETATR+6, KILLATR+2~, KILLATR+3*, KILLATR+5 |
X | ADD~, ADD+5 |
Y | ADD+4~, ADD+7 |