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 |  Local Variables |  All
Print Page as PDF
Routine: DGRUUTL

Package: Registration

Routine: DGRUUTL


Information

DGRUUTL ;ALB/GRR - RAI/MDS UTILITY ROUTINE ; 10/11/07 8:42am

Source Information

Source file <DGRUUTL.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Health Level Seven 2 $$UPPER^HLFNC  GENERATE^HLMA  
Registration 2 EN^DGRUGMFU  IN5^VADPT  
VA FileMan 2 ^DIC  $$GET1^DIQ  
Integrated Billing 1 $$HICN^IBCNSU1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 19

Package Total Caller Graph
Registration 19 DGRUADT  DGRUADT0  DGRUADT2  DGRUDD01  DGRUGA01  DGRUGA02  DGRUGA03  DGRUGA08  
DGRUGA11  DGRUGA12  DGRUGA13  DGRUGA21  DGRUGA22  DGRUGBJ  DGRUGDS  DGRUGSEE  
VAFHLIN2  VAFHLNK1  VAFHLPV2  

Entry Points

Name Comments DBIA/ICR reference
MEDICAID(DFN) ;Will retrieve the patient's Medicaid Number and return it or a null
MEDICARE(DFN) ;Will retrieve the patient's Medicare Number and return it or return null
RELATE(X) ;CONVERT FREE TEXT RELATIONSHIP TO RELATIONSHIP FILE ENTRY NUMBER AND NAME
CHKWARD(X) ;RETURNS 1 IF RAI/MDS WARD AND 0 IF NOT
DOCID(X) ;Insure provider ID not greater than 6 digits
ATTDOC(X) ;get attending physician - p-762
SENDMFU() ;Function to determine if master file updates should be sent
NAMQ
GETAMOV(DFN) ;GET LAST ADMISSION MOVEMENT FOR A PATIENT
HLNAME(DGNAME) ;Piece apart name into LAST NAME_"^"_FIRST NAME_"^"_MIDDLE NAME_"^"_SUFFIX
SUF(X) ;COMPARES PASSED DATA TO LIST OF SUFFIX'S AND RETURNS A FOUND SUFFIX OR NULL
ENC(DGRSEG,DGRMNMT,DGRFLN,DGRFLNM,DGROLDN,DGRNDATA,DGRSIED,DGCIEN) ;CREATE AND SEND MASTER FILE UPDATE HL7 MESSAGE
EXITDOC

External References

Name Field # of Occurrence
EN^DGRUGMFU ENC+12
^DIC RELATE+4
$$GET1^DIQ CHKWARD+3, MEDICAID+5
$$UPPER^HLFNC RELATE+2
GENERATE^HLMA ENC+15
$$HICN^IBCNSU1 MEDICARE+4
IN5^VADPT ATTDOC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DG(408.11 - [#408.11] Classic Fileman Calls
^DIC(42 - [#42] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] SENDMFU+1
^DGPM("ATID1" GETAMOV+3, GETAMOV+4
^TMP($J ENC+13, ENC+14

Label References

Name Line Occurrences
$$HLNAME ATTDOC+3
$$SUF HLNAME+7
EXITDOC DOCID+4
NAMQ HLNAME+9, HLNAME+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A MEDICAID+5~*, MEDICAID+6*, MEDICAID+7
ATTNAME ATTDOC+1~*, ATTDOC+3*, ATTDOC+4
ATTPTR ATTDOC+1~*, ATTDOC+2*, ATTDOC+4
DFN MEDICARE~, MEDICARE+3, MEDICARE+4, MEDICAID~, MEDICAID+5, GETAMOV~, GETAMOV+3, GETAMOV+4
DGCIEN ENC~, ENC+12
DGDOC DOCID+2~, DOCID+3*, DOCID+5*, DOCID+6
>> DGFN HLNAME+2*, HLNAME+9*, HLNAME+11*, HLNAME+12*, HLNAME+13*, HLNAME+14*, NAMQ
>> DGLN HLNAME+2*, HLNAME+9*, HLNAME+11*, HLNAME+12*, HLNAME+13*, HLNAME+14*, NAMQ
>> DGMN HLNAME+2*, HLNAME+9*, HLNAME+11*, HLNAME+13*, NAMQ
>> DGN HLNAME+5*, HLNAME+6
DGNAME HLNAME~, HLNAME+3, HLNAME+4, HLNAME+5
DGNIEN DOCID+2~, DOCID+5*
DGRFLN ENC~, ENC+11, ENC+12
DGRFLNM ENC~, ENC+11, ENC+12
DGRMNMT ENC~, ENC+11, ENC+12
DGRNDATA ENC~, ENC+11, ENC+12
DGROLDN ENC~, ENC+12
DGRSEG ENC~, ENC+11, ENC+12
DGRSIED ENC~, ENC+11
>> DGRUET ENC+15
DGSUB MEDICARE+2~, MEDICARE+4*, MEDICARE+5, MEDICARE+6
>> DGSUF HLNAME+2*, HLNAME+7*, HLNAME+8, NAMQ
DIC RELATE+1~, RELATE+4*
DIC(0 RELATE+4*
>> HL("ECH" DOCID+3, DOCID+5, ATTDOC+4
>> HL("FS" DOCID+3, DOCID+6
>> HLA("HLS" ENC+14*
I GETAMOV+2~*, GETAMOV+3*, GETAMOV+4
IEN DOCID+2~, DOCID+3*, DOCID+4, DOCID+5
J GETAMOV+2~*, GETAMOV+4*, GETAMOV+5
>> P HLNAME+3*, HLNAME+6*, HLNAME+7, HLNAME+8*, HLNAME+9, HLNAME+10
>> P1 HLNAME+2*, HLNAME+5*, HLNAME+9, HLNAME+11, HLNAME+12, HLNAME+13, HLNAME+14
>> P2 HLNAME+2*, HLNAME+5*, HLNAME+9, HLNAME+11, HLNAME+12, HLNAME+13, HLNAME+14
>> P3 HLNAME+2*, HLNAME+9, HLNAME+11, HLNAME+12, HLNAME+13
>> P4 HLNAME+2*, HLNAME+9
VAIP ATTDOC+1~!
VAIP(18 ATTDOC+1
X SUF~, SUF+1, SUF+2, CHKWARD~, CHKWARD+3, RELATE~, RELATE+2*, RELATE+3*, DOCID~, DOCID+1
, DOCID+3, DOCID+6*, EXITDOC, ATTDOC~
Y RELATE+1~, RELATE+5*, RELATE+6
>> Z HLNAME+3*, HLNAME+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All