MAGXCVI1 ;WOIFO/SEB,MLH - Image Index Conversion Generate - subroutines ; 15 Jul 2004 9:01 AM
Source file <MAGXCVI1.m>
| Package | Total | Call Graph |
|---|---|---|
| Imaging | 1 | ($$SCRUBTKN,$$STRIP,$$UCASE)^MAGXCVP |
| VA FileMan | 1 | $$GET1^DIQ |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GENINEW | ; SUBROUTINE - Called from GENIEN^MAGXCVI.
; generate new index values for a set of lookup fields not previously indexed on |
|
| GENFLD | ; SUBROUTINE - Called from GENINEW.
; Generate indices for one field. |
|
| GENF06 | ; generate indices based on field 6 (Procedure)
; expects MAGVALS, U; returns MAPDATA |
|
| GENF08 | ; generate indices based on field 8
; expects MAGVALS, U; returns MAPDATA ; logic: strip trailing 'SERVICE', 'SECTION' and then trailing 'CARE'; ; do not tokenize; exact match on mapping |
|
| GENF10 | ; generate indices based on field 10 (Short Description)
; returns MAPDATA |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | GENINEW+7 |
| ^MAG(2005.02 - [#2005.02] | GENINEW+22 |
| ^MAG(2005.03 - [#2005.03] | GENFLD+16 |
| ^MAG(2005.81 - [#2005.81] | GENFLD+22 |
| ^MAG(2005.83 - [#2005.83] | GENINEW+13, GENINEW+24, GENINEW+27 |
| ^MAG(2005.85 - [#2005.85] | GENINEW+57 |
| ^RAMIS(73.1 - [#73.1] | GENF06+18 |
| ^XTMP("MAG30P25" | GENFLD+10, GENF06+14, GENF08+13, GENF10+10, GENF10+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> CHILD1 | GENINEW+7 |
| CURMAP | GENF10+2~, GENF10+16*, GENF10+19, GENF10+21 |
| D0 | GENFLD+2~, GENFLD+24*, GENFLD+25, GENFLD+27, GENFLD+28, GENFLD+30, GENFLD+33 |
| FILEXT | GENINEW+3~, GENINEW+7*, GENINEW+20 |
| >> FLDDATA | GENF10+13*, GENF10+14, GENF10+16 |
| >> FLDNUM | GENINEW+6*, GENFLD+8, GENFLD+12, GENFLD+13, GENFLD+14, GENFLD+15, GENFLD+22 |
| I | GENFLD+3~, GENF06+3~, GENF06+19*, GENF06+20, GENF06+21, GENF10+15*, GENF10+16, GENF10+19, GENF10+24, GENF10+25 |
| >> INDXDATA | GENINEW+9*, GENINEW+11, GENINEW+12, GENINEW+13*, GENINEW+17*, GENINEW+19, GENINEW+20*, GENINEW+23, GENINEW+24*, GENINEW+26 , GENINEW+27*, GENINEW+35, GENINEW+36*, GENINEW+37*, GENINEW+42, GENINEW+43*, GENINEW+48, GENINEW+49, GENINEW+50*, GENINEW+56 , GENINEW+57*, GENFLD+25, GENFLD+27, GENFLD+28*, GENFLD+33*, GENF06+21*, GENF06+26*, GENF10+24 |
| INDXSPEC | GENINEW+2~ |
| INDXVAL | GENFLD+4~, GENFLD+25*, GENFLD+26, GENFLD+28, GENFLD+33 |
| IVAL | GENF06+4~, GENF06+20*, GENF06+21 |
| >> MAGVALS( | GENINEW+6 |
| >> MAGVALS(10 | GENF10+9 |
| >> MAGVALS(100 | GENFLD+22 |
| >> MAGVALS(16 | GENINEW+56, GENFLD+16, GENFLD+18 |
| >> MAGVALS(3 | GENINEW+22, GENFLD+9*, GENFLD+10 |
| >> MAGVALS(6 | GENINEW+43, GENFLD+19, GENF06+6*, GENF06+7, GENF06+8*, GENF06+10, GENF06+11*, GENF06+13, GENF06+14, GENF06+16 , GENF06+25 |
| >> MAGVALS(8 | GENF08+7 |
| >> MAPDATA | GENFLD+7*, GENFLD+10*, GENFLD+16*, GENFLD+19*, GENFLD+22*, GENFLD+25, GENF06+14*, GENF06+20, GENF08+13*, GENF10+8* , GENF10+16, GENF10+19*, GENF10+25* |
| NEWMAP | GENF10+3~, GENF10+16*, GENF10+19, GENF10+24, GENF10+25 |
| PRVVAL | GENFLD+5~, GENFLD+25*, GENFLD+30 |
| SHDSCTXT | GENF10+5~, GENF10+9*, GENF10+14 |
| SVSECTXT | GENF08+5~, GENF08+9* |
| TERM | GENF06+2~, GENF06+16*, GENF06+17*, GENF06+18 |
| TOKSTR | GENF10+4~, GENF10+8*, GENF10+10*, GENF10+13 |
| TSTSPEC | GENF10+6~, GENF10+24* |
| TYPE | GENINEW+4~, GENINEW+12*, GENINEW+13 |
| U | GENINEW+7, GENINEW+9, GENINEW+11, GENINEW+12, GENINEW+13, GENINEW+17, GENINEW+19, GENINEW+20, GENINEW+22, GENINEW+23 , GENINEW+24, GENINEW+26, GENINEW+27, GENINEW+35, GENINEW+36, GENINEW+37, GENINEW+42, GENINEW+43, GENINEW+48, GENINEW+49 , GENINEW+50, GENINEW+56, GENINEW+57, GENFLD+10, GENFLD+19, GENFLD+25, GENFLD+27, GENFLD+28, GENFLD+33, GENF06+14 , GENF06+20, GENF06+21, GENF06+26, GENF08+13, GENF10+14, GENF10+16, GENF10+19, GENF10+24, GENF10+25 |
| UTYPE | GENF08+4~, GENF08+7*, GENF08+8, GENF08+9, GENF08+10*, GENF08+11*, GENF08+12*, GENF08+13 |