BLRUTIL6 ;IHS/MSC/MKK - MISC IHS LAB UTILITIES (Cont) ; 04-Apr-2016 14:28 ; MKK
Source file <BLRUTIL6.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 4 | ^%ZIS ^%ZISC ($$DT,$$FMTE,$$HTE,$$HTFM)^XLFDT ($$CJ,$$UP)^XLFSTR | 
| IHS Changes To Lab | 3 | (HEADERDT,HEADERPG,HEADONE,PRESSKEY)^BLRGMENU $$ORD^BLRRLEDI (MAILALMI,SENDMAIL)^BLRUTIL3 | 
| VA Fileman | 3 | $$FIND1^DIC UPDATE^DIE $$GET1^DIQ | 
| IHS VA Utilities | 1 | ^XBCLS | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Changes To Lab | 6 | BLRAG05 BLRNLINK BLRSGNSY BLRTN BLRUTIL BLRUTIL7 | 
| Lab Service | 2 | LR7OF1 LRWLST1 | 
| IHS Laboratory Point of Care | 1 | BLRPOC2 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DEBUGMI | ; EP - from BLRUTIL. | |
| GETSTACK | ; EP -- from BLRUTIL. | |
| MAKEITSO | ; EP - Reset PROCESSING DATE variable | |
| REFLABCK(F60PTR,LRODT,LRSP) | ; EP - Return 1 if Test is a Reference Lab test, otherwise return 0 (zero) | |
| STORDIAG(LRODT,LRSP,LROT,ICDSTR) | ; EP - Store the Diagnosis code(s) | |
| ADDCOMNT(LRDFN,LRSS,LRIDT,WOT,ERRCNT) | ; EP - Add the comment | |
| F629MAP(F60IEN) | ; EP - Is test mapped in the LAB CONFIGURATION (#62.9) File? (1=YES,0=No) | |
| DUPNAMEI() | ; EP - Initialization | |
| UPDTCOML(LRDFN,LRSS,LRIDT,ARRAY,ERRORMSG) | ; EP - Update the Comment line(s) | |
| DUPNAMEC(ARRAY) | ; EP - Check on the DataName | |
| IHSCOLS | ; EP - From LRWLST1. | |
| FINDSEXR | ; EP - Find usage of SEX in Reference Ranges in File 60 | |
| SETBLRVS(TWO) | ; EP - Use the STACK to find the Routine and set the BLRVRN variable(S) | |
| REFLAB(INSTIEN,F60IEN) | ; EP - If Test has been MAPPED, return 1 else return 0 | |
| BADSTUFN(MSG) | ; EP - Quits with "" | |
| BADSTUFQ(MSG) | ; EP - Quits with "Q" | |
| PASSMESG(WOT) | ; EP -- Splash message | |
| ADBLRRLO(LRODT,LRSP,LROT) | ; EP - Add ICD(s) to 9009026.3 | |
| BADSTUFF(MSG) | ; EP - 'Routine Ends' prompt | |
| DUPNAMEL | ; EP - Line of Data | |
| MAKETMPC(WOTRTN) | ; EP - Keep track of # of times tried to reset | |
| FINDSEXB | ; EP - Breakout Data | |
| FINDSEXL | ; EP - Line of Data | |
| DUPDNAME | ; EP - Find Instances of Duplicate DataNames | |
| FINDSEXI() | ; EP - Initialization | 
| Name | Field # of Occurrence | 
|---|---|
| ^%ZIS | DUPNAMEI+15, FINDSEXI+21 | 
| ^%ZISC | DUPDNAME+14, FINDSEXR+12 | 
| HEADERDT^BLRGMENU | DUPNAMEI+6, FINDSEXI+6 | 
| HEADERPG^BLRGMENU | DUPNAMEL+3, DUPNAMEL+7, FINDSEXL+4 | 
| HEADONE^BLRGMENU | DUPNAMEI+7, FINDSEXI+7 | 
| PRESSKEY^BLRGMENU | DUPDNAME+16, DUPNAMEI+18, FINDSEXR+14, FINDSEXI+24, BADSTUFF+2 | 
| $$ORD^BLRRLEDI | STORDIAG+16, ADBLRRLO+11 | 
| MAILALMI^BLRUTIL3 | MAKETMPC+25 | 
| SENDMAIL^BLRUTIL3 | UPDTCOML+21 | 
| $$FIND1^DIC | STORDIAG+18, ADBLRRLO+13 | 
| UPDATE^DIE | ADDCOMNT+9, ADBLRRLO+28 | 
| $$GET1^DIQ | DEBUGMI+2, FINDSEXR+6, FINDSEXB+2, IHSCOLS+6, IHSCOLS+29, IHSCOLS+30, STORDIAG+5, STORDIAG+8, STORDIAG+11, STORDIAG+12 , ADBLRRLO+5, ADBLRRLO+8, ADBLRRLO+9, ADBLRRLO+10, ADBLRRLO+16, ADBLRRLO+21, ADBLRRLO+23, REFLABCK+3, REFLABCK+4, REFLAB+3 , REFLAB+7, F629MAP+5 | 
| ^XBCLS | PASSMESG+8 | 
| $$DT^XLFDT | MAKETMPC+28 | 
| $$FMTE^XLFDT | DUPNAMEL+14 | 
| $$HTE^XLFDT | ADDCOMNT+3 | 
| $$HTFM^XLFDT | MAKETMPC+28 | 
| $$CJ^XLFSTR | PASSMESG+10, PASSMESG+11, PASSMESG+12, FINDSEXI+10, FINDSEXI+11 | 
| $$UP^XLFSTR | ADDCOMNT+3, FINDSEXL+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^SC - [#44] | GET1^DIQ | 
| ^LAB(60 - [#60] | GET1^DIQ | 
| 60.03 | GET1^DIQ | 
| ^LAB(61 - [#61] | GET1^DIQ | 
| ^LAHM(62.9 - [#62.9] | GET1^DIQ | 
| ^LR - [#63] | GET1^DIQ | 
| ^LRO(68 - [#68] | GET1^DIQ | 
| 69.01 | GET1^DIQ | 
| 69.03 | GET1^DIQ | 
| 69.05 | GET1^DIQ | 
| ^ICD9 - [#80] | GET1^DIQ | 
| ^BLRRLO - [#9009026.3] | FIND1^DIC | 
| ^BLRSITE - [#9009029] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^BLRENTRY | GETSTACK+5*, GETSTACK+6*, GETSTACK+7*, GETSTACK+8* | 
| ^BLRRL("ALP" | REFLAB+9 | 
| ^DD(63.04 | DUPDNAME+5, DUPNAMEC+8, DUPNAMEC+11 | 
| ^LAB(60 - [#60] | DUPNAMEL+15, FINDSEXR+5, FINDSEXR+8, FINDSEXL+1, IHSCOLS+28 | 
| ^LAHM(62.9 - [#62.9] | F629MAP+4, F629MAP+6 | 
| ^LR - [#63] | UPDTCOML+13, ADDCOMNT+5 | 
| ^LRO(68 - [#68] | DEBUGMI+4 | 
| ^LRO(69 - [#69] | IHSCOLS+46*, ADBLRRLO+20 | 
| ^TMP( | MAKEITSO+7!, MAKETMPC+16*, MAKETMPC+17*, MAKETMPC+19 | 
| ^TMP("BLRUTIL6" | ADDCOMNT+12*, ADDCOMNT+13*, ADDCOMNT+14* | 
| ^TMP("LRORDST" | IHSCOLS+11, IHSCOLS+12, IHSCOLS+13, IHSCOLS+14 | 
| ^XTMP( | MAKETMPC+20, MAKETMPC+28*, MAKETMPC+29* | 
| Name | Line Occurrences | 
|---|---|
| $$DUPNAMEC | DUPNAMEL+1 | 
| $$DUPNAMEI | DUPDNAME+3 | 
| $$F629MAP | REFLAB+7 | 
| $$FINDSEXI | FINDSEXR+3 | 
| $$REFLAB | REFLABCK+6 | 
| $$REFLABCK | STORDIAG+6, ADBLRRLO+6 | 
| ADBLRRLO | STORDIAG+22 | 
| ADDCOMNT | UPDTCOML+8 | 
| BADSTUFF | BADSTUFQ+1, BADSTUFN+1 | 
| DUPNAMEL | DUPDNAME+5 | 
| FINDSEXB | FINDSEXL+5 | 
| FINDSEXL | FINDSEXR+8 | 
| MAKETMPC | MAKEITSO+5 | 
| SETBLRVS | MAKETMPC+3, DUPNAMEI+1, FINDSEXI+1 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(3 | DEBUGMI+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ANSWER | UPDTCOML+1~ | 
| AROUND | PASSMESG+1~, PASSMESG+5*, PASSMESG+10, PASSMESG+12 | 
| ARRAY | UPDTCOML~, UPDTCOML+3, DUPNAMEC~, DUPNAMEC+5! | 
| ARRAY( | UPDTCOML+6, UPDTCOML+7, UPDTCOML+8, DUPNAMEC+10*, DUPNAMEC+11* | 
| ASKORDQ | UPDTCOML+1~ | 
| >> BLRQDH | MAKEITSO+2, MAKEITSO+3*, MAKEITSO+4, MAKETMPC+24, MAKETMPC+29 | 
| BLRVERN | MAKETMPC+1~, MAKETMPC+4, MAKETMPC+8, SETBLRVS+1!, SETBLRVS+3* | 
| BLRVERN2 | SETBLRVS+1!, SETBLRVS+4* | 
| >> CNT | DUPDNAME+11, DUPNAMEI+22*, DUPNAMEL+21*, FINDSEXR+10, FINDSEXI+29*, FINDSEXL+18* | 
| >> CNTDN | DUPNAMEL+5*, DUPNAMEL+9*, DUPNAMEL+10 | 
| COLLSAMP | IHSCOLS+1~, IHSCOLS+35*, IHSCOLS+39*, IHSCOLS+41, IHSCOLS+43, IHSCOLS+46, IHSCOLS+49 | 
| COLLSIEN | IHSCOLS+1~, IHSCOLS+28*, IHSCOLS+29 | 
| CONTEXT | MAKETMPC+1~, MAKETMPC+7*, MAKETMPC+8, MAKETMPC+9, MAKETMPC+12* | 
| CONTXT | GETSTACK+1~, GETSTACK+3*, GETSTACK+4 | 
| >> CREATEDT | DUPNAMEL+13*, DUPNAMEL+14 | 
| >> CRITHIGH | FINDSEXL+14, FINDSEXB+7* | 
| >> CRITLOW | FINDSEXL+13, FINDSEXB+6* | 
| CRTLINE | PASSMESG+1~ | 
| CSAMP1 | IHSCOLS+1~, IHSCOLS+29*, IHSCOLS+35, IHSCOLS+39 | 
| CSAMP2 | IHSCOLS+1~, IHSCOLS+30*, IHSCOLS+33*, IHSCOLS+35 | 
| CSAMP3 | IHSCOLS+1~ | 
| >> DATADESC | DUPDNAME+5*, DUPNAMEI+25*, DUPNAMEL+12, DUPNAMEC+8 | 
| >> DATANAME | DUPNAMEL+5*, DUPNAMEL+6*, DUPNAMEL+11, DUPNAMEL+13, DUPNAMEL+15 | 
| >> DATANCNT | DUPDNAME+10, DUPNAMEI+26*, DUPNAMEC+1* | 
| >> DFN | STORDIAG+12*, STORDIAG+16, ADBLRRLO+10*, ADBLRRLO+11 | 
| DIE | UPDTCOML+1~ | 
| >> DILOCKTM | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> DISYS | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> DMLRDFN | DEBUGMI+4* | 
| >> DMLRIDT | DEBUGMI+4* | 
| DN | DUPNAMEC+3~, DUPNAMEC+7*, DUPNAMEC+8*, DUPNAMEC+10, DUPNAMEC+11, IHSCOLS+1~ | 
| DT | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| DTIME | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> DUPNAMEA | DUPNAMEL+1 | 
| >> DUPNAMEA( | DUPNAMEL+6, DUPNAMEL+13 | 
| DUZ | GETSTACK+5, GETSTACK+6, GETSTACK+7, GETSTACK+8, DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> ENTRYNUM | GETSTACK+5, GETSTACK+6, GETSTACK+7, GETSTACK+8 | 
| ERRCNT | UPDTCOML+1~, UPDTCOML+5*, UPDTCOML+8, UPDTCOML+10, ADDCOMNT~, ADDCOMNT+15* | 
| ERRORMSG | UPDTCOML~, UPDTCOML+21 | 
| ERRS | UPDTCOML+1~, ADBLRRLO+25! | 
| ERRS("DIERR" | ADDCOMNT+11, ADDCOMNT+14 | 
| >> F60DESC | FINDSEXR+6*, FINDSEXL+8 | 
| F60IEN | FINDSEXR+5*, FINDSEXR+6, FINDSEXR+8, FINDSEXI+29*, FINDSEXL+1, FINDSEXL+7, IHSCOLS+1~, IHSCOLS+16*, IHSCOLS+17, IHSCOLS+20 , IHSCOLS+28, IHSCOLS+29, REFLAB~, REFLAB+7, REFLAB+9, F629MAP~, F629MAP+6 | 
| F60PTR | STORDIAG+5*, STORDIAG+6, ADBLRRLO+5*, ADBLRRLO+6, ADBLRRLO+16*, ADBLRRLO+27, REFLABCK~, REFLABCK+6 | 
| F69CSAMP | IHSCOLS+4~, IHSCOLS+6*, IHSCOLS+7, IHSCOLS+8 | 
| FDA | UPDTCOML+1~, ADDCOMNT+1~, ADBLRRLO+25! | 
| FDA( | ADDCOMNT+7*, IHSCOLS+8*, IHSCOLS+22*, IHSCOLS+43*, ADBLRRLO+26*, ADBLRRLO+27* | 
| FRMWHERE | MAKETMPC+1~, MAKETMPC+4*, MAKETMPC+8, MAKETMPC+9*, MAKETMPC+10*, MAKETMPC+11*, MAKETMPC+14, MAKETMPC+16, MAKETMPC+17, MAKETMPC+19 , MAKETMPC+20, MAKETMPC+25, MAKETMPC+28, MAKETMPC+29 | 
| >> HDRONE | DUPNAMEI+7, DUPNAMEL+3, DUPNAMEL+7, FINDSEXI+7, FINDSEXL+4 | 
| >> HEADER(1 | DUPNAMEI+3*, FINDSEXI+3* | 
| >> HEADER(2 | DUPNAMEI+4*, FINDSEXI+4* | 
| >> HEADER(3 | DUPNAMEI+9*, FINDSEXI+9* | 
| >> HEADER(4 | DUPNAMEI+10*, DUPNAMEI+11*, DUPNAMEI+12*, DUPNAMEI+13*, FINDSEXI+10*, FINDSEXI+11*, FINDSEXI+12*, FINDSEXI+13*, FINDSEXI+14* | 
| >> HEADER(5 | FINDSEXI+15*, FINDSEXI+16*, FINDSEXI+17*, FINDSEXI+18*, FINDSEXI+19* | 
| >> ICD | ADBLRRLO+19*, ADBLRRLO+20*, ADBLRRLO+21 | 
| >> ICDIEN | ADBLRRLO+21*, ADBLRRLO+23, ADBLRRLO+26 | 
| ICDSTR | STORDIAG~, STORDIAG+1, STORDIAG+3 | 
| IEN | ADBLRRLO+3*, ADBLRRLO+5, ADBLRRLO+8, ADBLRRLO+9, ADBLRRLO+16, ADBLRRLO+17*, ADBLRRLO+21, F629MAP+1~, F629MAP+3*, F629MAP+4* , F629MAP+5, F629MAP+6 | 
| IENS | UPDTCOML+1~, ADDCOMNT+1~ | 
| IENS(1 | ADDCOMNT+5* | 
| INSTIEN | REFLAB~, REFLAB+3, REFLAB+7 | 
| IO | DUPDNAME+1, DUPNAMEI+20, FINDSEXR+1, FINDSEXI+26, STORDIAG+1, ADBLRRLO+1 | 
| >> IOBS | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| IOF | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| IOM | PASSMESG+9, PASSMESG+10, PASSMESG+11, PASSMESG+12, PASSMESG+13, DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| ION | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> IOS | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| IOSL | DUPDNAME+1, DUPNAMEI+23, FINDSEXR+1, FINDSEXI+28, STORDIAG+1, ADBLRRLO+1 | 
| IOST | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> IOT | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> IOXY | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> J | PASSMESG+4* | 
| >> LABEL | GETSTACK+5, GETSTACK+6, GETSTACK+7, GETSTACK+8 | 
| >> LINE | UPDTCOML+5*, UPDTCOML+6*, UPDTCOML+7, UPDTCOML+8 | 
| >> LINES | DUPNAMEI+23*, DUPNAMEL+3, DUPNAMEL+7, DUPNAMEL+17*, DUPNAMEL+20*, FINDSEXI+28*, FINDSEXL+4, FINDSEXL+19* | 
| LOOP | GETSTACK+1~, GETSTACK+4*, GETSTACK+5, GETSTACK+6, GETSTACK+7, GETSTACK+8 | 
| >> LR6802 | IHSCOLS+8, IHSCOLS+22, IHSCOLS+43 | 
| >> LRAA | DEBUGMI+1, DEBUGMI+2, DEBUGMI+4 | 
| >> LRAD | DEBUGMI+1, DEBUGMI+4 | 
| >> LRAN | DEBUGMI+1, DEBUGMI+4 | 
| LRAS | UPDTCOML+1~, UPDTCOML+13*, UPDTCOML+14 | 
| LRDFN | UPDTCOML~, UPDTCOML+8, UPDTCOML+13, UPDTCOML+15, ADDCOMNT~, ADDCOMNT+5, ADDCOMNT+7, ADDCOMNT+12, ADDCOMNT+13, ADDCOMNT+14 , STORDIAG+11*, STORDIAG+12, ADBLRRLO+8*, ADBLRRLO+10 | 
| >> LRI | IHSCOLS+8, IHSCOLS+22, IHSCOLS+43 | 
| LRIDT | UPDTCOML~, UPDTCOML+8, UPDTCOML+13, UPDTCOML+17, ADDCOMNT~, ADDCOMNT+5, ADDCOMNT+7, ADDCOMNT+12, ADDCOMNT+13, ADDCOMNT+14 | 
| LRODT | IHSCOLS+6, IHSCOLS+46, STORDIAG~, STORDIAG+1, STORDIAG+5, STORDIAG+6, STORDIAG+8, STORDIAG+11, STORDIAG+14, STORDIAG+22 , ADBLRRLO~, ADBLRRLO+1, ADBLRRLO+3, ADBLRRLO+6, ADBLRRLO+17, ADBLRRLO+20, REFLABCK~, REFLABCK+3 | 
| LROT | STORDIAG~, STORDIAG+1, STORDIAG+5, STORDIAG+14, STORDIAG+22, ADBLRRLO~, ADBLRRLO+1, ADBLRRLO+5, ADBLRRLO+16, ADBLRRLO+17 , ADBLRRLO+20 | 
| >> LRSAMP | IHSCOLS+19, IHSCOLS+21*, IHSCOLS+22, IHSCOLS+49* | 
| >> LRSN | IHSCOLS+6, IHSCOLS+46 | 
| LRSP | STORDIAG~, STORDIAG+1, STORDIAG+5, STORDIAG+6, STORDIAG+8, STORDIAG+11, STORDIAG+14, STORDIAG+22, ADBLRRLO~, ADBLRRLO+1 , ADBLRRLO+3, ADBLRRLO+6, ADBLRRLO+17, ADBLRRLO+20, REFLABCK~, REFLABCK+3 | 
| >> LRSPEC | IHSCOLS+21*, IHSCOLS+25*, IHSCOLS+26*, IHSCOLS+30 | 
| LRSS | UPDTCOML~, UPDTCOML+8, UPDTCOML+13, UPDTCOML+16, ADDCOMNT~, ADDCOMNT+12, ADDCOMNT+13, ADDCOMNT+14 | 
| >> LRTSTS | IHSCOLS+16 | 
| >> LRX | IHSCOLS+25 | 
| >> LRZX | IHSCOLS+33 | 
| MAILARRY | UPDTCOML+1~, UPDTCOML+21 | 
| MAILARRY(1 | UPDTCOML+14* | 
| MAILARRY(2 | UPDTCOML+14* | 
| MAILARRY(3 | UPDTCOML+15* | 
| MAILARRY(4 | UPDTCOML+16* | 
| MAILARRY(5 | UPDTCOML+17* | 
| MAILARRY(6 | UPDTCOML+18* | 
| MAILARRY(7 | UPDTCOML+19* | 
| MAILARRY(8 | UPDTCOML+19* | 
| MAPPED | F629MAP+1~, F629MAP+3*, F629MAP+4, F629MAP+6*, F629MAP+8 | 
| MAXIT | PASSMESG+1~, PASSMESG+3*, PASSMESG+4*, PASSMESG+5, PASSMESG+6*, PASSMESG+11 | 
| >> MAXLINES | DUPNAMEI+23*, DUPNAMEL+3, DUPNAMEL+7, FINDSEXI+28*, FINDSEXL+4 | 
| MSG | BADSTUFF~, BADSTUFF+1, BADSTUFQ~, BADSTUFQ+1, BADSTUFN~, BADSTUFN+1 | 
| MSGARRAY | MAKETMPC+1~, MAKETMPC+25 | 
| MSGARRAY(1 | MAKETMPC+23* | 
| MSGARRAY(2 | MAKETMPC+24* | 
| >> NOW | GETSTACK+5, GETSTACK+6, GETSTACK+7, GETSTACK+8 | 
| NUMDUPS | DUPNAMEC+3~, DUPNAMEC+7*, DUPNAMEC+9*, DUPNAMEC+13 | 
| ORD | UPDTCOML+1~ | 
| >> ORDERN | STORDIAG+8*, STORDIAG+9, STORDIAG+16, STORDIAG+18, ADBLRRLO+9*, ADBLRRLO+11, ADBLRRLO+13 | 
| >> ORDIEN | STORDIAG+18*, STORDIAG+19, ADBLRRLO+13*, ADBLRRLO+14, ADBLRRLO+26, ADBLRRLO+27 | 
| ORDLINST | REFLABCK+1~, REFLABCK+4*, REFLABCK+6 | 
| ORDLOC | REFLABCK+1~, REFLABCK+3*, REFLABCK+4 | 
| P60 | UPDTCOML+1~ | 
| P60BORDR | UPDTCOML+1~ | 
| P60DESC | UPDTCOML+1~ | 
| >> PG | DUPNAMEI+22*, DUPNAMEL+3, DUPNAMEL+7, FINDSEXI+29*, FINDSEXL+4 | 
| >> POP | DUPNAMEI+16, FINDSEXI+22 | 
| >> QFLG | DUPDNAME+5, DUPNAMEI+24*, DUPNAMEL+3, DUPNAMEL+6, DUPNAMEL+7, FINDSEXR+5, FINDSEXR+8, FINDSEXI+30*, FINDSEXL+4 | 
| QUESCNT | UPDTCOML+1~ | 
| >> REFHIGH | FINDSEXL+12, FINDSEXB+5* | 
| REFLLABS | REFLAB+1~, REFLAB+3*, REFLAB+4, REFLAB+9 | 
| >> REFLOW | FINDSEXL+11, FINDSEXB+4* | 
| RJAMT | ADDCOMNT+1~ | 
| >> SITESPEC | FINDSEXR+7*, FINDSEXR+8*, FINDSEXL+1 | 
| >> SITESPN | FINDSEXL+10, FINDSEXB+2* | 
| >> SITESPTR | FINDSEXL+9, FINDSEXB+1*, FINDSEXB+2 | 
| STACKNUM | MAKETMPC+1~ | 
| STR | FINDSEXL+1*, FINDSEXL+2, FINDSEXB+1, FINDSEXB+4, FINDSEXB+5, FINDSEXB+6, FINDSEXB+7, FINDSEXB+8, FINDSEXB+9, IHSCOLS+1~ , IHSCOLS+20*, IHSCOLS+21 | 
| >> THERHIGH | FINDSEXL+16, FINDSEXB+9* | 
| >> THERLOW | FINDSEXL+15, FINDSEXB+8* | 
| TMPCNT | IHSCOLS+1~, IHSCOLS+13*, IHSCOLS+14 | 
| TMPSAMP | IHSCOLS+1~, IHSCOLS+11*, IHSCOLS+12, IHSCOLS+13, IHSCOLS+14 | 
| TMPSPEC | IHSCOLS+1~, IHSCOLS+12*, IHSCOLS+13, IHSCOLS+14 | 
| TMPTEST | IHSCOLS+1~, IHSCOLS+19 | 
| TMPTEST( | IHSCOLS+14*, IHSCOLS+20 | 
| >> TORDIEN | STORDIAG+14* | 
| TWO | SETBLRVS~, SETBLRVS+4 | 
| U | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| WOT | PASSMESG~, PASSMESG+4, ADDCOMNT~, ADDCOMNT+3*, ADDCOMNT+7, ADDCOMNT+13 | 
| WOTRTN | MAKEITSO+1~, MAKEITSO+5, MAKEITSO+7, MAKETMPC~, MAKETMPC+14* | 
| >> X | STORDIAG+16*, ADBLRRLO+11* | 
| >> XPARSYS | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| >> XQXFLG | DUPDNAME+1, FINDSEXR+1, STORDIAG+1, ADBLRRLO+1 | 
| Name | Field # of Occurrence | 
|---|---|
| $T( | SETBLRVS+3 |