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