1: package body CS_CF_FLOW_PAGES_PKG as
2: /* $Header: CSCFFPGB.pls 120.0 2005/06/01 13:32:12 appldev noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_FLOW_ID in NUMBER,
501: WHERE flow_id = X_FLOW_ID
502: and flow_type_page_id = X_FLOW_TYPE_PAGE_ID
503: FOR UPDATE ;
504:
505: CS_CF_FLOW_PAGES_PKG.Update_Row(
506: X_FLOW_ID => X_FLOW_ID,
507: X_FLOW_TYPE_PAGE_ID => X_FLOW_TYPE_PAGE_ID,
508: X_ENABLED_FLAG => X_ENABLED_FLAG,
509: X_OBJECT_VERSION_NUMBER => l_object_version_number + 1,
530: end if;
531: exception
532: when no_data_found then
533: -- Record doesn't exist - insert in all cases
534: CS_CF_FLOW_PAGES_PKG.Insert_Row(
535: X_ROWID => l_rowid,
536: X_FLOW_ID => X_FLOW_ID,
537: X_FLOW_TYPE_PAGE_ID => X_FLOW_TYPE_PAGE_ID,
538: X_ENABLED_FLAG => X_ENABLED_FLAG,
606:
607: end TRANSLATE_ROW;
608:
609:
610: end CS_CF_FLOW_PAGES_PKG;