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 |