INTSTR2 ;DGH; 5 Aug 97 14:20;Continuation of Required Field functions
Source file <INTSTR2.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Generic Interface System | 3 | GETLINE^INHOU IO^INTSTR VALID^INTSTR1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EXIST(LVL,DEFMES,MESS) | ;Return whether node exists at current level | |
| MESSID(LVL,ID,REP,REQ) | ;Lookup message id for segment at current level | |
| LOOP(INUIF,LVL,UIFMES,UCNT,INCDEC,DEFMES,INERR) | ;Recursive logic | |
| FNDNXT(LVL,CURLVL,DEFMES) | ;Find next "nest" | 
| Name | Line Occurrences | 
|---|---|
| $$EXIST | LOOP+47, LOOP+83, LOOP+103, FNDNXT+27 | 
| FNDNXT | LOOP+49, LOOP+109 | 
| LOOP | LOOP+42, LOOP+52, LOOP+112 | 
| MESSID | FNDNXT+21 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CURCNT | LOOP+27~, LOOP+29*, LOOP+31, LOOP+47, LOOP+103, FNDNXT+17*, FNDNXT+27 | 
| CURLVL | LOOP+27~, LOOP+29*, LOOP+31, LOOP+44, LOOP+47, LOOP+49, LOOP+83, LOOP+85*, LOOP+100, LOOP+103 , LOOP+106, LOOP+109, FNDNXT~, FNDNXT+12, FNDNXT+15, FNDNXT+17*, FNDNXT+19, FNDNXT+27 | 
| >> DEBUG | LOOP+21, LOOP+37 | 
| DEFMES | LOOP~, LOOP+42, LOOP+47, LOOP+49, LOOP+52, LOOP+59, LOOP+67, LOOP+83, LOOP+103, LOOP+109 , LOOP+112, FNDNXT~, FNDNXT+27, EXIST~ | 
| DEFMES( | LOOP+52 | 
| G | LOOP+27~, LOOP+34*, LOOP+35, LOOP+38, LOOP+44, LOOP+80, LOOP+99, EXIST+9*, EXIST+10, EXIST+11 , MESSID+8~, MESSID+11*, MESSID+12 | 
| I | LOOP+32*, LOOP+33, EXIST+7*, EXIST+8, MESSID+8~, MESSID+9*, MESSID+10 | 
| ID | FNDNXT+10~, FNDNXT+21, FNDNXT+23, FNDNXT+24, MESSID~, MESSID+13* | 
| INCDEC | LOOP~, LOOP+23, LOOP+42, LOOP+52, LOOP+57*, LOOP+93, LOOP+105*, LOOP+107, LOOP+112 | 
| INERR | LOOP~, LOOP+42, LOOP+52, LOOP+59, LOOP+67, LOOP+86*, LOOP+112 | 
| >> INEXPND | LOOP+56, LOOP+66 | 
| >> INMSG | LOOP+25*, LOOP+26*, LOOP+38*, LOOP+39*, LOOP+52*, LOOP+56*, LOOP+66*, LOOP+86*, LOOP+95*, FNDNXT+23* | 
| INUIF | LOOP~, LOOP+42, LOOP+52, LOOP+59, LOOP+67, LOOP+112 | 
| >> LCT | LOOP+29*, LOOP+52, LOOP+59, LOOP+67 | 
| >> LINE | LOOP+52 | 
| LVL | LOOP~, LOOP+25, LOOP+28, LOOP+42, LOOP+47, LOOP+49, LOOP+52, LOOP+83, LOOP+103, LOOP+109 , LOOP+112, FNDNXT~, FNDNXT+21, FNDNXT+27, EXIST~, MESSID~ | 
| LVL( | LOOP+29, LOOP+32, LOOP+33, LOOP+44*, LOOP+47*, LOOP+83*, LOOP+100*, LOOP+103*, LOOP+106!, FNDNXT+15! , FNDNXT+17, FNDNXT+27*, EXIST+7, EXIST+8, MESSID+9, MESSID+10 | 
| LVL("" | LOOP+29, FNDNXT+17 | 
| LVL(1 | FNDNXT+12*, FNDNXT+19* | 
| >> MATCH | LOOP+54*, LOOP+55, LOOP+95, LOOP+99 | 
| MESS | LOOP+27~, LOOP+83, LOOP+85, LOOP+86, EXIST~, EXIST+10*, MESSID+8~ | 
| MESS(0 | LOOP+35*, LOOP+36, LOOP+38, MESSID+12*, MESSID+13 | 
| MREP | LOOP+27~, LOOP+36*, LOOP+39, FNDNXT+24* | 
| MREQ | LOOP+27~, LOOP+36*, LOOP+39, LOOP+56, LOOP+95, FNDNXT+24* | 
| MSID | LOOP+27~, LOOP+36*, LOOP+39, LOOP+40, LOOP+42, LOOP+54, LOOP+56, LOOP+59, LOOP+64, LOOP+66 , LOOP+67, LOOP+95, FNDNXT+24* | 
| ORD | LOOP+27~, LOOP+32*, LOOP+33*, LOOP+34, EXIST+7*, EXIST+8*, EXIST+9, MESSID+8~, MESSID+9*, MESSID+10* , MESSID+11 | 
| OUT | LOOP+62*, LOOP+63*, LOOP+64*, LOOP+74*, LOOP+78*, LOOP+87, FNDNXT+10~, FNDNXT+13*, FNDNXT+19*, FNDNXT+24* , FNDNXT+27* | 
| OUT2 | LOOP+27~, LOOP+82*, LOOP+83*, LOOP+86* | 
| >> QX | LOOP+25*, LOOP+26* | 
| REP | FNDNXT+10~, FNDNXT+21, FNDNXT+23, FNDNXT+24, MESSID~, MESSID+13* | 
| REQ | FNDNXT+10~, FNDNXT+21, FNDNXT+24, MESSID~, MESSID+13* | 
| U | LOOP+36, LOOP+64, LOOP+85, LOOP+86, MESSID+13 | 
| UCNT | LOOP~, LOOP+23, LOOP+28, LOOP+36, LOOP+42, LOOP+52*, LOOP+59, LOOP+63*, LOOP+64, LOOP+67 , LOOP+76, LOOP+112 | 
| UIFMES | LOOP~, LOOP+42, LOOP+52, LOOP+59, LOOP+67, LOOP+112 | 
| UIFMES( | LOOP+36, LOOP+52, LOOP+63, LOOP+64 | 
| USID | LOOP+27~, LOOP+36*, LOOP+39, LOOP+52, LOOP+54, LOOP+64*, LOOP+95, FNDNXT+21 | 
| >> X | LOOP+47*, LOOP+83*, LOOP+103* |