TIUFLD ; SLC/MAM - Lib; Template D Related; SETFLD(FILEDA,LASTLIN,FLDNO,SUBFDA,SUBFLDNO), INHERIT(FILEDA,PFILEDA,FLDNO,EIFORM,SUBFDA,SUBFLDNO,VALUE,AFILEDA), MULTILN(TIUREC,LASTLIN,FLDNAME) ;02/16/06
Source file <TIUFLD.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 4 | (FIELD,FILE)^DID CHK^DIE CLEAN^DILF Y^DIQ | 
| Text Integration Utility | 2 | WRAP^TIUFLD $$MIXED^TIULS | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| AGAIN | ||
| MULTILN(TIUREC,LASTLIN,FLDNAME) | ; Set FLDNAME and as much as fits of TIUREC | |
| SETFLD(FILEDA,LASTLIN,FLDNO,SUBFDA,SUBFLDNO) | ; Puts External Field in TMP("TIUF3") for Template D (Display), for FILEDA. ; Requires Array TIUFQ as set in TIUFD, TIUFD1. ; Requires FILEDA=DA in file. ; Requires LASTLIN = Last array line set, if setting array; = Last | |
| MMULTILN(TIUREC,LASTLIN,FLDNAME) | ;MULTILN for M code (show spaces) | |
| SETFLD1 | ; Technical fields, others which are heritable. | |
| SETFX | ||
| INHERIT(FILEDA,PFILEDA,FLDNO,EIFORM,SUBFDA,SUBFLDNO,VALUE,AFILEDA) | ; ; Can't make it a function with pieces since pieces may contain ^. ; For FLDNO'=6.14, Returns in VALUE the Field Value for first ancestor | |
| SETFLD2 | ||
| INHEX | ||
| WRAP(TEXT,LENGTH,FLENGTH) | ; Breaks text string into first substring of | 
| FileNo | Call Tags | 
|---|---|
| ^TIU(8925.1 - [#8925.1] | CHK^DIE, FIELD^DID | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD(8925.1 | INHEX+4 | 
| ^DD(8925.11 | INHEX+2 | 
| ^DD(8925.12 | INHEX+3 | 
| ^TIU(8925.1 - [#8925.1] | SETFLD+38, INHERIT+17, INHERIT+19 | 
| ^TMP("TIUF" | SETFLD+15 | 
| ^TMP("TIUF3" | SETFLD2*, SETFLD2+2*, MULTILN+10*, MULTILN+13*, MMULTILN+7*, MMULTILN+8* | 
| Name | Line Occurrences | 
|---|---|
| AGAIN | INHERIT+19, INHERIT+20 | 
| INHERIT | SETFLD1+2, AGAIN | 
| INHEX | INHERIT+17, INHERIT+20, INHERIT+22 | 
| MMULTILN | SETFLD2+3, SETFLD2+4 | 
| MULTILN | SETFLD2+5 | 
| SETFLD2 | SETFLD+23, SETFLD+37, SETFLD+53, SETFLD+54 | 
| SETFX | SETFLD+31, SETFLD+33, SETFLD+34, SETFLD2+2, SETFLD2+3, SETFLD2+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| AFILEDA | INHERIT~, AGAIN, INHEX* | 
| AVAIL | SETFLD+11~, SETFLD+21*, SETFLD2+2, MULTILN+7~, MULTILN+8* | 
| C | INHERIT+13~, INHEX+2*, INHEX+3*, INHEX+4* | 
| COWNER | SETFLD+12~, SETFLD+24*, SETFLD+25, SETFLD+26 | 
| >> DIERR | SETFLD+43, SETFLD+50 | 
| EIFORM | INHERIT~, INHERIT+15*, AGAIN, INHEX+1 | 
| FCHAR | MMULTILN+1~, MMULTILN+2*, MMULTILN+3, MMULTILN+4, MMULTILN+5* | 
| FDA | SETFLD+12~, SETFLD+30*, SETFLD+32 | 
| FIELDNO | SETFLD+12~, SETFLD+29*, SETFLD+32 | 
| FILEDA | SETFLD~, SETFLD+24, SETFLD+30, SETFLD+36, SETFLD+38, SETFLD1+2, INHERIT~, INHERIT+17 | 
| FILENO | SETFLD+12~, SETFLD+28*, SETFLD+32 | 
| FLDNAME | SETFLD+11~, SETFLD+15*, SETFLD+17*, SETFLD+18*, SETFLD+19*, SETFLD+20*, SETFLD+21, SETFLD+22*, SETFLD2+2, SETFLD2+3 , SETFLD2+4, SETFLD2+5, MULTILN~, MULTILN+8, MULTILN+10, MMULTILN~, MMULTILN+2, MMULTILN+6 | 
| FLDNAME1 | SETFLD+11~, SETFLD+20*, SETFLD2 | 
| FLDNO | SETFLD~, SETFLD+15, SETFLD+17, SETFLD+18, SETFLD+19, SETFLD+23, SETFLD+28, SETFLD+29, SETFLD+31, SETFLD+33 , SETFLD+34, SETFLD+35, SETFLD+36, SETFLD+37, SETFLD+39, SETFLD+46, SETFLD+53, SETFLD+54, SETFLD1+2, SETFLD2+1 , SETFLD2+3, SETFLD2+4, INHERIT~, INHERIT+18, INHERIT+20, INHERIT+21, AGAIN, INHEX+2, INHEX+3, INHEX+4 | 
| FLDVAL | SETFLD+12~, SETFLD1+2 | 
| FLDVAL("E" | SETFLD1+2 | 
| FLENGTH | WRAP~ | 
| LASTLIN | SETFLD~, SETFLD2*, SETFLD2+2*, SETFLD2+3, SETFLD2+4, SETFLD2+5, MULTILN~, MULTILN+9, MULTILN+14*, MMULTILN~ , MMULTILN+2, MMULTILN+9* | 
| LC | SETFLD+12~, SETFLD+25*, SETFLD+26 | 
| LCHAR | MMULTILN+1~, MMULTILN+2*, MMULTILN+4, MMULTILN+5* | 
| LENGTH | SETFLD+12~, SETFLD+15*, SETFLD+16*, SETFLD+18*, SETFLD+19*, SETFLD+20, SETFLD+22, WRAP~, WRAP+8, WRAP+9 , WRAP+13 | 
| LINE | WRAP+4~, WRAP+11*, WRAP+13*, WRAP+14 | 
| LINENO | SETFLD+11~, MULTILN+7~, MULTILN+9*, MULTILN+10, MULTILN+13*, MULTILN+14, MMULTILN+1~, MMULTILN+2*, MMULTILN+7*, MMULTILN+8 , MMULTILN+9 | 
| LP | SETFLD+12~, SETFLD+25*, SETFLD+26 | 
| NODE1 | SETFLD+11~, SETFLD+38*, SETFLD+40, SETFLD+41, SETFLD+47, SETFLD+49, SETFLD+51 | 
| NODENO | INHERIT+13~, INHERIT+18*, INHERIT+19 | 
| OWNER | SETFLD+12~, SETFLD+26*, SETFLD+27 | 
| PFILEDA | INHERIT~, INHERIT+17*, INHERIT+19, AGAIN, INHEX | 
| PNODE | INHERIT+13~, INHERIT+19*, INHERIT+20, INHERIT+21 | 
| POWNER | SETFLD+12~, SETFLD+24*, SETFLD+25, SETFLD+26 | 
| REST | MULTILN+7~, MULTILN+11*, MULTILN+12 | 
| SUBFDA | SETFLD~, SETFLD+14*, SETFLD+30, SETFLD1+2, INHERIT~, INHERIT+16*, AGAIN | 
| SUBFLDNO | SETFLD~, SETFLD+14*, SETFLD+15, SETFLD+29, SETFLD1+2, SETFLD2+4, INHERIT~, INHERIT+16*, AGAIN, INHEX+2 , INHEX+3 | 
| TEXT | WRAP~, WRAP+5, WRAP+6, WRAP+7, WRAP+10*, WRAP+11, WRAP+12, WRAP+13, WRAP+14 | 
| TIUCKUP | SETFLD+13~, SETFLD+45 | 
| TIUFI | WRAP+4~, WRAP+6*, WRAP+7, WRAP+10, WRAP+12*, WRAP+13, WRAP+14 | 
| TIUFJ | WRAP+4~ | 
| >> TIUFNOD0 | SETFLD+21, SETFLD+31 | 
| >> TIUFQ( | SETFLD+24, SETFLD+32 | 
| TIUFT | MULTILN+7~, MULTILN+12!, MMULTILN+1~, WRAP+7*, WRAP+8, WRAP+9 | 
| TIUFT( | MULTILN+11, MULTILN+13, MMULTILN+4*, MMULTILN+7, MMULTILN+8, WRAP+13, WRAP+14* | 
| TIUFT(1 | MULTILN+10, MMULTILN+6*, WRAP+11* | 
| TIUFT1 | WRAP+4~, WRAP+9*, WRAP+10 | 
| TIUFT2 | WRAP+4~, WRAP+9*, WRAP+10 | 
| TIUFTEMP | SETFLD+13~ | 
| TIUFTEMP("TYPE" | SETFLD2+3 | 
| TIUFY | WRAP+4~, WRAP+13*, WRAP+14* | 
| TIUK | MULTILN+7~, MULTILN+11*, MMULTILN+1~, MMULTILN+2*, MMULTILN+4, MMULTILN+5* | 
| TIUL | MULTILN+7~, MULTILN+13*, MMULTILN+1~, MMULTILN+7*, MMULTILN+8* | 
| TIUREC | SETFLD+11~, SETFLD+27*, SETFLD+31*, SETFLD+32*, SETFLD+33, SETFLD+34, SETFLD+35*, SETFLD+36*, SETFLD+40*, SETFLD+43* , SETFLD+44*, SETFLD+45*, SETFLD+47*, SETFLD+50*, SETFLD+51*, SETFLD+52*, SETFLD1+1*, SETFLD1+2*, SETFLD2+1*, SETFLD2+2 , SETFLD2+3, SETFLD2+4, SETFLD2+5, MULTILN~, MULTILN+8, MMULTILN~, MMULTILN+3, MMULTILN+4 | 
| TYPE | SETFLD+12~, SETFLD+21* | 
| U | SETFLD+15, SETFLD+21, SETFLD+31, SETFLD+40, SETFLD+41, SETFLD+47, SETFLD+49, SETFLD+51, INHERIT+20, INHERIT+21 , INHEX+2, INHEX+3, INHEX+4 | 
| UPFIELD | SETFLD+11~ | 
| UPFIELD("GLOB | AL SUBSCRIPT LOCATION" , SETFLD+51 | 
| UPFIELD("LABEL" | SETFLD+52 | 
| UPFILE | SETFLD+11~ | 
| UPFILE("NAME" | SETFLD+44 | 
| UPMSG | SETFLD+11~, SETFLD+42*, SETFLD+43, SETFLD+45, SETFLD+48*, SETFLD+50, SETFLD+51 | 
| VALUE | INHERIT~, INHERIT+14*, INHERIT+20*, INHERIT+21*, INHERIT+22, AGAIN, INHEX+1, INHEX+2, INHEX+3, INHEX+4 | 
| VALUE("E" | INHERIT+14*, INHEX+2*, INHEX+3*, INHEX+4* | 
| Y | INHERIT+13~, INHEX+2*, INHEX+3*, INHEX+4* | 
| ZZCONT | SETFLD+11~, INHERIT+13~ |