91: THEN
92: SELECT style_id
93: BULK COLLECT
94: INTO l_style_id_tbl
95: FROM PO_DOC_STYLE_HEADERS
96: WHERE CHANGE_PROCESS_TYPE = 'MODIFICATION'
97: AND NVL(CONC_MODS_ENABLED_FLAG,'N') = 'N' ;
98: ELSE
99: SELECT p_style_id
100: BULK COLLECT
101: INTO l_style_id_tbl
102: FROM dual
103: WHERE EXISTS ( SELECT 'conc_mod_enabled_flag is N '
104: FROM PO_DOC_STYLE_HEADERS
105: WHERE NVL(CONC_MODS_ENABLED_FLAG,'N') = 'N'
106: AND CHANGE_PROCESS_TYPE = 'MODIFICATION');
107:
108: FOR i in 1.. l_style_id_tbl.COUNT LOOP
391: END IF;
392:
393: END LOOP;
394:
395: --set PO_DOC_STYLE_HEADERS.CONC_MODS_ENABLED_FLAG to Y
396: UPDATE PO_DOC_STYLE_HEADERS
397: SET CONC_MODS_ENABLED_FLAG='Y'
398: WHERE style_id=p_style_id;
399: FND_FILE.put_line(FND_FILE.log,'enable_conc_mod_for_styleId:Number of Rows Updated PO_DOC_STYLE_HEADERS'||SQL%ROWCOUNT);
392:
393: END LOOP;
394:
395: --set PO_DOC_STYLE_HEADERS.CONC_MODS_ENABLED_FLAG to Y
396: UPDATE PO_DOC_STYLE_HEADERS
397: SET CONC_MODS_ENABLED_FLAG='Y'
398: WHERE style_id=p_style_id;
399: FND_FILE.put_line(FND_FILE.log,'enable_conc_mod_for_styleId:Number of Rows Updated PO_DOC_STYLE_HEADERS'||SQL%ROWCOUNT);
400: FND_FILE.put_line(FND_FILE.log,'enable_conc_mod_for_styleId: SUCCESFUL for STYLE_ID:'||p_style_id);
395: --set PO_DOC_STYLE_HEADERS.CONC_MODS_ENABLED_FLAG to Y
396: UPDATE PO_DOC_STYLE_HEADERS
397: SET CONC_MODS_ENABLED_FLAG='Y'
398: WHERE style_id=p_style_id;
399: FND_FILE.put_line(FND_FILE.log,'enable_conc_mod_for_styleId:Number of Rows Updated PO_DOC_STYLE_HEADERS'||SQL%ROWCOUNT);
400: FND_FILE.put_line(FND_FILE.log,'enable_conc_mod_for_styleId: SUCCESFUL for STYLE_ID:'||p_style_id);
401: FND_FILE.put_line(FND_FILE.output,'Successfully upgraded Modifications for the document style x'||p_style_id);
402: COMMIT;
403: