DSIYUTL7 EQMAINT MAINT PERFMD (3866)    REMOTE PROCEDURE (8994)

Name Value
NAME DSIYUTL7 EQMAINT MAINT PERFMD
TAG EQMAINT
ROUTINE DSIYUTL7
RETURN VALUE TYPE ARRAY
AVAILABILITY PUBLIC
INACTIVE ACTIVE
DESCRIPTION 
EQMAINT
RPC to return equipment maintenance information for a piece of equipment, 
will return a message indicating no maintenance if none was performed, 
else the return value will be:
 
RET(#)=IEN^Date^Type of Maintenance^Work Order#^Status^Work Performed
INPUT PARAMETER
  • IEN
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   11
    REQUIRED:   YES
    SEQUENCE NUMBER:   1
    DESCRIPTION:   
    IEN
Required
IEN to the Equipment Management File ^ENG(6914)
RETURN PARAMETER DESCRIPTION 
RETURN PARAMETER
 
DSIYRET(1)="0^No Maintenance Performed on this Piece of Equipment" if no
maintenance found,
 
Else
 
DSIYRET(#) = IEN^Date of Maintenance (internal VistA format)^Type of 
Maintenance^Work Order #^Status^Work Performed (first 30 characters)