7425: , l_last_update_login
7426: FROM
7427: PJI_FP_RMAP_FPR_T rwid
7428: , pji_fp_aggr_pjp1_t tmp
7429: , pji_pjp_wbs_header ver3
7430: WHERE 1 = 1
7431: AND tmp.rowid = rwid.pjp1_rowid
7432: AND rl.rowid = rwid.fpr_rowid
7433: AND rwid.fpr_rowid IS NOT NULL
7690: , CUSTOM15
7691: , tmp.plan_type_code /* 4471527 */
7692: FROM PJI_FP_RMAP_FPR_T rwid
7693: , pji_fp_aggr_pjp1_t tmp
7694: , pji_pjp_wbs_header ver3 -- replaced ver3 with wbs header for project-to-program association event.
7695: WHERE 1 = 1
7696: AND tmp.worker_id = g_worker_id
7697: AND rwid.worker_id = g_worker_id
7698: AND tmp.rowid = rwid.pjp1_rowid
9032: BEGIN
9033:
9034: print_time ( ' Before populate wbs header ' );
9035:
9036: INSERT INTO PJI_PJP_WBS_HEADER
9037: (
9038: PROJECT_ID
9039: , PLAN_VERSION_ID
9040: , WBS_VERSION_ID
9069: , l_creation_date
9070: , l_created_by
9071: , l_last_update_login
9072: FROM PJI_FM_EXTR_PLNVER3_T ver
9073: , PJI_PJP_WBS_HEADER whdr
9074: WHERE ver.plan_version_id = whdr.plan_version_id (+)
9075: AND ver.project_id = whdr.project_id (+)
9076: -- AND ver.wbs_struct_version_id = whdr.wbs_version_id (+)
9077: AND ver.plan_type_id = whdr.plan_type_id (+)
9101: BEGIN
9102:
9103: print_time ( ' Before update wbs header ' );
9104:
9105: UPDATE /*+ index(whdr,PJI_PJP_WBS_HEADER_N1) */
9106: PJI_PJP_WBS_HEADER whdr
9107: SET ( MIN_TXN_DATE
9108: , MAX_TXN_DATE
9109: , LAST_UPDATE_DATE
9102:
9103: print_time ( ' Before update wbs header ' );
9104:
9105: UPDATE /*+ index(whdr,PJI_PJP_WBS_HEADER_N1) */
9106: PJI_PJP_WBS_HEADER whdr
9107: SET ( MIN_TXN_DATE
9108: , MAX_TXN_DATE
9109: , LAST_UPDATE_DATE
9110: , LAST_UPDATED_BY