Print Page as PDF
XUTMTP Routine ICR (3521)

XUTMTP Routine    ICR (3521)

Name Value
NUMBER 3521
IA # 3521
DATE CREATED 2002/02/12
CUSTODIAL PACKAGE KERNEL
USAGE Controlled Subscription
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE XUTMTP
NAME XUTMTP Routine
GENERAL DESCRIPTION

CLINICAL INFO RESOURCE NETWORK - Master Patient Index/Patient
Demographics (MPI/PD) will make our RGMTRUN utility routine
class I at all VA facilities.  We will create a remote query tool
on the Master Patient Index (MPI) to query a site for the currently
running task information.

The following code in RGMTRUN examines the currently running tasks in
the SCHEDULE file.  For each task found, it examines the ROUTINE field.
If the ROUTINE field contains "HL" (Health Level Seven), then for
that task, EN^XUTMTP(TASK) is called to display the task information.

S TASK=0 F  S TASK=$O(^%ZTSCH("TASK",TASK)) Q:'TASK  Q:QFLG  D
.S ROU=$P(^%ZTSCH("TASK",TASK),"^",2)
.I ROU["HL" D EN^XUTMTP(TASK)

This IA allows MPI/PD to call the EN entry point in routine XUTMTP.
STATUS Active
DURATION Till Otherwise Agreed
ID XUTMTP
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
EN(TASK)

Examine the currently running tasks in the SCHEDULE file.
For each task found, examine the ROUTINE field.
If the ROUTINE field contains "HL" (Health Level Seven),
then for that task, EN^XUTMTP(TASK) is called to display
the task information.

Example of information displayed by EN^XUTMTP(TASK):
----------------------------------------------------
261181: EN^HLCSLM, HL7 Link Manager. No device. DEV,MOU.
From 12/31/2001 at 14:17,  By USER,NAME.
Started running 12/31/2001 at 14:17.  Job #: 562039155
VARIABLES TYPE VARIABLES DESCRIPTION
TASK Input
TaskMan's task ID.
ZTENV Input
set = 1
ZTKEY Input
set = 0
ZTNAME Input
set = <User name>
ZTFLAG Input
set = 1
XUTMUCI Input
X ^%ZOSF("UCI") S XUTMUCI=Y
SUBSCRIBING PACKAGE