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

Package: Registration

Routine: DGPFHLUT


Information

DGPFHLUT ;ALB/RPM - PRF HL7 UTILITIES ; 5/31/05 3:45pm

Source Information

Source file <DGPFHLUT.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Health Level Seven 2 INIT^HLFNC2  LINK^HLUTIL3  
Kernel 1 $$REPEAT^XLFSTR  
Registration 1 $$STRIPTS^DGPFHLUT  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Registration 18 DGPFHLQ1  DGPFHLQ2  DGPFHLQ3  DGPFHLQ4  DGPFHLR  DGPFHLS  DGPFHLT  DGPFHLT1  
DGPFHLT2  DGPFHLT3  DGPFHLT4  DGPFHLU  DGPFHLU1  DGPFHLU2  DGPFHLU3  DGPFHLU4  
DGPFHLU6  DGPFHLUT  

Entry Points

Name Comments DBIA/ICR reference
INIT(DGPROT,DGHL) ;Kernel HL7 INIT wrapper
HLEID(DGPROT) ;return IEN of HL7 protocol
GETLINK(DGINST) ;retrieve a single link for a given institution
BLDTEXT(DGWP,DGHL,DGARR) ;Build HL7 word proc text array
NXTSEG(DGROOT,DGCURR,DGFS,DGFLD) ;retrieves next sequential segment
; This function retrieves the next segment in the work global, returns
; an array of field values and the segment's work global index. If
; the next segment does not exist, then the function returns a zero.
GETFLDS(DGSEG,DGFS,DGFLD) ;retrieve HL7 segment fields into an array
STRIPTS(DGSTR) ;Strip trailing spaces from a line of text
BLDSEG(DGTYP,DGVAL,DGHL) ;generic segment builder
ADD(DGVAL,DGSEP,DGSEG) ;append a value onto segment
CKSTR(DGFLDS,DGSTR) ;validate comma-delimited HL7 field string
CONVMID(DGID) ;convert #772 msgid to #773 msgid
ENCHL7(STR) ; Encode HL7 escape sequences in a string
DECHL7(STR) ; Decode HL7 escape sequences in a string

External References

