TIU ACTION MENU MAPPING (4155)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME TIU ACTION MENU MAPPING
ITEM TEXT Map Titles
ITEM
PACKAGE TEXT INTEGRATION UTILITIES
ENTRY ACTION S XQORFLG("SH")=0 S:$G(VALMSG)'["*" VALMSG="+ Next Screen - Prev Screen ?? More Actions",VALM("MAX")=+$G(VALMCNT)
SCREEN I 1 X:$D(^ORD(101,+$P(^ORD(101,DA(1),10,DA,0),"^"),24)) ^(24)
HEADER S XQORM("#")=$G(^TMP("TIUMLIST",$J,"#")) D RESIZE^TIULM(21,18),SHOW^VALM K XQORM("XLATE","FIND")
MENU PROMPT Select Action:
DESCRIPTION
Menu of actions which may be executed to map local TIU Titles to VHA 
Enterprise Standard Titles.
TYPE menu
CREATOR USER,ONE
TIMESTAMP 2006-12-11 16:26:01