INHMGD2 ;CAR; 27 Jun 97 15:34;HL7 MESSAGING - PROCESS SEGMENT
Source file <INHMGD2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Generic Interface System | 2 | ($$DASH,$$LKPRM,$$YN,HEADER,WRITE)^INHMGD1 FIELD^INHMGD3 |
| VA Fileman | 1 | ^DIC |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Generic Interface System | 1 | INHMGD1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SEG(INSEG,FLVL,FILE,INP,INERN) | ;Process segment
; Input: ; INSEG= Seg is the index to the ^INTHL7M(INDA,1,SEG,0) node, and ; is used to retrieve INMSG(1). ; FLVL = Current level in FILE. ; FILE = Stacks file# references. ; INP = The output array used to create a data file for export to ; a tab delimited text file. ; INERN= An incrementing counter to prevent multiple error msgs ; Output: ; INERN,INP and FILE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | SEG+38, SEG+56 |
| ^INTHL7F - [#4012] | SEG+132 |
| ^INTHL7M - [#4011] | SEG+13, SEG+81, SEG+135, SEG+137, SEG+138 |
| ^INTHL7S - [#4010] | SEG+14, SEG+17, SEG+50, SEG+127, SEG+130, SEG+131 |
| ^UTILITY("INHMGD" | SEG+32*, SEG+37* |
| Name | Line Occurrences |
|---|---|
| SEG | SEG+138 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SEG+50, SEG+56 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DATA | SEG+86*, SEG+87*, SEG+88*, SEG+91*, SEG+92*, SEG+93*, SEG+94*, SEG+95*, SEG+99*, SEG+102* , SEG+105*, SEG+108*, SEG+111*, SEG+114*, SEG+117*, SEG+120*, SEG+122* |
| DIC | SEG+21~, SEG+26!, SEG+27*, SEG+59!* |
| DIC("S" | SEG+28*, SEG+60* |
| DIC(0 | SEG+27*, SEG+59* |
| >> DUOUT | SEG+127 |
| FILE | SEG~, SEG+132, SEG+138 |
| FILE( | SEG+27, SEG+32, SEG+33*, SEG+34*, SEG+35, SEG+37, SEG+38, SEG+59 |
| FLVL | SEG~, SEG+27, SEG+32, SEG+33*, SEG+34*, SEG+35*, SEG+37, SEG+38, SEG+59, SEG+132 , SEG+138, SEG+141* |
| INCH | SEG+21~, SEG+136*, SEG+137*, SEG+138 |
| >> INCSG | SEG+18 |
| INDHDR | SEG+21~, SEG+83*, SEG+84*, SEG+88 |
| INERN | SEG~, SEG+31*, SEG+32, SEG+36*, SEG+37, SEG+138 |
| >> INEXIT | SEG+84, SEG+130 |
| INF | SEG+40~, SEG+125*, SEG+127*, SEG+130, SEG+132 |
| INFLD | SEG+40~ |
| INFLD(1 | SEG+131*, SEG+132 |
| >> INHF2 | SEG+123* |
| >> INMSG | SEG+13, SEG+32, SEG+37, SEG+81, SEG+135, SEG+137, SEG+138 |
| >> INOFF | SEG+86 |
| INP | SEG~, SEG+65, SEG+66*, SEG+67*, SEG+68*, SEG+69*, SEG+70*, SEG+71*, SEG+72*, SEG+132 , SEG+138 |
| >> INPAGE | SEG+84 |
| >> INPARS | SEG+30 |
| INREPEAT | SEG+40~, SEG+51*, SEG+52 |
| INSEG | SEG~, SEG+13*, SEG+14, SEG+17, SEG+32, SEG+81, SEG+127, SEG+130, SEG+131, SEG+135 , SEG+137, SEG+138 |
| INSEG(0 | SEG+17*, SEG+18, SEG+41, SEG+66, SEG+67 |
| INSEG(1 | SEG+13*, SEG+22, SEG+23, SEG+25, SEG+26, SEG+34, SEG+45 |
| INSEG(2 | SEG+13* |
| >> INSG("FL" | SEG+56*, SEG+101 |
| >> INSG("LP" | SEG+75*, SEG+110 |
| >> INSG("MF" | SEG+57*, SEG+58, SEG+59, SEG+61*, SEG+70, SEG+104 |
| >> INSG("ML" | SEG+77*, SEG+113 |
| >> INSG("NM" | SEG+42*, SEG+43*, SEG+46*, SEG+47*, SEG+52*, SEG+54*, SEG+68, SEG+69, SEG+71 |
| >> INSG("PS" | SEG+50*, SEG+72, SEG+98 |
| >> INSG("RT" | SEG+81*, SEG+119 |
| >> INSG("TP" | SEG+79*, SEG+116 |
| >> INSG("UD" | SEG+62*, SEG+107 |
| INUDI | SEG+21~, SEG+23*, SEG+24 |
| INWHILE | SEG+21~, SEG+22*, SEG+24, SEG+30*, SEG+35*, SEG+141 |
| INWHILE(1 | SEG+33*, SEG+38* |
| INX | SEG+21~, SEG+26*, SEG+32, SEG+36*, SEG+37, SEG+128*, SEG+130*, SEG+131, SEG+138* |
| INY | SEG+40~, SEG+41*, SEG+42, SEG+43, SEG+45*, SEG+46, SEG+47, SEG+49, SEG+51, SEG+54 , SEG+55, SEG+57, SEG+62, SEG+75, SEG+77, SEG+79 |
| IO | SEG+84, SEG+88 |
| IO(0 | SEG+84, SEG+88 |
| IOSL | SEG+84, SEG+88 |
| >> TAB | SEG+66, SEG+67, SEG+68, SEG+69, SEG+70, SEG+71, SEG+72 |
| U | SEG+18, SEG+22, SEG+23, SEG+25, SEG+26, SEG+32, SEG+33, SEG+34, SEG+37, SEG+38 , SEG+42, SEG+43, SEG+46, SEG+47, SEG+49, SEG+50, SEG+51, SEG+54, SEG+55, SEG+56 , SEG+57, SEG+62, SEG+66, SEG+67, SEG+75, SEG+77, SEG+79 |
| X | SEG+21~, SEG+26*, SEG+49*, SEG+50, SEG+55*, SEG+56, SEG+59*, SEG+77*, SEG+79*, SEG+81* , SEG+131*, SEG+132 |
| Y | SEG+21~, SEG+29, SEG+33, SEG+60 |
| Y(0 | SEG+33, SEG+61 |