Call the Create Program API

To create a Program definition and an instance of it, call the API CDR_PUB_DF_PROGRAM.CREATEPROGRAM.

Its signature is:

PROCEDURE CREATEPROGRAM( 
     P_API_VERSION              IN    NUMBER, 
     P_INIT_MSG_LIST            IN    VARCHAR2 := CDR_PUB_DEF_CONSTANTS.G_FALSE,
     P_COMMIT                   IN    VARCHAR2 := CDR_PUB_DEF_CONSTANTS.G_FALSE,
     P_VALIDATION_LEVEL         IN    NUMBER := CDR_PUB_DEF_CONSTANTS.G_VALID_LEVEL_FULL, 
     X_RETURN_STATUS            OUT    VARCHAR2, 
     X_MSG_COUNT                OUT    NUMBER, 
     X_MSG_DATA                 OUT    VARCHAR2, 
     PIO_SOURCECDRNAMING        IN OUT CDR_NAMING_VERSION_OBJ_TYPE, 
     PI_CDRPRGOBJTYPE           IN    CDR_PROGRAM_OBJ_TYPE, 
     PI_CREATEOBJECT            IN    VARCHAR2, 
     PI_INSTANCE_SUBTYPE_ID     IN    CDR_NAMINGS.OBJECT_SUBTYPE_ID%TYPE, 
     PI_DEFCLASSIFICATIONCOLL   IN    CDR_CLASSIFICATIONS_COLL, 
     PI_INSTCLASSIFICATIONCOLL  IN    CDR_CLASSIFICATIONS_COLL 
); 

Enter Parameter values as follows:

• PIO_SOURCECDRNAMING. Enter CDR_NAMING_VERSION_OBJ_TYPE values that apply to the Program definition, as follows:
  • company_id = Enter_your_company_ID
  • obj_id = null
  • obj_ver = null
  • object_type_rc = null
  • name = 'Enter_a_name_for_the_Program'
  • namespace_obj_id = Your_WorkArea's_obj_ID
  • namespace_obj_ver = 1
  • namespace_start_obj_ver = 1
  • namespace_end_obj_ver= cdr_def_constants.cdr_max_def_object_version
  • owning_location_rc = null
  • checked_out_flag_rc = '$YESNO$NO'
  • checked_out_id = null
  • object_subtype_id = null
  • description = 'Enter_a_Description_for_the_Program'
  • copied_from_company_id = null
  • copied_from_obj_id = null
  • copied_from_obj_ver = null
  • ref_company_id = null
  • ref_obj_ver = null
  • object_version_number = 1
  • status_rc = '$NAMING_STATUS$INSTALLABLE'
  • validation_status_rc = null
  • version_label = null
• PI_CDRPRGOBJTYPE. Enter CDR_PROGRAM_OBJ_TYPE values that apply to the Program definition, as follows:
  • company_id = Enter_your_company_ID
  • obj_id = null
  • obj_ver = 1
  • tech_type_id = Enter_your_Tech_Type_ID
  • manual_validation_flag_rc = '$YESNO$NO'
• PI_CREATEOBJECT = BOTH
• PI_DEFCLASSIFICATIONCOLL = null
• PI_INSTCLASSIFICATIONCOLL = null