INHSYS09 ;JPD; 5 Nov 98 13:29;gis sys con data installation utility
Source file <INHSYS09.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Generic Interface System | 3 | (FLD,HEAD,PRINT)^INHSYS03 $$DIC^INHSYS05 ($$RUT,$$UP,$$WP,DATA,MSG)^INHSYSUT | 
| VA Fileman | 2 | ^DIC ^DIE | 
| Kernel | 1 | $$YN^%ZTF | 
| Uncategorized | 1 | ENV^UTIL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| MULT2(%NDPC,%FILE,%FLD,%NBFR,%DATA,%SVIEN,INREPRT,%FND) | ;Process multiple ; Input: ; %NDPC - The node;piece ; %FILE - Source file number ; %FLD - Source field number ; %NBFR - Buffer of data ; %DATA - ien to be expanded ; %SVIEN - top level ien, used in PRINT^INHSYS03 ; INREPRT - 0 no report 1 report ; %FND - 1 - Target file not in package ; 0 - Target file in package ; Site specific files may not be exported. If ; this is an entry in one of those files, %FND will ; be equal to one. ex) DEVICE FILE | |
| MULT(%NBFR,%NODE,%ROOT,DA,%FILE,%FLDNUM,%LEVL,%SVIEN,%FND) | ;Process multiple | |
| SETDA(DA,%LEVL,Y) | ;Set DA level so fileman doesn't choke ; Input: ; DA - ien and "Multiple" entry #'s ; %LEVL - level in multiple ; Y - New entry number ; Output: ; DA - IEN and "Multiple" entry #'s | |
| GETFLE(INNTRIES) | ;Get file entry ; Output: ; INNTRIES - Array of Files and entries ; format - INNTRIES(FILE,IEN)="ENTRY NAME" | |
| EXPND(INY,%FILE,%ROOT,%BFR,%LEVL,DA,INREPRT,%SVIEN,%FND,INOMIT) | ;Expand pointers | |
| START | ;Single element transaction mover entry point ; This routine copy data from file entry to ^UTILITY($J,%FILE,%IEN ; Then expand the pointer fields to their actual value | |
| GETELE(INNTRIES,Y) | ;Get file element ; Output: ; INNTRIES - Array of Files and entries ; format - INNTRIES(FILE,IEN)="ENTRY NAME" ; Y - File element entry | |
| COPY(%FILE,%OIEN,INREPRT,INOMIT) | ;Front end expand any pointer any file ; %FILE - File Number ; %OIEN - Internal Entry Number ; INREPRT - 0 no report 1 yes ; INOMIT - Array of file and field to omit from transporting | |
| DEBOFF | ;Turn off debug for all background process | 
| Name | Field # of Occurrence | 
|---|---|
| $$YN^%ZTF | START+11 | 
| ^DIC | GETFLE+7, GETELE+8 | 
| ^DIE | DEBOFF+9 | 
| FLD^INHSYS03 | EXPND+54 | 
| HEAD^INHSYS03 | START+12 | 
| PRINT^INHSYS03 | MULT2+30 | 
| $$DIC^INHSYS05 | MULT+23, MULT+24 | 
| $$RUT^INHSYSUT | EXPND+50, MULT+12, MULT2+26 | 
| $$UP^INHSYSUT | MULT2+26, MULT2+29 | 
| $$WP^INHSYSUT | EXPND+44 | 
| DATA^INHSYSUT | EXPND+50 | 
| MSG^INHSYSUT | MULT+20, MULT+24 | 
| ENV^UTIL | START+5 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC - [#1] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD( | EXPND+32, EXPND+39, EXPND+42, EXPND+47, MULT+18, MULT+19, MULT+21, MULT2+17, MULT2+19 | 
| ^DIC - [#1] | GETELE+7, COPY+7, MULT2+22 | 
| ^INTHPC - [#4004] | DEBOFF+4, DEBOFF+5 | 
| ^INTHPC("B" | DEBOFF+2, DEBOFF+3 | 
| ^UTILITY($J | COPY+6! | 
| Name | Line Occurrences | 
|---|---|
| COPY | START+15 | 
| DEBOFF | START+6 | 
| EXPND | COPY+12, MULT+29 | 
| GETELE | GETFLE+9 | 
| GETFLE | START+8 | 
| MULT | EXPND+46 | 
| MULT2 | EXPND+53 | 
| SETDA | MULT+26 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | MULT+15 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %BFR | EXPND~, EXPND+36 | 
| %DATA | EXPND+29~, EXPND+50, EXPND+51, EXPND+53, MULT2~, MULT2+21 | 
| %DIC0 | MULT+10~, MULT+11*, MULT+23, MULT+24 | 
| %FIL | GETFLE+4~, GETFLE+5, GETFLE+8*, GETFLE+9, GETELE+7, GETELE+9 | 
| %FILE | START+13*, START+14, START+15, COPY~, COPY+6, COPY+7, COPY+9, COPY+12, EXPND~, EXPND+32 , EXPND+39, EXPND+42, EXPND+44, EXPND+46, EXPND+47, EXPND+53, EXPND+54, MULT~, MULT+18, MULT+19 , MULT2~, MULT2+17, MULT2+19, MULT2+22, MULT2+26, MULT2+29, MULT2+30 | 
| %FLD | MULT2~, MULT2+17, MULT2+19, MULT2+22, MULT2+30 | 
| %FLDNUM | EXPND+29~, EXPND+40*, EXPND+42*, EXPND+44, EXPND+46, EXPND+47, EXPND+53, EXPND+54, MULT~, MULT+18 , MULT+19 | 
| %FND | EXPND~, EXPND+46, EXPND+53, EXPND+54, MULT~, MULT+29, MULT2~, MULT2+30 | 
| %GBFR | MULT2+14~, MULT2+26*, MULT2+27* | 
| %GBL | GETELE+7*, MULT+10~, MULT+21*, MULT+23, MULT2+14~, MULT2+17*, MULT2+21 | 
| %GBLN | MULT2+14~, MULT2+21*, MULT2+22, MULT2+24, MULT2+30 | 
| %LEVL | EXPND~, EXPND+46, EXPND+53, MULT~, MULT+23, MULT+24, MULT+26, MULT+29, SETDA~, SETDA+8 | 
| %NBFR | EXPND+29~, EXPND+36*, EXPND+46, EXPND+50, EXPND+53, MULT~, MULT+12, MULT+29, MULT2~, MULT2+25 | 
| %NDPC | EXPND+53, EXPND+54, MULT2~, MULT2+15 | 
| %NFLN | MULT+10~, MULT+18*, MULT+20, MULT+21, MULT+23, MULT+24, MULT+29 | 
| %NOD | MULT2+14~, MULT2+25*, MULT2+26 | 
| %NODE | EXPND+29~, EXPND+31*, EXPND+32*, EXPND+33, EXPND+34*, EXPND+36, EXPND+46, EXPND+55*, MULT~, MULT+17 | 
| %NODE1 | EXPND+29~, EXPND+33*, EXPND+39, EXPND+42, EXPND+55 | 
| %NRT | EXPND+29~, MULT+10~, MULT+13~, MULT+17*, MULT+24, MULT+29 | 
| %OIEN | START+14*, START+15, COPY~, COPY+6, COPY+7, COPY+9, COPY+12, EXPND+29~, MULT+10~, MULT+12* , MULT+15, MULT+29 | 
| >> %PC | MULT2+15*, MULT2+27 | 
| %PIECE | EXPND+29~, EXPND+38*, EXPND+39*, EXPND+42, EXPND+46, EXPND+50 | 
| %PTO | EXPND+54, MULT2+14~, MULT2+19*, MULT2+20*, MULT2+30 | 
| %ROOT | COPY+5~, COPY+7*, COPY+9, COPY+12, EXPND~, EXPND+46, MULT~, MULT+17 | 
| %SVIEN | COPY+5~, COPY+7*, COPY+12, EXPND~, EXPND+46, EXPND+53, MULT~, MULT+29, MULT2~, MULT2+30 | 
| %UPFL | MULT2+14~, MULT2+29*, MULT2+30 | 
| %X | COPY+5~, COPY+9*, COPY+10, MULT+10~, MULT+25*, MULT+30* | 
| %Y | COPY+5~, COPY+9*, COPY+10, MULT+10~, MULT+25*, MULT+30* | 
| %Z0 | EXPND+30~, EXPND+47*, EXPND+49, EXPND+52, MULT+10~, MULT+19*, MULT+20, MULT+24 | 
| DA | EXPND~, EXPND+46, MULT~, MULT+17, MULT+23, MULT+24, MULT+25, MULT+26, MULT+29, MULT+30!* , SETDA~, SETDA+9*, DEBOFF+9* | 
| DA( | SETDA+8* | 
| DA(1 | SETDA+9* | 
| DIC | GETFLE+4~, GETFLE+6*, GETELE+5~, GETELE+7* | 
| DIC("A" | GETFLE+6*, GETELE+6* | 
| DIC(0 | GETFLE+6*, GETELE+6* | 
| DIE | EXPND+29~, DEBOFF+9* | 
| DR | EXPND+29~, DEBOFF+9* | 
| DTIME | DEBOFF+8 | 
| I | EXPND+29~, SETDA+7~, SETDA+8* | 
| INBD | DEBOFF+1~, DEBOFF+3*, DEBOFF+4, DEBOFF+5, DEBOFF+9 | 
| INBN | DEBOFF+1~, DEBOFF+2*, DEBOFF+3, DEBOFF+7 | 
| INBP | DEBOFF+1~, DEBOFF+5*, DEBOFF+6 | 
| INCR | START+3~, START+4* | 
| INNTRIES | START+3~, START+8, START+9, GETFLE~, GETFLE+9, GETELE~ | 
| INNTRIES( | START+13, START+14, GETELE+9* | 
| INOMIT | COPY~, COPY+12, EXPND~, EXPND+54 | 
| INP01 | MULT2+14~, MULT2+24*, MULT2+27, MULT2+30 | 
| INPOP | START+3~, START+4*, EXPND+32, EXPND+39, EXPND+42, EXPND+55, MULT2+22* | 
| INREPRT | START+3~, START+11*, START+12, START+15, COPY~, COPY+12, EXPND~, EXPND+53, MULT+29, MULT2~ , MULT2+30 | 
| INY | EXPND~ | 
| IOF | START+7 | 
| J | EXPND+29~ | 
| >> K | EXPND+52* | 
| NFLN | MULT+10~ | 
| ODA | MULT+13~, MULT+25*, MULT+30 | 
| P01 | EXPND+29~ | 
| U | GETELE+7, GETELE+9, EXPND+49, EXPND+52, MULT+18, MULT+20, MULT+21, MULT+23, MULT+24, MULT2+17 , MULT2+19, MULT2+22, MULT2+24, MULT2+27, DEBOFF+5 | 
| X | MULT+10~, MULT+15*, MULT+20, MULT+22*, MULT+23, MULT+24, DEBOFF+8* | 
| Y | GETFLE+4~, GETFLE+8, GETFLE+9, GETELE~, GETELE+9, SETDA~, SETDA+9 | 
| YY | EXPND+29~, MULT+10~, MULT+20, MULT+23*, MULT+24*, MULT+26, MULT+29 |