Name Field # of Occurrence
$$STRIPTS^DGPFHLUT BLDTEXT+27
$$GET1^DIQ CONVMID+24
INIT^HLFNC2 INIT+17
LINK^HLUTIL3 GETLINK+18
$$REPEAT^XLFSTR BLDTEXT+31

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HLMA - [#773] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HL(772 - [#772] CONVMID+22
^HLMA("B" CONVMID+23
^ORD(101 - [#101] HLEID+9

Label References

Name Line Occurrences
$$HLEID INIT+15
ADD BLDSEG+36, BLDSEG+40, BLDSEG+44, BLDSEG+48
GETFLDS NXTSEG+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHR ENCHL7+14~, ENCHL7+17*, ENCHL7+18, ENCHL7+19, ENCHL7+20
CHRSTR ENCHL7+14~, ENCHL7+17*, ENCHL7+19
CNT ENCHL7+14~, ENCHL7+17*, ENCHL7+20
DG772 CONVMID+17~, CONVMID+22*, CONVMID+23
DG773 CONVMID+18~, CONVMID+23*, CONVMID+24
DGARR BLDTEXT~
DGARR( BLDTEXT+31*, BLDTEXT+33*
DGBLK BLDTEXT+17~, BLDTEXT+22*, BLDTEXT+28*, BLDTEXT+30, BLDTEXT+31, BLDTEXT+32*
DGCMP BLDSEG+11~, BLDSEG+41*, BLDSEG+42, BLDSEG+43, BLDSEG+45, BLDSEG+46
DGCMPVAL BLDSEG+12~, BLDSEG+42*, BLDSEG+44
DGCNT BLDTEXT+15~, BLDTEXT+21*, BLDTEXT+29*, BLDTEXT+31, BLDTEXT+33, BLDTEXT+34
DGCS BLDSEG+20~, BLDSEG+30*, BLDSEG+43
DGCURR NXTSEG~, NXTSEG+16*, NXTSEG+17, NXTSEG+21*, NXTSEG+22
DGERR CONVMID+19~, CONVMID+25
DGFLD NXTSEG~, NXTSEG+19, GETFLDS~, BLDSEG+13~, BLDSEG+34*, BLDSEG+35, BLDSEG+37, BLDSEG+38, BLDSEG+41, BLDSEG+42
, BLDSEG+45, BLDSEG+46
DGFLD( GETFLDS+18*
DGFLD("TYPE" GETFLDS+16*, GETFLDS+18
DGFLDS CKSTR~, CKSTR+13, CKSTR+15
DGFLDVAL BLDSEG+14~, BLDSEG+35*, BLDSEG+36
DGFS NXTSEG~, NXTSEG+19, GETFLDS~, GETFLDS+16, GETFLDS+17, GETFLDS+18, BLDSEG+19~, BLDSEG+29*, BLDSEG+35
DGHL INIT~, INIT+17, BLDTEXT~, BLDSEG~
DGHL("" INIT+18
DGHL("ECH" BLDTEXT+23, BLDSEG+30, BLDSEG+31, BLDSEG+32
DGHL("FS" BLDSEG+29
DGHLEID INIT+13~, INIT+14*, INIT+15*, INIT+16, INIT+17, INIT+18*, INIT+19
DGI GETFLDS+14~, GETFLDS+17*, GETFLDS+18, CKSTR+10~, CKSTR+15*
DGID CONVMID~, CONVMID+22
DGINST GETLINK~, GETLINK+17, GETLINK+18
DGLIN BLDTEXT+14~, BLDTEXT+20*, BLDTEXT+25*, BLDTEXT+26
DGLINKS GETLINK+12~, GETLINK+18
DGLINKS( GETLINK+20
DGLINKS(0 GETLINK+19
DGLNK GETLINK+13~, GETLINK+19*, GETLINK+20
DGMCID CONVMID+20~, CONVMID+24*, CONVMID+25
DGPROT INIT~, INIT+15, HLEID~, HLEID+8, HLEID+9
DGREP BLDTEXT+18~, BLDTEXT+23*, BLDTEXT+31, BLDSEG+15~, BLDSEG+37*, BLDSEG+38, BLDSEG+39, BLDSEG+41, BLDSEG+42, BLDSEG+45
, BLDSEG+46
DGREPVAL BLDSEG+16~, BLDSEG+38*, BLDSEG+40
DGREQ CKSTR+11~, CKSTR+15*, CKSTR+16
DGROOT NXTSEG~, NXTSEG+17
DGRS BLDSEG+21~, BLDSEG+31*, BLDSEG+39
DGRSLT GETLINK+14~, GETLINK+16*, GETLINK+20*, GETLINK+21
DGSEG GETFLDS~, GETFLDS+16, GETFLDS+17, GETFLDS+18, BLDSEG+23~, BLDSEG+28*, BLDSEG+36, BLDSEG+40, BLDSEG+44, BLDSEG+48
, BLDSEG+49, ADD~, ADD+11*
DGSEP BLDSEG+24~, BLDSEG+35*, BLDSEG+36, BLDSEG+39*, BLDSEG+40, BLDSEG+43*, BLDSEG+44, BLDSEG+47*, BLDSEG+48, ADD~
, ADD+9*, ADD+11
DGSS BLDSEG+22~, BLDSEG+32*, BLDSEG+47
DGSTR STRIPTS~, STRIPTS+10*, STRIPTS+11, CKSTR~, CKSTR+14*, CKSTR+16*, CKSTR+17
DGSUB BLDSEG+17~, BLDSEG+45*, BLDSEG+46, BLDSEG+47
DGSUBVAL BLDSEG+18~, BLDSEG+46*, BLDSEG+48
DGTXT BLDTEXT+16~, BLDTEXT+26*, BLDTEXT+27*, BLDTEXT+28, BLDTEXT+31, BLDTEXT+33
DGTYP BLDSEG~, BLDSEG+26, BLDSEG+28
DGVAL BLDSEG~, ADD~, ADD+10*, ADD+11
DGVAL( BLDSEG+35, BLDSEG+37, BLDSEG+38, BLDSEG+41, BLDSEG+42, BLDSEG+45, BLDSEG+46
DGVAL("" BLDSEG+34
DGWP BLDTEXT~, BLDTEXT+25, BLDTEXT+26
ECHARS DECHL7+17~, DECHL7+20*, DECHL7+21, DECHL7+26, DECHL7+27, DECHL7+30
ECODE DECHL7+17~, DECHL7+34*, DECHL7+35, DECHL7+37
ESC ENCHL7+14~, ENCHL7+16*, ENCHL7+24, DECHL7+17~, DECHL7+21*, DECHL7+23, DECHL7+32, DECHL7+34, DECHL7+35, DECHL7+37
, DECHL7+39
FLG ENCHL7+14~, ENCHL7+17*, ENCHL7+22*, ENCHL7+24
>> HLECH ENCHL7+16, ENCHL7+17, DECHL7+20
>> HLFS ENCHL7+17, DECHL7+25
LEN DECHL7+17~, DECHL7+32*, DECHL7+35, DECHL7+37
NEW ENCHL7+14~, ENCHL7+18*, ENCHL7+20*, ENCHL7+21
NXTSEG NXTSEG+14~, NXTSEG+17*, NXTSEG+18, NXTSEG+19
PAT DECHL7+17~
PCE DECHL7+17~, DECHL7+32*
REPL DECHL7+17~
REPL( DECHL7+35, DECHL7+37
REPL("E" DECHL7+29*
REPL("F" DECHL7+25*
REPL("R" DECHL7+27*
REPL("S" DECHL7+26*
REPL("T" DECHL7+30*
RPLC ENCHL7+14~, ENCHL7+19*, ENCHL7+20
SPACE STRIPTS+8~, STRIPTS+9*, STRIPTS+10
STR ENCHL7~, ENCHL7+17, ENCHL7+18, ENCHL7+20, ENCHL7+21*, ENCHL7+24*, ENCHL7+25, DECHL7~, DECHL7+23, DECHL7+32
, DECHL7+34, DECHL7+35*, DECHL7+37*, DECHL7+39*, DECHL7+40
Z1 ENCHL7+14~, ENCHL7+17*
Z2 ENCHL7+14~, ENCHL7+20*
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