Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 NOW^%DTC  FILE^DICN  ^DIE  IX1^DIK  
Health Level Seven 1 $$HLDATE^HLFNC  
Registration 1 $$LST^DGMTU  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Enrollment Application System 1 EASPTRN5  
Income Verification Match 1 ^IVM(301.61  

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

External References

Name Field # of Occurrence
NOW^%DTC REV+17, ADD+9
$$LST^DGMTU SETATR+6, KILLATR+5
FILE^DICN ADD+6
^DIE ADD+10
IX1^DIK REV+19
$$HLDATE^HLFNC FT1+11, FT1+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IVM(301.61 - [#301.61] Classic Fileman Calls

Global Variables Directly Accessed

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!

Label References

Name Line Occurrences
$$ADD REV+15
ADDQ ADD+5, ADD+7
FT1Q FT1+6, FT1+7
REVQ REV+13, REV+15

Naked Globals

Name Field # of Occurrence
^(1 REV+18*

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All