Submits a job to delete a process and all of its functions.
Argument values are exactly as the information input for the Delete a Process screen described in Submitting the Job to Delete a Process Definition in the LANSA for i User Guide.
This is a Specialized Built-In Function for use in a Development Environment only.
Arguments for Visual LANSA
Arguments for LANSA for i
A user wants to control the deletion of processes using their own version of the "Delete a Process" facility.
********* Define arguments
DEFINE FIELD(#PROCES) TYPE(*CHAR) LENGTH(10)
DEFINE FIELD(#RETCOD) TYPE(*CHAR) LENGTH(2)
********* Request Process
********* Execute built-in-function - DELETE_PROCESS
USE BUILTIN(DELETE_PROCESS) WITH_ARGS(#PROCES) TO_GET(#RETCOD)
********* Check if submission was successful
IF COND('#RETCOD *EQ ''OK''')
MESSAGE MSGTXT('Delete Process submitted successfully')
CHANGE FIELD(#PROCES) TO(*BLANK)
MESSAGE MSGTXT('Delete Process submit failed with errors,
refer to additional messages')