VSITDEF ;ISL/dee - Defaulting Logic for the Visit ;4/17/97
Source file <VSITDEF.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 |
|---|---|---|
| REQUIRED() | ;Check the required variables
|
|
| DEFAULTS | ;Default all of the rest of the fields that are NOT need for lookup matching
; - CDT & MDT |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT - [#9000010] | DEFAULTS+11, DEFAULTS+23 |
| ^DIC(150.9 - [#150.9] | REQUIRED+27 |
| ^DIC(40.7 - [#40.7] | REQUIRED+42, REQUIRED+43, DEFAULTS+51 |
| ^DPT - [#2] | DEFAULTS+24, DEFAULTS+29, DEFAULTS+30 |
| ^SC - [#44] | REQUIRED+44 |
| ^VSIT(150.1 - [#150.1] | REQUIRED+43, DEFAULTS+51 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DEFAULTS+3~, DEFAULTS+5 |
| %H | DEFAULTS+3~ |
| %I | DEFAULTS+3~ |
| DUZ | DEFAULTS+34 |
| DUZ("AG" | REQUIRED+26 |
| >> NOD | DEFAULTS+11*, DEFAULTS+12, DEFAULTS+13 |
| QUIT | REQUIRED+5~, REQUIRED+6*, REQUIRED+10*, REQUIRED+13*, REQUIRED+18*, REQUIRED+22*, REQUIRED+29*, REQUIRED+35*, REQUIRED+53*, REQUIRED+55 |
| SITE | REQUIRED+5~, REQUIRED+7*, REQUIRED+16, REQUIRED+20 |
| >> VSIT("ACT" | DEFAULTS+95*, DEFAULTS+96 |
| >> VSIT("AO" | DEFAULTS+58*, DEFAULTS+59 |
| >> VSIT("CDT" | DEFAULTS+5* |
| >> VSIT("COD" | DEFAULTS+17*, DEFAULTS+18 |
| >> VSIT("COM" | DEFAULTS+76*, DEFAULTS+77 |
| >> VSIT("CV" | DEFAULTS+70*, DEFAULTS+71 |
| >> VSIT("DSS" | REQUIRED+31, REQUIRED+32*, REQUIRED+33, REQUIRED+34*, REQUIRED+35, REQUIRED+40, REQUIRED+42, REQUIRED+43, REQUIRED+44, DEFAULTS+51 |
| >> VSIT("EC" | DEFAULTS+64*, DEFAULTS+65 |
| >> VSIT("ELG" | DEFAULTS+21*, DEFAULTS+22, DEFAULTS+23*, DEFAULTS+24*, DEFAULTS+25, DEFAULTS+30*, DEFAULTS+31*, DEFAULTS+32 |
| >> VSIT("HNC" | DEFAULTS+67*, DEFAULTS+68 |
| >> VSIT("INS" | REQUIRED+14, REQUIRED+15*, REQUIRED+16*, REQUIRED+17*, REQUIRED+18, REQUIRED+20, REQUIRED+24 |
| >> VSIT("IO" | REQUIRED+37*, REQUIRED+46 |
| >> VSIT("IR" | DEFAULTS+61*, DEFAULTS+62 |
| >> VSIT("LNK" | DEFAULTS+8, DEFAULTS+9*, DEFAULTS+10, DEFAULTS+11, DEFAULTS+12*, DEFAULTS+13*, DEFAULTS+14*, DEFAULTS+15, DEFAULTS+23 |
| >> VSIT("LOC" | REQUIRED+15, REQUIRED+20, REQUIRED+21*, REQUIRED+22, REQUIRED+31, REQUIRED+32, REQUIRED+44 |
| >> VSIT("MDT" | DEFAULTS+5* |
| >> VSIT("OPT" | DEFAULTS+38*, DEFAULTS+39*, DEFAULTS+40 |
| >> VSIT("OUT" | REQUIRED+14, DEFAULTS+46*, DEFAULTS+47 |
| >> VSIT("PAT" | REQUIRED+12*, REQUIRED+13, DEFAULTS+10, DEFAULTS+13, DEFAULTS+20, DEFAULTS+21, DEFAULTS+24, DEFAULTS+29, DEFAULTS+30 |
| >> VSIT("PKG" | DEFAULTS+82*, DEFAULTS+83*, DEFAULTS+84 |
| >> VSIT("PRI" | DEFAULTS+51*, DEFAULTS+52*, DEFAULTS+53 |
| >> VSIT("PRO" | DEFAULTS+42*, DEFAULTS+43*, DEFAULTS+44 |
| >> VSIT("SC" | DEFAULTS+55*, DEFAULTS+56 |
| >> VSIT("SHAD" | DEFAULTS+73*, DEFAULTS+74 |
| >> VSIT("SOR" | DEFAULTS+87, DEFAULTS+89*, DEFAULTS+90*, DEFAULTS+91*, DEFAULTS+92 |
| >> VSIT("SVC" | REQUIRED+9, REQUIRED+14, REQUIRED+20, REQUIRED+25, REQUIRED+39, REQUIRED+42*, REQUIRED+43*, REQUIRED+44*, REQUIRED+45*, REQUIRED+47* , REQUIRED+48*, REQUIRED+50*, REQUIRED+51*, REQUIRED+52*, REQUIRED+53 |
| >> VSIT("TYP" | REQUIRED+24*, REQUIRED+25*, REQUIRED+26*, REQUIRED+27*, REQUIRED+28*, REQUIRED+29 |
| >> VSIT("USR" | DEFAULTS+34*, DEFAULTS+35*, DEFAULTS+36 |
| >> VSIT("VDT" | REQUIRED+7, REQUIRED+9*, REQUIRED+10 |
| >> VSIT("VER" | DEFAULTS+79*, DEFAULTS+80 |
| >> VSIT("VID" | DEFAULTS+49* |
| >> VSIT(0 | DEFAULTS+20, DEFAULTS+21 |
| VSITE | DEFAULTS+26~, DEFAULTS+27*, DEFAULTS+29* |
| VSITI | DEFAULTS+26~, DEFAULTS+27*, DEFAULTS+29*, DEFAULTS+30 |
| >> VSITIPM | REQUIRED+37 |
| X | DEFAULTS+3~ |
| >> XQORNOD | DEFAULTS+42 |
| >> XQY | DEFAULTS+38 |
| Name | Field # of Occurrence |
|---|---|
| $T(SOURCE^PXAPI | DEFAULTS+88 |