RCXVP201 ;DAOU/ALA-AR Data Extraction Post-Install Program ;23-JUL-03
Source file <RCXVP201.m>
| 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 |
|---|---|---|
| EN | ; Entry Point
|
|
| P228 | ;Entry point from PRCA*4.5*228 postinit (RCXVP228)
|
|
| AC | ; Set up the active records into the AR Queue File (#348.4)
|
|
| CUR | ; Set up records since the end of the Fiscal Year 2003
|
|
| F03 | ; Historical for Fiscal Year 2003
|
|
| F02 | ; Historical for Fiscal Year 2002
|
|
| F01 | ; Historical for Fiscal Year 2001
|
|
| FLG | ; Update with CBO EXTRACT FLAG
|
|
| EXIT | ||
| TSK | ; Set up Task for current fiscal year 2004
|
|
| TTS | ; AR TRANSACTION TYPE File (#430.3) Update
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430.3 - [#430.3] | FLG+3 |
| ^TMP("RCXVINSTALL" | EN+3, EXIT+2! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DT | CUR+3, CUR+23, CUR+27, CUR+33, CUR+41, CUR+51, F03+3, F02+3, F01+3 |
| DUZ | EN+15 |
| IEN | EN+1~, FLG+2*, FLG+3 |
| RCLM | EN+1~, FLG+1*, FLG+2 |
| RCXFY03 | EXIT+1! |
| >> RCXVCFLG | CUR+2*, CUR+6*, CUR+9*, CUR+12*, CUR+15*, CUR+18*, CUR+21*, CUR+25*, CUR+29*, CUR+31* , CUR+35*, CUR+37*, CUR+39*, CUR+43*, CUR+45*, CUR+47*, CUR+49*, CUR+53*, CUR+55*, CUR+57* , CUR+59*, CUR+61* |
| RCXVDSC | AC+1*, AC+2, AC+4, CUR+1*, CUR+5*, CUR+8*, CUR+11*, CUR+14*, CUR+17*, CUR+20* , CUR+24*, CUR+28*, CUR+30*, CUR+34*, CUR+36*, CUR+38*, CUR+42*, CUR+44*, CUR+46*, CUR+48* , CUR+52*, CUR+54*, CUR+56*, CUR+58*, CUR+60*, F03+1*, F03+2, F03+6, F02+1*, F02+2 , F02+6, F01+1*, F01+2, F01+6, EXIT!, TSK+1 |
| RCXVFFD | CUR+2*, CUR+6*, CUR+9*, CUR+12*, CUR+15*, CUR+18*, CUR+21*, CUR+25*, CUR+29*, CUR+31* , CUR+35*, CUR+37*, CUR+39*, CUR+43*, CUR+45*, CUR+47*, CUR+49*, CUR+53*, CUR+55*, CUR+57* , CUR+59*, CUR+61*, F03+5*, F02+5*, F01+5*, EXIT! |
| RCXVFL | AC+2*, AC+3, F03+2*, F03+4, F02+2*, F02+4, F01+2*, F01+4, EXIT+1! |
| RCXVFTD | CUR+2*, CUR+6*, CUR+9*, CUR+12*, CUR+15*, CUR+18*, CUR+21*, CUR+25*, CUR+29*, CUR+31* , CUR+35*, CUR+37*, CUR+39*, CUR+43*, CUR+45*, CUR+47*, CUR+49*, CUR+53*, CUR+55*, CUR+57* , CUR+59*, CUR+61*, F03+5*, F02+5*, F01+5*, EXIT! |
| >> RCXVUP( | FLG+3* |
| >> RCXVUP(342 | EN+6*, EN+7*, EN+8*, EN+9*, EN+10* |
| RFDATE | CUR+3*, F03+3*, F03+8*, F02+3*, F02+8*, F01+3*, F01+8, EXIT+1!, TSK+3, TSK+5* |
| RJ | EN+1~, FLG+1* |
| RTASKS | EXIT! |
| TIME | EXIT+1! |
| TXT | EN+1~, FLG+2*, FLG+3 |
| U | EN+9, FLG+3 |
| VAL | EN+1~, FLG+2*, FLG+3 |
| XPDQUES | EN+3*, EXIT! |
| XPDQUES("POS | MAIL" , EN+8 |
| XPDQUES("PRE | DIREC" , EN+7 |
| ZTDESC | AC+4*, F03+6*, F02+6*, F01+6*, EXIT!, TSK+1* |
| ZTDTH | AC+7*, F03+3*, F03+8*, F02+3*, F02+8*, F01+3*, F01+8*, EXIT!, TSK+3* |
| >> ZTIO | AC+4*, F03+6*, F02+6*, F01+6*, TSK+1* |
| ZTRTN | AC+4*, F03+6*, F02+6*, F01+6*, EXIT!, TSK+1* |
| >> ZTSAVE("RCXVCFLG" | TSK+2* |
| >> ZTSAVE("RCXVFFD" | F03+7*, F02+7*, F01+7*, TSK+2* |
| >> ZTSAVE("RCXVFTD" | F03+7*, F02+7*, F01+7*, TSK+2* |
| Name | Field # of Occurrence |
|---|---|
| $T(TTS+RJ | FLG+1 |