Print Page as PDF
TIU GET TITLE IFN ICR (5352)

TIU GET TITLE IFN    ICR (5352)

Name Value
NUMBER 5352
IA # 5352
DATE CREATED 2009/01/26
CUSTODIAL PACKAGE TEXT INTEGRATION UTILITIES
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE TIUFLF7
NAME TIU GET TITLE IFN
GENERAL DESCRIPTION 

Lab use $$DDEFIEN^TIUFLF7 to find the Title IFN in
file 8925.1.

S LRTITLE=$$DDEFIEN^TIUFLF7("LR "_LRO68_" REPORT","TL") I 'LRTITLE  D .W $C(7)
.S LRMSG="No TIU title for this lab report.  Cannot release."      .D
EN^DDIOL(LRMSG,"","!!") K LRMSG
STATUS Active
KEYWORDS TIU
DURATION Till Otherwise Agreed
ID TIUFLF7
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
$$DEFIEN 
Get IFN for Title in TIU DOCUMENT file (#8925.1).
VARIABLES TYPE VARIABLES DESCRIPTION
TIUDEFNM Input 
.01 name of Title, Docmt Class or Class in the
Document Definition file #8925.1
TIUTYPE Input 
Expected type of DDEF: TL or DC or CL
IEN Output 
Returns IEN^STATUS^NATL if exactly one DDEF of type
TIUTYPE
;        is found
;     or 0^ErrMsg
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
LAB SERVICE
MENTAL HEALTH 
MH ADDED 2.15.2011
DATE ACTIVATED 2009/02/13