780: elsif (v_type_code in ('BLANKET','CONTRACT')) then
781: v_document_type := 'PA';
782: v_document_subtype := v_type_code;
783: end if;
784: fnd_message.set_name('PO', 'PO_MOD_CANCEL_REASON');
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
781: v_document_type := 'PA';
782: v_document_subtype := v_type_code;
783: end if;
784: fnd_message.set_name('PO', 'PO_MOD_CANCEL_REASON');
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
789: l_close_reason := fnd_message.get;
782: v_document_subtype := v_type_code;
783: end if;
784: fnd_message.set_name('PO', 'PO_MOD_CANCEL_REASON');
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
789: l_close_reason := fnd_message.get;
790: --Header Level
783: end if;
784: fnd_message.set_name('PO', 'PO_MOD_CANCEL_REASON');
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
789: l_close_reason := fnd_message.get;
790: --Header Level
791: If l_control_action = 'CANCEL' then
784: fnd_message.set_name('PO', 'PO_MOD_CANCEL_REASON');
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
789: l_close_reason := fnd_message.get;
790: --Header Level
791: If l_control_action = 'CANCEL' then
792: v_doc_line_id := null; --bug 13004199
785: fnd_message.set_token('DRAFT_ID', l_draft_id);
786: l_cancel_reason := fnd_message.get;
787: fnd_message.set_name('PO', 'PO_MOD_CLOSE_REASON');
788: fnd_message.set_token('DRAFT_ID', l_draft_id);
789: l_close_reason := fnd_message.get;
790: --Header Level
791: If l_control_action = 'CANCEL' then
792: v_doc_line_id := null; --bug 13004199
793: PO_Document_Control_GRP.control_document(