1: package body PA_GANTT_CONFIG_PKG as
2: /* $Header: PAGCGCTB.pls 120.1 2005/08/19 16:32:54 mwasowic noship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
552: else
553: l_user_id :=0;
554: end if;
555:
556: PA_GANTT_CONFIG_PKG.UPDATE_ROW (
557: X_GANTT_CONFIG_ID => X_GANTT_CONFIG_ID
558: ,X_GANTT_VIEW_ID => X_GANTT_VIEW_ID
559: ,X_GANTT_CONFIG_USAGE => X_GANTT_CONFIG_USAGE
560: ,X_FILTER_CODE => X_FILTER_CODE
588: ,X_LAST_UPDATE_LOGIN => 0
589: );
590: EXCEPTION
591: WHEN no_data_found then
592: PA_GANTT_CONFIG_PKG.INSERT_ROW(
593: X_ROWID => l_rowid
594: ,X_GANTT_CONFIG_ID => X_GANTT_CONFIG_ID
595: ,X_GANTT_VIEW_ID => X_GANTT_VIEW_ID
596: ,X_GANTT_CONFIG_USAGE => X_GANTT_CONFIG_USAGE
627: ,X_LAST_UPDATE_LOGIN => 0
628: );
629: END LOAD_ROW;
630:
631: end PA_GANTT_CONFIG_PKG;