VAQUTL50 ;ALB/JRP - CREATE DATA SEGMENT FROM H.S. COMPONENT;Jun 07, 2023@11:47
Source file <VAQUTL50.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 |
|---|---|---|
| ADDSEG(HSPTR,MAXTIME,MAXOCCUR) | ;ADD NEW DATA SEGMENT USING H.S. COMPONENT
|
|
| LIMITS(VAQHSPTR,VAQMAXTIME,VAQMAXOCCUR) | ;DETERMINE MAX TIME/OCCURRENCE LIMITS
|
|
| UPDSEG(VAQHSPTR,VAQMAXTIME,VAQMAXOCCUR) | ;UPDATE EXISTING DATA SEGMENT USING H.S. COMPONENT
|
|
| FIRSTUP(TEXT) | ;FIRST CHARACTER EVERY WORD UPPER
|
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UPPERCASE" | FIRSTUP+13, FIRSTUP+20 |
| ^GMT(142.1 - [#142.1] | ADDSEG+19, ADDSEG+26, UPDSEG+18, UPDSEG+24 |
| ^VAT(394.71 - [#394.71] | ADDSEG+34, ADDSEG+35, ADDSEG+36, UPDSEG+33, UPDSEG+34, UPDSEG+35, UPDSEG+36, UPDSEG+38, UPDSEG+39, UPDSEG+43 , UPDSEG+44, UPDSEG+46, UPDSEG+47 |
| ^VAT(394.81 - [#394.81] | LIMITS+6, LIMITS+7 |
| Name | Line Occurrences |
|---|---|
| $$FIRSTUP | ADDSEG+32, UPDSEG+30 |
| LIMITS | ADDSEG+37, UPDSEG+45 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABB | ADDSEG+23~, ADDSEG+29*, ADDSEG+30, ADDSEG+36, ADDSEG+41 |
| DA | ADDSEG+24~ |
| DIC | ADDSEG+24~ |
| DIE | ADDSEG+24~ |
| DINUM | ADDSEG+24~ |
| DR | ADDSEG+24~ |
| HSPTR | ADDSEG~, ADDSEG+17*, ADDSEG+18, ADDSEG+19, ADDSEG+26, ADDSEG+37, ADDSEG+43 |
| LEN | FIRSTUP+8~, FIRSTUP+17*, FIRSTUP+21 |
| MAXOCCUR | ADDSEG~, ADDSEG+21*, ADDSEG+37, ADDSEG+45 |
| MAXTIME | ADDSEG~, ADDSEG+20*, ADDSEG+37, ADDSEG+44 |
| NAME | ADDSEG+23~, ADDSEG+27*, ADDSEG+28, ADDSEG+32*, ADDSEG+34, ADDSEG+35, ADDSEG+40 |
| OUTTEXT | FIRSTUP+8~, FIRSTUP+10*, FIRSTUP+12, FIRSTUP+14*, FIRSTUP+17, FIRSTUP+18, FIRSTUP+19, FIRSTUP+21*, FIRSTUP+22 |
| SPOT | FIRSTUP+8~, FIRSTUP+16*, FIRSTUP+18*, FIRSTUP+19, FIRSTUP+21 |
| TEXT | FIRSTUP~, FIRSTUP+6, FIRSTUP+10 |
| TMP | ADDSEG+23~, ADDSEG+26*, ADDSEG+27, ADDSEG+29 |
| U | ADDSEG+27, ADDSEG+29, ADDSEG+49, LIMITS+8, LIMITS+10, LIMITS+14, UPDSEG+25, UPDSEG+27, UPDSEG+36, UPDSEG+39 , UPDSEG+43, UPDSEG+44, UPDSEG+46, UPDSEG+47, UPDSEG+48 |
| UPCHAR | FIRSTUP+8~ |
| VAQABB | UPDSEG+21~, UPDSEG+27*, UPDSEG+28, UPDSEG+35, UPDSEG+44 |
| VAQDEFOCCUR | LIMITS+5~, LIMITS+10*, LIMITS+11*, LIMITS+18 |
| VAQDEFTIME | LIMITS+5~, LIMITS+8*, LIMITS+9*, LIMITS+16 |
| VAQERROR | ADDSEG+39~, ADDSEG+49, ADDSEG+53*, UPDSEG+21~, UPDSEG+48, UPDSEG+51, UPDSEG+54* |
| VAQFDA | ADDSEG+39~, UPDSEG+21~, UPDSEG+48 |
| VAQFDA( | ADDSEG+40*, ADDSEG+41*, ADDSEG+42*, ADDSEG+43*, ADDSEG+44*, ADDSEG+45*, ADDSEG+46*, ADDSEG+47*, UPDSEG+43*, UPDSEG+44* , UPDSEG+46*, UPDSEG+47* |
| VAQGMTSN0 | UPDSEG+21~, UPDSEG+24*, UPDSEG+25, UPDSEG+27 |
| VAQHSPTR | LIMITS~, LIMITS+13, UPDSEG~, UPDSEG+16*, UPDSEG+17, UPDSEG+18, UPDSEG+24, UPDSEG+36, UPDSEG+39, UPDSEG+45 |
| VAQIEN | LIMITS+5~, LIMITS+6*, LIMITS+7, UPDSEG+21~, UPDSEG+33*, UPDSEG+34*, UPDSEG+35*, UPDSEG+36*, UPDSEG+37, UPDSEG+38 , UPDSEG+39*, UPDSEG+40, UPDSEG+42*, UPDSEG+43, UPDSEG+44, UPDSEG+46, UPDSEG+47 |
| VAQLIMIT | LIMITS+5~, LIMITS+13*, LIMITS+14 |
| VAQLINE | ADDSEG+51~, ADDSEG+52*, ADDSEG+53, UPDSEG+21~, UPDSEG+53*, UPDSEG+54 |
| VAQMAXOCCUR | LIMITS~, LIMITS+18*, LIMITS+19*, UPDSEG~, UPDSEG+20*, UPDSEG+45, UPDSEG+47 |
| VAQMAXTIME | LIMITS~, LIMITS+16*, LIMITS+17*, UPDSEG~, UPDSEG+19*, UPDSEG+45, UPDSEG+46 |
| VAQMESSAGE | ADDSEG+39~, ADDSEG+49, ADDSEG+50, ADDSEG+52, UPDSEG+21~, UPDSEG+52, UPDSEG+53 |
| VAQMESSAGE( | ADDSEG+53, UPDSEG+54 |
| VAQNAME | UPDSEG+21~, UPDSEG+25*, UPDSEG+26, UPDSEG+30*, UPDSEG+33, UPDSEG+34, UPDSEG+40, UPDSEG+43 |
| VAQNLIMIT | LIMITS+5~, LIMITS+7*, LIMITS+8, LIMITS+10 |
| VAQOCCUR | LIMITS+5~, LIMITS+14*, LIMITS+18, LIMITS+19 |
| VAQREC | UPDSEG+21~, UPDSEG+38*, UPDSEG+39 |
| VAQTIME | LIMITS+5~, LIMITS+14*, LIMITS+16, LIMITS+17 |
| X | ADDSEG+24~, FIRSTUP+8~, FIRSTUP+12*, FIRSTUP+19* |
| Y | ADDSEG+24~, FIRSTUP+8~, FIRSTUP+14, FIRSTUP+21 |