INHUTC2 ;bar; 29 May 97 14:50; Interface Criteria Internal Utilities (DD)
Source file <INHUTC2.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Generic Interface System | 4 | ($$LOCK,$$RUN)^INHUTC $$WORKREC^INHUTC1 $$RELDT^INHUTC2 $$RELDT^INHUTC21 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| RDTGET | ; update a WindowMan Screen while editing, PART 1 ; assumes being called from WindowMan and those variables are defined ; Called before RDTSET to setup the proper values | |
| TYPE(INTYPE,INSRCH) | ; validate CRITERIA TYPE field ; called from input transform file 4001.1, field .05 ; also used in criteria mgmt functions | |
| TASK | ; this tag is the entry point when called thru taskman ; input: INOPT array as described at the top of INHUTC, required. | |
| RELDT(INSTR,INFMT,INPMT) | ; convert a relative date text string to FM | |
| SPACEBAR(X) | ; return x for spacebar in lookup ; called from PRELK node for file 4001.1, also used in criteria mgmt ; functions. INOPT array must be defined in env. | |
| AUSER(INDA,INDUZ,INTYPE,INCTRL,INAPP,INFUNC,INDEL) | ; manage AUSER x-ref | |
| RDTSET | ; update a WindowMan Screen while editing, PART 2 ; assumes being called from WindowMan and those variables are defined ; RDTGET must be called first and on a separate line in a POST field | |
| RELDATE(INCRITDA) | ; update relative date for start and end date | |
| CLRLK(INOPT,INDA) | ; clear all accumulated locks | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIZ(4001.1 - [#4001.1] | AUSER+12, AUSER+14, AUSER+16, AUSER+18, AUSER+20, AUSER+23!, AUSER+28*, RELDATE+5, RELDATE+6*, RELDATE+7* , RELDATE+9*, RELDATE+10* | 
| Name | Line Occurrences | 
|---|---|
| AUSER | AUSER+27 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | CLRLK+11*, TASK+2* | 
| >> DIC("S" | SPACEBAR+10* | 
| >> DIPA("AUENDTR" | RDTSET+7 | 
| >> DIPA("AUSTDTR" | RDTSET+6 | 
| >> DIPA("ENDTR" | RDTSET+5 | 
| >> DIPA("STDTR" | RDTSET+4 | 
| >> DWDIPA( | RDTGET+5*, RDTGET+7* | 
| >> DWSFLD( | RDTSET+5*, RDTSET+6*, RDTSET+7* | 
| >> DWSFLD(1 | RDTSET+4* | 
| H | CLRLK+6~, CLRLK+8*, CLRLK+9*, CLRLK+11 | 
| I | CLRLK+6~, CLRLK+11* | 
| INAE | RELDATE+3~, RELDATE+5*, RELDATE+10 | 
| INAPP | AUSER~, AUSER+18*, AUSER+23, AUSER+27, AUSER+28 | 
| INAS | RELDATE+3~, RELDATE+5*, RELDATE+9 | 
| INCRITDA | RELDATE~, RELDATE+2, RELDATE+5, RELDATE+6, RELDATE+7, RELDATE+9, RELDATE+10 | 
| INCTRL | AUSER~, AUSER+16*, AUSER+23, AUSER+27, AUSER+28 | 
| INDA | CLRLK~, CLRLK+9, AUSER~, AUSER+10, AUSER+12, AUSER+14, AUSER+16, AUSER+18, AUSER+20, AUSER+23 , AUSER+27, AUSER+28 | 
| INDEL | AUSER~, AUSER+22 | 
| INDUZ | AUSER~, AUSER+12*, AUSER+23, AUSER+27, AUSER+28 | 
| INE | RELDATE+3~, RELDATE+5*, RELDATE+7 | 
| INFMT | RELDT~, RELDT+5*, RELDT+7*, RELDT+9*, RELDT+10 | 
| INFUNC | AUSER~, AUSER+20*, AUSER+23, AUSER+27, AUSER+28 | 
| INNULL | AUSER+11~*, AUSER+13*, AUSER+15*, AUSER+17*, AUSER+19*, AUSER+21*, AUSER+26~ | 
| INOPT | CLRLK~, TASK+2, SPACEBAR+7, SPACEBAR+8 | 
| INOPT("LOCK" | CLRLK+7, CLRLK+8, CLRLK+9*, CLRLK+10! | 
| INPMT | RELDT~, RELDT+10 | 
| INS | RELDATE+3~, RELDATE+5*, RELDATE+6 | 
| INSRCH | TYPE~, TYPE+10 | 
| INSTR | RELDT~, RELDT+10 | 
| INTYPE | AUSER~, AUSER+14*, AUSER+23, AUSER+27, AUSER+28, TYPE~, TYPE+9, TYPE+10, TYPE+11 | 
| INY | SPACEBAR+8~*, SPACEBAR+10* | 
| U | AUSER+12, AUSER+14, AUSER+16, AUSER+18, AUSER+20, TYPE+10, TYPE+11, RELDATE+5, RELDATE+9, RELDATE+10 | 
| X | SPACEBAR~, SPACEBAR+7, SPACEBAR+11 | 
| Y | CLRLK+6~, CLRLK+7*, CLRLK+8, CLRLK+9, CLRLK+10, CLRLK+11 |