Return to Symbol

Active Part Status Example

This example demonstrates the use of &ACTPRT to make sure an active part exists before a program is executed.

   RESP=&ACTPRT
   JUMP/,L20:,RESP
   CREATE/PART,'TEMP.PRT',INCHES,IFERR,L30:
   L20:

If no part exists, the CREATE statement will make it, and if a part does exist, the JUMP statement will proceed with the program without making a new part.