USRPS23 ; SLC/MAM - After installing TIU*1.0*137;6/16/03
Source file <USRPS23.m>
Package | Total | Call Graph |
---|---|---|
Authorization Subscription | 1 | ($$USRDUPS,SETXTMP)^USREN23 |
VA FileMan | 1 | UPDATE^DIE |
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 |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 1 | TIUPS137 |
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN | ; Create new User Class & new Business Rules
; -- Check for potential dup User Class created after install ; but before option: |
|
MAINX | ; Exit
|
|
NEWCLASS(SUCCESS,TMPCNT) | ; Create one new User Class in file 8930
|
|
NEWRULES(TMPCNT) | ; Create new Business Rules
; Create rules for ONE User Class & ONE DDEF ; -- Set data for rules: |
|
SETDATA(TMPCNT) | ; Set data for rules
; -- Set data for exported Rules into Rule nodes of ^XTMP. ; Use interior data since there may be dup DDEF names. ; Must set AFTER User Class is created: |
|
SETX | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("USR23" | MAIN+3!, MAIN+7*, MAIN+8*, MAIN+9*, MAIN+13*, MAIN+14*, MAIN+20*, MAIN+21*, MAINX+1*, MAINX+2* , NEWCLASS+8*, NEWCLASS+9*, NEWCLASS+11*, NEWCLASS+12*, NEWRULES+18*, NEWRULES+19*, NEWRULES+20*, NEWRULES+21*, SETDATA+9*, SETDATA+10* |
^USR(8930.6 - [#8930.6] | SETDATA+32, SETDATA+36 |
^USR(8930.8 - [#8930.8] | SETDATA+27 |
^XTMP("TIU137" | SETDATA+7 |
^XTMP("USR23" | MAIN+18, NEWCLASS+4, NEWCLASS+8, NEWCLASS+11, NEWCLASS+14*, NEWRULES+7, NEWRULES+8, NEWRULES+10, NEWRULES+11, NEWRULES+15! , NEWRULES+16!, SETDATA+12, SETDATA+15*, SETDATA+16*, SETDATA+18*, SETDATA+19*, SETDATA+20*, SETDATA+28*, SETDATA+33*, SETDATA+37* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CLASSDA | NEWCLASS+1~, NEWCLASS+6*, NEWCLASS+7, NEWCLASS+14 |
DDEFIEN | SETDATA+4~, SETDATA+7*, SETDATA+8, SETDATA+15 |
DESC | NEWRULES+9~, NEWRULES+11* |
DONE | MAIN+15~, MAIN+18*, MAIN+19 |
EXACTION | SETDATA+4~, SETDATA+24*, SETDATA+27, SETDATA+30 |
EXSTATUS | SETDATA+25~, SETDATA+31*, SETDATA+32, SETDATA+35*, SETDATA+36 |
FDA | NEWCLASS+1~, NEWRULES+9~ |
FDA( | NEWRULES+10*, NEWRULES+12* |
FDA(8930 | NEWCLASS+4* |
INACTION | SETDATA+25~, SETDATA+27*, SETDATA+28 |
INSTATUS | SETDATA+25~, SETDATA+32*, SETDATA+33, SETDATA+36*, SETDATA+37 |
NUM | NEWRULES+4~, NEWRULES+5*, NEWRULES+8*, NEWRULES+10, NEWRULES+15 |
RULENUM | SETDATA+4~, SETDATA+14*, SETDATA+15, SETDATA+16, SETDATA+23*, SETDATA+26*, SETDATA+28, SETDATA+33, SETDATA+37 |
SILENT | MAIN+5~, MAIN+10*, MAIN+11 |
SUCCESS | MAIN+15~, MAIN+23, MAIN+25, NEWCLASS~, NEWCLASS+2*, NEWCLASS+10*, NEWRULES+4~, NEWRULES+5*, NEWRULES+7*, NEWRULES+14* , NEWRULES+17 |
TMPCNT | MAIN+5~, MAIN+6*, MAIN+7*, MAIN+8*, MAIN+9*, MAIN+13*, MAIN+14*, MAIN+20*, MAIN+21*, MAIN+23 , MAIN+25, MAINX+1*, MAINX+2*, NEWCLASS~, NEWCLASS+8*, NEWCLASS+9*, NEWCLASS+11*, NEWCLASS+12*, NEWRULES~, NEWRULES+3 , NEWRULES+18*, NEWRULES+19*, NEWRULES+20*, NEWRULES+21*, SETDATA~, SETDATA+9*, SETDATA+10* |
USRCLASS | SETDATA+4~, SETDATA+12*, SETDATA+16 |
USRDUPS | MAIN+5~, MAIN+11*, MAIN+12 |
USRERR | NEWRULES+9~, NEWRULES+14 |
USRIEN | NEWCLASS+1~ |
USRIEN(1 | NEWCLASS+6 |