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