INHSGZ2 ;JSH,DGH; 21 Jan 2000 17:18 ;Interface - script generator for INPUT scripts
Source file <INHSGZ2.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Generic Interface System | 5 | ^INHDIA (FIELD,ROPOST,ROPOST1,WP)^INHSGZ20 (LINK,TL)^INHSGZ21 (FILE,INIT,SEGEND,SEGINIT)^INHSGZ22 $$SC^INHUTIL1 | 
| Uncategorized | 1 | $$LBTB^UTIL | 
| VA Fileman | 1 | ^DIC | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Generic Interface System | 4 | INHSGZ INHSGZ1 INHSGZ20 INHSGZ21 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ||
| SEG1(SEG) | ;Process segment | |
| SEGARRY | ;Set up array of defined segments | |
| L1 | ||
| ERROR(%M) | ;Process an error | |
| L(%L,%C) | ;Place a line in the global | |
| WARN(%M) | ;Display a warning | |
| IN | ;Enter here with: ; FILE = file # ; MESS = entry # of message ; MESS(0) = zero node of message file entry | |
| SEG(SEG) | ;Process segment | |
| NOLS1 | ; Recursively process child segment if applicable | |
| K | ||
| NOLS | 
| Name | Field # of Occurrence | 
|---|---|
| ^DIC | SEG+14 | 
| ^INHDIA | NOLS+26 | 
| FIELD^INHSGZ20 | NOLS+18 | 
| ROPOST^INHSGZ20 | NOLS+36 | 
| ROPOST1^INHSGZ20 | NOLS+40 | 
| WP^INHSGZ20 | SEG+16 | 
| LINK^INHSGZ21 | NOLS+26 | 
| TL^INHSGZ21 | NOLS+22 | 
| FILE^INHSGZ22 | SEGARRY+16 | 
| INIT^INHSGZ22 | EN+1 | 
| SEGEND^INHSGZ22 | NOLS+36 | 
| SEGINIT^INHSGZ22 | SEG+17 | 
| $$SC^INHUTIL1 | EN+1 | 
| $$LBTB^UTIL | SEGARRY+13 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD( | SEG+15, SEG+16 | 
| ^DIC - [#1] | EN+1, SEG+10, NOLS+26 | 
| ^INTHL7F - [#4012] | NOLS+14, NOLS+18 | 
| ^INTHL7M - [#4011] | SEGARRY+5, SEGARRY+7, SEGARRY+8, SEGARRY+12, SEG+2, NOLS+37, SEG1+2, NOLS1+3 | 
| ^INTHL7S - [#4010] | SEG+3, NOLS+12, NOLS+13, NOLS+18, SEG1+3 | 
| ^UTILITY("INDIA" | SEG+4!, NOLS+23, NOLS+25* | 
| ^UTILITY("INS" | L1+1*, SEGARRY+11*, SEGARRY+13*, SEGARRY+15*, SEGARRY+16* | 
| Name | Line Occurrences | 
|---|---|
| EN | IN+8 | 
| ERROR | SEG+14, SEG+15 | 
| K | IN+8 | 
| L | EN, EN+3, EN+4, EN+5, EN+7, EN+9, SEGARRY+3, SEGARRY+10, SEGARRY+12, SEGARRY+14 , NOLS, NOLS+3, NOLS+6, NOLS+7, NOLS+15, NOLS+16, NOLS+20, NOLS+28, NOLS+29, NOLS+30 , NOLS+31, NOLS+32, NOLS+33, NOLS+35, NOLS+38, NOLS+39, NOLS1+2 | 
| NOLS | SEG+9 | 
| NOLS1 | SEG1+5 | 
| SEG | SEGARRY+8, NOLS+37 | 
| SEG1 | SEGARRY+5, NOLS1+3 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | SEGARRY+5, SEGARRY+8, SEGARRY+12, NOLS+18, NOLS+37, NOLS1+3 | 
| ^(0 | SEGARRY+12, SEG+3, SEG1+3 | 
| ^(5 | SEGARRY+7 | 
| ^(702 | SEGARRY+11* | 
| ^(800 | SEGARRY+11* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %C | L~, L1+1 | 
| %L | L~, L1, L1+1* | 
| %M | ERROR~, ERROR+2, WARN~, WARN+2 | 
| A | L1+1, K!, EN*, EN+3*, EN+4*, EN+5*, EN+7*, EN+9*, SEGARRY+3*, SEGARRY+10* , SEGARRY+12*, SEGARRY+14*, NOLS*, NOLS+3*, NOLS+6*, NOLS+7*, NOLS+15*, NOLS+16*, NOLS+20*, NOLS+22* , NOLS+28*, NOLS+29*, NOLS+30*, NOLS+31*, NOLS+32*, NOLS+33*, NOLS+35*, NOLS+38*, NOLS+39*, NOLS1+2* | 
| ALIAS | SEG+5~ | 
| >> ARNAME | EN+4, SEGARRY+16, NOLS+30 | 
| >> ARSEG( | NOLS+30 | 
| CH | SEG+4~, NOLS+37*, SEG1+4~, NOLS1+3* | 
| >> CL | NOLS+1*, NOLS+6*, NOLS+20 | 
| >> CP | NOLS+1* | 
| DATA | K!, EN*, EN+3, EN+4, EN+5, EN+7, EN+9, SEGARRY+3, SEGARRY+10, SEGARRY+14 , NOLS, NOLS+3, NOLS+6, NOLS+7, NOLS+20, NOLS+39, NOLS1+2 | 
| DIC | SEG+13!* | 
| DIC(0 | SEG+13* | 
| DTY | K! | 
| >> ERR | SEGARRY+8, SEGARRY+9, SEG+17, NOLS+18, NOLS+19, ERROR+2* | 
| >> F | NOLS+26* | 
| FF | NOLS+11~*, NOLS+14*, NOLS+15 | 
| FIELD | K!, NOLS+11~, NOLS+12*, NOLS+13*, NOLS+14, NOLS+18* | 
| >> FILE | EN+1 | 
| >> FILE( | SEG+10*, SEG+13, SEG+15*, SEG+16, NOLS+26 | 
| >> FILE(0 | EN+1* | 
| FLVL | K!, EN*, SEG+10*, SEG+13, SEG+15*, SEG+16, NOLS+22*, NOLS+26 | 
| FSAV | K! | 
| GL | K! | 
| GROUP | K!, EN*, SEGARRY+10*, NOLS+6*, NOLS+7* | 
| I | SEGARRY+12*, SEGARRY+15*, NOLS+25~*, NOLS+32*, NOLS+33*, NOLS+35* | 
| IDENT | K!, EN* | 
| IDX | SEGARRY+2~ | 
| INAUDIT | K!, EN+1*, EN+4, SEGARRY+14, SEGARRY+16, SEG+17, NOLS+30, NOLS+36 | 
| INCOUNT | SEG+5~ | 
| >> INF | NOLS+17*, NOLS+18* | 
| >> INF0 | NOLS+17*, NOLS+18* | 
| >> INIDF | SEG+8*, NOLS+3 | 
| >> INIDV | SEG+8*, NOLS+3 | 
| >> INS | SEGARRY+5*, SEGARRY+8* | 
| INSG | SEGARRY+2~, NOLS1+1*, NOLS1+2 | 
| >> INSTD | EN+2*, EN+3, EN+5, EN+7, EN+9, SEG+8, NOLS+3, NOLS+5, NOLS+10, NOLS+16 | 
| INSYS | K!, EN+1* | 
| LOOKUP | K!, EN*, SEGARRY+12, NOLS+32, NOLS+33 | 
| LOOPDAD | SEG+5~ | 
| LOOPID | SEG+5~ | 
| LOOPM1 | SEG+5~ | 
| LOOPM2 | SEG+5~ | 
| LOOPREC | SEG+5~ | 
| LOOPST | SEG+5~ | 
| LSR | L1, K!, SEGARRY+7*, SEGARRY+11, SEGARRY+13, SEG+12 | 
| LVAR | K! | 
| >> MESS | SEGARRY+5, SEGARRY+7, SEGARRY+8, SEGARRY+12, SEG+2, SEG+11, NOLS+37, SEG1+2, NOLS1+3 | 
| >> MESS(0 | EN+1, EN+3, SEGARRY+11, SEG+12 | 
| >> MESS(1 | SEGARRY+5*, SEGARRY+8*, SEG+2*, SEG+8, SEG+9, SEG+10, SEG+11, NOLS+6, NOLS+7, NOLS+35 , SEG1+2*, SEG1+5, NOLS1+2 | 
| MULT | K!, EN*, NOLS+22* | 
| MULTF | K!, SEG+4~, SEG+15* | 
| MULTL | K!, SEG+4~, SEG+6* | 
| MULTL( | NOLS+25 | 
| MUMPS | K!, SEG+4~, SEG+11*, NOLS+33 | 
| NODATA | SEG+5~ | 
| NOLS | K!, SEG+9*, NOLS+17, NOLS+27, NOLS+36, NOLS+40 | 
| NOSTORE | K!, SEG+4~, SEG+9*, SEG+12*, NOLS+23 | 
| OTHER | K!, SEG+4~, SEG+9*, SEG+10*, SEG+12, SEG+13, SEG+14, SEG+15, NOLS+23, NOLS+26 , NOLS+27, NOLS+36, NOLS+40 | 
| REPEAT | K!, EN*, SEG+4~, SEG+9*, SEG+11*, SEG+12, SEG+13, SEG+17, NOLS+6, NOLS+7 , NOLS+26, NOLS+27, NOLS+36, NOLS+39, NOLS+40, SEG1+4~, SEG1+5*, NOLS1+4 | 
| REPEAT("REQ" | NOLS+17!, NOLS+34, NOLS+35 | 
| REQ | K!, NOLS+18* | 
| REQUIRED | K!, EN*, NOLS+35 | 
| ROUTINE | K!, SEG+4~, SEG+11*, NOLS+29 | 
| SCODE | K!, SEG+4~, SEG+11*, NOLS+32 | 
| >> SCR | NOLS+24 | 
| SEG | K!, SEG~, SEG+2*, SEG+3, NOLS+12, NOLS+13, NOLS+18, NOLS+37, SEG1~, SEG1+2* , SEG1+3, NOLS1+3 | 
| SEG(0 | SEG+3*, SEG+9, SEG+14, NOLS, NOLS+1, NOLS+6, NOLS+15, NOLS+16, NOLS+28, NOLS+30 , NOLS+35, SEG1+3*, NOLS1+1 | 
| SEG(1 | NOLS+18* | 
| SEG(2 | SEG+2*, SEG+11 | 
| SEGC | K!, SEGARRY+8*, NOLS+24*, NOLS+28* | 
| SLVL | K!, EN*, SEGARRY+2~, SEGARRY+4*, SEG+9*, SEG+17*, NOLS+39*, SEG1+5*, NOLS1+2, NOLS1+4* | 
| >> STL | SEGARRY+8* | 
| STORE | K!, EN*, NOLS+28, NOLS+29, NOLS+30, NOLS+31 | 
| SVAR | K! | 
| SVAR( | SEG+9!*, NOLS+17!, NOLS+34, NOLS+35 | 
| T | NOLS+23!, NOLS+24*, NOLS+26, NOLS+28 | 
| T1 | NOLS+23*, NOLS+24~, NOLS+28 | 
| TEMP | K!, SEG+6* | 
| TRANS | K!, EN*, NOLS+15, NOLS+16, NOLS+38 | 
| U | L1+1, EN+1, EN+3, SEGARRY+5, SEGARRY+8, SEGARRY+11, SEG+8, SEG+9, SEG+10, SEG+11 , SEG+12, SEG+13, SEG+14, SEG+15, SEG+16, NOLS, NOLS+1, NOLS+6, NOLS+7, NOLS+15 , NOLS+16, NOLS+18, NOLS+23, NOLS+25, NOLS+26, NOLS+28, NOLS+30, NOLS+35, SEG1+5, NOLS1+1 , NOLS1+2 | 
| UFL | K!, NOLS+18* | 
| WP | SEG+4~, SEG+13*, SEG+16* | 
| >> X | SEGARRY+5*, SEGARRY+8*, SEG+13*, NOLS+18* | 
| >> Y | SEG+14, SEG+15, NOLS+18* | 
| >> Z | NOLS+30* |