INHMGD3 ;CAR; 16 May 97 16:46;HL7 MESSAGING - MANAGEMENT OF DATA SOURCES
Source file <INHMGD3.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Generic Interface System | 2 | ($$YN,HDR2)^INHMGD1 (MAPXFRM,PRINT)^INHMGD4 | 
| VA Fileman | 2 | ^DIC ^DICOMP | 
| Uncategorized | 1 | $$LBTB^UTIL | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Generic Interface System | 2 | INHMGD2 INHMGD7 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FIELD(INFLD,INF,FLVL,FILE,INP) | ;Handle a field in SCRIPT GENERATOR FIELD^4012 | |
| FD1 | ;one field | |
| PROC(INFLDC,INP) | ;Print the data source, utilizing the current Seg. File | |
| RESOLVE(INRT,INAD) | ;Extrensic ***add DIC lookup ; Inputs: ; INRT = file#, or file name ; INAD = field string: e.g.: #.01:#.01:INTERNAL(#3.5)_";40.8" ; delimited by ":" ; Output: ; String containing Field#:File# (Field Name) ; with no leading spaces, and 1 space before the ; Field Name. e.g.: .01:8550 (NAME) | 
| FileNo | Call Tags | 
|---|---|
| ^DIC - [#1] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD( | RESOLVE+49 | 
| ^INTHL7F - [#4012] | FIELD+26, FIELD+31, FIELD+32, FIELD+34, FIELD+35, FD1+4, PROC+13 | 
| ^INTHL7FT - [#4012.1] | FD1+10 | 
| ^INTHL7S - [#4010] | FIELD+12 | 
| ^UTILITY("INHMGD" | PROC+6*, PROC+18*, RESOLVE+26* | 
| Name | Line Occurrences | 
|---|---|
| $$RESOLVE | PROC+16 | 
| FD1 | FIELD+30, FIELD+39 | 
| PROC | FD1+17 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> %Y | RESOLVE+39 | 
| >> DA | RESOLVE+38* | 
| DIC | RESOLVE+10~, RESOLVE+20!*, RESOLVE+22*, RESOLVE+35!* | 
| DIC("S" | RESOLVE+22* | 
| DIC(0 | RESOLVE+20*, RESOLVE+22*, RESOLVE+35* | 
| DICOMPX | PROC+1~, RESOLVE+38*, RESOLVE+43, RESOLVE+45 | 
| >> DQI | RESOLVE+38* | 
| FILE | FIELD~ | 
| FILE( | PROC+6, PROC+8, PROC+18, RESOLVE+26, RESOLVE+57 | 
| FLVL | FIELD~, PROC+6, PROC+8, PROC+18, RESOLVE+26, RESOLVE+57 | 
| I | RESOLVE+10~ | 
| I(0 | RESOLVE+38* | 
| IN | FIELD+11~, FIELD+26*, FIELD+33*, FIELD+35 | 
| IN(0 | FIELD+26*, FIELD+31*, FIELD+32 | 
| IN(10 | FIELD+32*, FIELD+33, FIELD+36, FIELD+37 | 
| INAD | RESOLVE~, RESOLVE+14*, RESOLVE+15, RESOLVE+16*, RESOLVE+25, RESOLVE+29, RESOLVE+30, RESOLVE+31, RESOLVE+34, RESOLVE+38 , RESOLVE+43, RESOLVE+46*, RESOLVE+57, RESOLVE+58 | 
| INAME | RESOLVE+10~, RESOLVE+41*, RESOLVE+43, RESOLVE+49*, RESOLVE+51*, RESOLVE+53* | 
| INDDL | PROC+1~ | 
| INDENT | FIELD+11~, FIELD+23*, FIELD+38* | 
| INDESC | PROC+1~ | 
| INDL | PROC+1~, PROC+8*, PROC+10*, PROC+11*, PROC+13*, PROC+15, PROC+16*, PROC+17, PROC+19 | 
| INERR | FD1+1~ | 
| INF | FIELD~, FIELD+19, FIELD+20, FIELD+22, FIELD+35 | 
| INFD | FIELD+11~ | 
| INFD("DT" | FD1+10*, PROC+4*, PROC+5 | 
| INFD("FN" | FD1+8* | 
| INFD("LEN" | FD1+11* | 
| INFD("OIT" | FD1+12* | 
| INFD("SQ" | FIELD+19* | 
| INFIL | RESOLVE+10~, RESOLVE+11*, RESOLVE+15*, RESOLVE+34, RESOLVE+36*, RESOLVE+45*, RESOLVE+46, RESOLVE+49, RESOLVE+55, RESOLVE+56* , RESOLVE+57*, RESOLVE+58* | 
| INFLD | FIELD~, FIELD+12*, FIELD+23, FIELD+26, FIELD+31, FIELD+32, RESOLVE+10~, RESOLVE+11*, RESOLVE+45*, RESOLVE+46 , RESOLVE+49 | 
| INFLD(1 | FIELD+12*, FIELD+13 | 
| INFLD(2 | FIELD+12* | 
| INFLDC | FIELD+11~, FIELD+23*, FIELD+33*, FIELD+34, FIELD+35, FD1+4, FD1+17, PROC~, PROC+6, PROC+13 , PROC+18, PROC+20, RESOLVE+26 | 
| INFLDC(0 | FIELD+35*, FD1+4*, PROC+4, PROC+10 | 
| >> INHF2 | FD1+15, FD1+16*, FD1+18* | 
| INJ | PROC+1~, RESOLVE+10~ | 
| >> INMSG | PROC+6, PROC+18, RESOLVE+26 | 
| INOLDX | PROC+1~, PROC+11*, PROC+13*, PROC+18 | 
| INP | FIELD~, FIELD+22*, FD1+17, PROC~, PROC+19 | 
| INPY | RESOLVE+10~, RESOLVE+39*, RESOLVE+51 | 
| INREP | FIELD+11~, FIELD+16* | 
| INREQ | FIELD+11~, FIELD+15*, FIELD+36* | 
| INRT | RESOLVE~, RESOLVE+15*, RESOLVE+19, RESOLVE+20, RESOLVE+21*, RESOLVE+23*, RESOLVE+24*, RESOLVE+25, RESOLVE+35, RESOLVE+36 , RESOLVE+38 | 
| INS | PROC+1~, RESOLVE+10~, RESOLVE+29*, RESOLVE+53 | 
| >> INSEG | FIELD+12, PROC+6, PROC+18, RESOLVE+26 | 
| >> INSEG(0 | FIELD+20, FIELD+35 | 
| INSF | FIELD+11~, FIELD+26*, FIELD+29 | 
| INSUPRES | FIELD+11~, FIELD+23*, FIELD+30* | 
| >> INSVAR | FIELD+20*, FIELD+35* | 
| INUFL | FIELD+11~, FIELD+17*, FIELD+37* | 
| INX | PROC+1~ | 
| INY | FIELD+11~, FIELD+13*, FIELD+15, FIELD+16, FIELD+17, FIELD+18, FD1+1~, FD1+4*, FD1+8, FD1+9* , FD1+10, FD1+11, FD1+12 | 
| >> J(0 | PROC+8*, PROC+16, RESOLVE+38* | 
| >> TAB | FIELD+22 | 
| U | FIELD+15, FIELD+16, FIELD+17, FIELD+18, FIELD+20, FIELD+35, FIELD+36, FIELD+37, FD1+8, FD1+9 , FD1+10, FD1+11, FD1+12, PROC+4, PROC+6, PROC+10, PROC+18, RESOLVE+26, RESOLVE+43, RESOLVE+45 , RESOLVE+49 | 
| X | PROC+1~, RESOLVE+10~, RESOLVE+20*, RESOLVE+31*, RESOLVE+34*, RESOLVE+38*, RESOLVE+40, RESOLVE+55 | 
| XFM | FIELD+11~, FIELD+18* | 
| Y | RESOLVE+10~, RESOLVE+21, RESOLVE+23, RESOLVE+36 | 
| Y(0 | RESOLVE+36 |