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* |