HP 3000 Manuals HP 3000 Manuals
IAURECVS This module uses various User and Supporting Intrinsics to extract an MPE file (subject ACTLIST) from an HP Desk message in the In Tray of an HP Desk User 'Di User'. This program creates and uses a Session Profile file (PROFILE). PROFILE is closed before being referenced when the call to HPDUserSignon is made. HPDUserSignon is called to log on as the user whose In Tray is to be examined. The status result is tested. Errors direct the code to the error routine (described above). The In Tray is then listed using the HPDUtility Supporting Intrinsic. A Transaction File (TRANFILE) is built by the program. The first record is the standard Body type indentifier record. The second record is the Message List selector record. It is set up to select the record (or records) with a subject of "ACTLIST". The Transaction File is closed before the call is made to the Intrinsic, HPDUtility, with an operation-type equal to 1, "List user's In Tray". (NOTE: Param 4 which would be returned containing the number of messages selected is not used in this example program.) The same, unchanged, Transaction File (TRANFILE) is passed as a parameter when the User Intrinsic HPDUserReceive is called. Message_source is specified as zero, indicating the In Tray. The parameter Message_ ref (which would return a tracking number assigned to the message by HP Desk) is not used in this example. An error check is performed to determine the success of the Intrinsic call. The program then opens TRANFILE and reads it sequentially until a record with transaction type equal to 30500 is read. This is the tt_content_file record which indicates the filename, filecode and subject of the MPE file containing the context of the message. The MPE COMMAND Intrinsic is then called to rename the content file "NEWFILE". If the message contains any data other than the anticipated MPE file (which will have a file code of 0) a message is displayed to indicate this. If a trailer record is detected then the file referenced by it is deleted. A final Intrinsic call is made to the HPDDeleteMsg Supporting Intrinsic. TRANFILE is supplied as a parameter to direct the Intrinsic to delete the In Tray message (provided it is the anticipated MPE file) referenced by the 5100 record (tt_intray_item). Again, the status result is tested. The final section of the program calls the HPDTerminate Supporting Intrinsic to log "Di User" off HP Desk.