APPS.OKC_REP_STATUS_UPDATE_PVT SQL Statements

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

Line: 43

PROCEDURE contract_status_updater(
  p_api_version   IN          NUMBER,
  p_init_msg_list IN          VARCHAR2,
  p_status        IN          VARCHAR2,
  x_msg_data      OUT NOCOPY  VARCHAR2,
  x_msg_count     OUT NOCOPY  NUMBER,
  x_return_status OUT NOCOPY  VARCHAR2)

  IS

    l_api_version NUMBER;

Line: 57

    SELECT
      contract_id, contract_version_num,
      contract_number,
      contract_name
    FROM  okc_rep_contracts_all
    WHERE termination_date is not null
    AND   contract_status_code = G_REP_CON_STATUS_SIGNED
    AND   trunc(termination_date) <= TRUNC(SYSDATE);

Line: 67

    SELECT
      contract_id, contract_version_num,
      contract_number,
      contract_name
    FROM  okc_rep_contract_vers v
    WHERE termination_date IS NOT NULL
    AND   contract_status_code = G_REP_CON_STATUS_SIGNED
    AND   trunc(termination_date) <= trunc(SYSDATE);

Line: 76

    TYPE selected_contracts_tbl IS TABLE OF contracts_cur%ROWTYPE;

Line: 77

    TYPE selected_vers_contracts_tbl IS TABLE OF contract_vers_cur%ROWTYPE;

Line: 83

    selected_contracts selected_contracts_tbl;

Line: 84

    selected_vers_contracts selected_vers_contracts_tbl;

Line: 85

    selected_contract_ids NumList;

Line: 86

    selected_vers_contract_ids NumList;

Line: 87

    selected_vers_contract_ver VersionNumList;

Line: 95

    FND_FILE.PUT_LINE(FND_FILE.LOG, '***** BEGIN contract_status_updater *****');

Line: 99

    l_api_name    := 'contract_status_updater';

Line: 118

      FETCH contracts_cur BULK COLLECT INTO selected_contracts
      LIMIT l_batch_size;

Line: 121

      EXIT WHEN selected_contracts.COUNT = 0;

Line: 138

      FOR i IN 1..NVL(selected_contracts.LAST, -1) LOOP
        l_count := l_count + 1;

Line: 144

        FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || '               : '|| selected_contracts(i).contract_name);

Line: 145

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || '               : '|| selected_contracts(i).contract_name);

Line: 148

        FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || '             : '|| selected_contracts(i).contract_number);

Line: 149

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || '             : '|| selected_contracts(i).contract_number);

Line: 152

	FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || '            : '|| selected_contracts(i).contract_version_num);

Line: 153

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || '            : '|| selected_contracts(i).contract_version_num);

Line: 162

        selected_contract_ids(i) := selected_contracts(i).contract_id;

Line: 166

      FORALL j IN NVL(selected_contract_ids.FIRST,0)..NVL(selected_contract_ids.LAST,-1)
        UPDATE okc_rep_contracts_all
        SET    contract_status_code = p_status,
               last_update_date = sysdate,
               last_updated_by = Fnd_Global.User_Id,
               last_update_login = Fnd_Global.Login_Id
        WHERE  contract_id = selected_contract_ids(j);

Line: 184

      FETCH contract_vers_cur BULK COLLECT INTO selected_vers_contracts
      LIMIT l_batch_size;

Line: 187

      EXIT WHEN selected_vers_contracts.COUNT = 0;

Line: 203

      FOR i IN 1..NVL(selected_vers_contracts.LAST, -1) LOOP

        l_count := l_count + 1;

Line: 210

        FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || '               : '|| selected_vers_contracts(i).contract_name);

Line: 211

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || '               : '|| selected_vers_contracts(i).contract_name);

Line: 214

        FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || '             : '|| selected_vers_contracts(i).contract_number);

Line: 215

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || '             : '|| selected_vers_contracts(i).contract_number);

Line: 218

	FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || '            : '|| selected_vers_contracts(i).contract_version_num);

Line: 219

        FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || '            : '|| selected_vers_contracts(i).contract_version_num);

Line: 228

        selected_vers_contract_ids(i) := selected_vers_contracts(i).contract_id;

Line: 229

        selected_vers_contract_ver(i) := selected_vers_contracts(i).contract_version_num;

Line: 233

      FORALL j IN NVL(selected_vers_contract_ids.FIRST,0)..NVL(selected_vers_contract_ids.LAST,-1)
        UPDATE okc_rep_contract_vers
        SET    contract_status_code = p_status,
               last_update_date = sysdate,
               last_updated_by = Fnd_Global.User_Id,
               last_update_login = Fnd_Global.Login_Id
        WHERE  contract_id = selected_vers_contract_ids(j)
        AND    contract_version_num = selected_vers_contract_ver(j);

Line: 290

  END contract_status_updater;

Line: 306

  PROCEDURE contract_status_update_manager(
    p_status IN VARCHAR2,
    errbuf  OUT NOCOPY VARCHAR2,
    retcode OUT NOCOPY VARCHAR2)
  IS
    l_api_version   NUMBER;

Line: 321

    FND_FILE.PUT_LINE(FND_FILE.LOG, '***** BEGIN contract_status_update_manager *****');

Line: 323

    l_api_name    := 'contract_status_update_manager';

Line: 337

    contract_status_updater(
      p_api_version   => l_api_version,
      p_init_msg_list => l_init_msg_list,
      p_status        => l_status,
      x_msg_data      => l_msg_data,
      x_msg_count     => l_msg_count,
      x_return_status => l_return_status
    );

Line: 351

    FND_FILE.PUT_LINE(FND_FILE.LOG, '***** END contract_status_update_manager() *****');

Line: 361

  END contract_status_update_manager;