VistA Analysis » VistA Reference » RPCs » TIU GET PRF TITLE

TIU GET PRF TITLE

Returns IEN of the TIU Note Title in file 8925.1 which is associatedwith given flag for given patient.

Properties

Property Value
Label GETTITLE
MUMPS Implementation TIUPRF2
Return Type SINGLE VALUE

Input Parameters

Name Type Maximum Data Length Required Description
PTDFN LITERAL   true Patient IEN in Patient file
FLAGID LITERAL   true The unique number for a particular Active Record Flag returned by $$GETACT^DGPFAPI. See IA #3860. See also GETFLAG^ORPRF.

MUMPS Method Description

Property Value
Method GETTITLE^TIUPRF2
Method Comment RPC Gets Note Title associated with FLAGID for PTDFN
Input Parameters PTDFN, FLAGID
First Comment 
Receives TIUY by ref; passes back
 TIUY = TitleIEN^Title
        0 if no title is associated or flg assignmt is not active
Requires PTDFN
Requires FLAGID - identifier for particular flag assignment
   for patient PTDFN. Set as subscript in GETACT^DGPFAPI.
 See GETFLG^ORPRF.
Code 
 N PRFARR K TIUY S TIUY=0
 Q:'$G(PTDFN)  Q:'$G(FLAGID)
 S TIUY=$$GETACT^DGPFAPI(PTDFN,"PRFARR") ;Get ACTive flag info
 Q:'TIUY
 S TIUY=$G(PRFARR(FLAGID,"TIUTITLE"))
 I TIUY'>0 S TIUY=0

CPRS

File Type Description
Pascal File fPatientFlagMulti.pas


Document generated on August 31st 2022, 2:55:43 pm