APPS.GMD_ACTIVITIES_PVT SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 7

 * Contents: INSERT_ACTIVITY 	                                 *
 *	   UPDATE_ACTIVITY	                                 *
 *                                                               *
 * Use      This is the private layer of the GMD Activity API    *
 *                                                               *
 *                                                               *
 * History                                                       *
 *         Written by Sandra Dulyk, OPM Development              *
 *                                                               *
 * 20-FEB-2004  NSRIVAST  Bug# 3222090,Removed call to           *
 *                        FND_PROFILE.VALUE('AFLOG_ENABLED')     *
 *****************************************************************
*/


--Bug 3222090, NSRIVAST 20-FEB-2004, BEGIN
--Forward declaration.
   FUNCTION set_debug_flag RETURN VARCHAR2;

Line: 39

      insert_activity
   Description
     This particular procedure is used to insert an activity
   Parameters
    ================================================ */
  PROCEDURE insert_activity (
      p_api_version 			IN 	NUMBER
      , p_init_msg_list 		IN 	BOOLEAN
      , p_commit			IN 	BOOLEAN
      , p_activity_tbl			IN 	gmd_activities_pub.gmd_activities_tbl_type
      , x_message_count	 	OUT NOCOPY  	NUMBER
      , x_message_list 		OUT NOCOPY  	VARCHAR2
      , x_return_status		OUT NOCOPY  	VARCHAR2 )   IS

    CURSOR Cur_check_activity (v_activity VARCHAR2)  IS
      SELECT 1
      FROM   gmd_activities_b
      WHERE  activity = v_activity;

Line: 64

      gmd_debug.put_line(' In insert_activity private');

Line: 79

        gmd_debug.put_line('Begin Loop - in insert_activity loop (private).  Curr Activity is ' || p_activity_tbl(i).activity);

Line: 95

         GMD_ACTIVITIES_PKG.INSERT_ROW(
           X_ROWID  => l_rowid,
    	   X_ACTIVITY => p_activity_tbl(i).ACTIVITY,
    	   X_COST_ANALYSIS_CODE => p_activity_tbl(i).COST_ANALYSIS_CODE,
    	   X_DELETE_MARK => 0,
    	   X_TEXT_CODE => p_activity_tbl(i).TEXT_CODE,
    	   X_TRANS_CNT => p_activity_tbl(i).TRANS_CNT,
    	   X_ACTIVITY_DESC => p_activity_tbl(i).ACTIVITY_DESC,
    	   X_CREATION_DATE => sysdate,
    	   X_CREATED_BY => gmd_api_grp.user_id,
    	   X_LAST_UPDATE_DATE => sysdate,
    	   X_LAST_UPDATED_BY => gmd_api_grp.user_id,
    	   X_LAST_UPDATE_LOGIN => gmd_api_grp.user_id);

Line: 109

                    gmd_debug.put_line('End Loop -  insert_activity private');

Line: 114

         gmd_debug.put_line('END of Insert_activity private');

Line: 129

     END Insert_Activity;

Line: 134

      update_activity
   Description
     This particular procedure is used to update an activity
   Parameters

   ================================================ */
    PROCEDURE update_activity (
      p_api_version 		IN 	NUMBER
     ,p_init_msg_list 		IN 	BOOLEAN
     ,p_commit			IN 	BOOLEAN
     ,p_activity		IN 	gmd_activities.activity%TYPE
     ,p_update_table		IN	gmd_activities_pub.update_tbl_type
     ,x_message_count 		OUT NOCOPY  	NUMBER
     ,x_message_list 		OUT NOCOPY  	VARCHAR2
     ,x_return_status		OUT NOCOPY  	VARCHAR2 )  IS

     CURSOR retrieve_activity_table_values(v_activity  VARCHAR2) IS
        SELECT *
        FROM gmd_activities
        WHERE activity = v_activity;

Line: 155

      v_update_rec  		gmd_activities%ROWTYPE;

Line: 163

      gmd_debug.put_line(' In update_activity private');

Line: 177

    FETCH retrieve_activity_table_values INTO v_update_rec;

Line: 185

    FOR i IN 1 .. p_update_table.count LOOP
      IF (l_debug = 'Y') THEN
        gmd_debug.put_line('Begin Loop - in update_activity loop (private).  Col to update is ' || p_update_table(i).p_col_to_update);

Line: 189

      IF UPPER(p_update_table(i).p_col_to_update) = 'COST_ANALYSIS_CODE' THEN
        v_update_rec.cost_analysis_code := p_update_table(i).p_value;

Line: 191

      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'DELETE_MARK' THEN
        v_update_rec.delete_mark := p_update_table(i).p_value;

Line: 193

      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'TEXT_CODE' THEN
        v_update_rec.text_code := p_update_table(i).p_value;

Line: 195

      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'TRANS_CNT' THEN
        v_update_rec.trans_cnt := p_update_table(i).p_value;

Line: 197

      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'ACTIVITY_DESC' THEN
        v_update_rec.activity_desc := p_update_table(i).p_value;

Line: 202

    GMD_ACTIVITIES_PKG.UPDATE_ROW(
                   X_ACTIVITY 		=> p_activity
                  ,X_COST_ANALYSIS_CODE => v_update_rec.cost_analysis_code
                  ,X_DELETE_MARK 	=> v_update_rec.delete_mark
                  ,X_TEXT_CODE 		=> v_update_rec.text_code
                  ,X_TRANS_CNT 		=> v_update_rec.trans_cnt
                  ,X_ACTIVITY_DESC 	=> v_update_rec.activity_desc
                  ,X_LAST_UPDATE_DATE 	=> sysdate
             	  ,X_LAST_UPDATED_BY 	=> gmd_api_grp.user_id
             	  ,X_LAST_UPDATE_LOGIN	=> gmd_api_grp.login_id);

Line: 214

      gmd_debug.put_line('END of update_activity private');

Line: 229

  END update_activity;