XOBUZAP1 ;; mjk/alb - VistALink Connection Manager ; 08/4/2005 13:00
Source file <XOBUZAP1.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 |
---|---|---|
Foundations | 1 | XOBU TERMINATE CONNECTION MANAGER |
Kernel | 1 | ^ORD(101 |
VistALink | 1 | XOBVLL |
Name | Comments | DBIA/ICR reference |
---|---|---|
VLEN | ; -- List Manager interactive entry point for VistALink connection socket
; job cleanup |
|
VLQUICK | ; -- Interactive that just zaps all for VistALink connection socket jobs
|
|
VLZAP() | ; -- callable non-interactive for VistALink connection socket job cleanup
; o BE CAREFUL because this call just does it! ; o If in programmer's mode, it is recommended that the VLQUICK tag be used ; Input: None ; Return: Count of how many jobs terminated or ; -1 is XOBSEL arrary is not passed in or is invalid. ; |
|
VLSEL(XOBSEL) | ; -- setup VistALink connection socket job selection criteria
; -- routine name the job should be executing |
|
GETSUB() | ; -- get ^XTMP namespaced subscript beginning
|
|
GETREF() | ; -- get ^XTMP reference of $JOB for Connection Mgr
|
|
GETDESC() | ; -- get description for 0th node of ^XTMP
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ORD(101 - [#101] | |ptcl |
^TMP("XOB LISTENERS" | |list |
^TMP("XOB TERMINATE JOBS" | |list |
Name | Field # of Occurrence |
---|---|
^(24 | |ptcl |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |