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 |
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 1 | VSIT |
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 |