116: p_contracttmpl_rec IN ContractTmpl_Rec_Type
117: )
118: RETURN VARCHAR2 IS
119: item_not_found_error EXCEPTION;
120: CURSOR cs_contract_types_pk_csr (p_contract_type_id IN NUMBER) IS
121: SELECT *
122: FROM Cs_Contract_Types
123: WHERE cs_contract_types.contract_type_id = p_contract_type_id;
124: l_cs_contract_types_pk cs_contract_types_pk_csr%ROWTYPE;
118: RETURN VARCHAR2 IS
119: item_not_found_error EXCEPTION;
120: CURSOR cs_contract_types_pk_csr (p_contract_type_id IN NUMBER) IS
121: SELECT *
122: FROM Cs_Contract_Types
123: WHERE cs_contract_types.contract_type_id = p_contract_type_id;
124: l_cs_contract_types_pk cs_contract_types_pk_csr%ROWTYPE;
125: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
126: l_row_notfound BOOLEAN := TRUE;
119: item_not_found_error EXCEPTION;
120: CURSOR cs_contract_types_pk_csr (p_contract_type_id IN NUMBER) IS
121: SELECT *
122: FROM Cs_Contract_Types
123: WHERE cs_contract_types.contract_type_id = p_contract_type_id;
124: l_cs_contract_types_pk cs_contract_types_pk_csr%ROWTYPE;
125: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
126: l_row_notfound BOOLEAN := TRUE;
127: BEGIN
120: CURSOR cs_contract_types_pk_csr (p_contract_type_id IN NUMBER) IS
121: SELECT *
122: FROM Cs_Contract_Types
123: WHERE cs_contract_types.contract_type_id = p_contract_type_id;
124: l_cs_contract_types_pk cs_contract_types_pk_csr%ROWTYPE;
125: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
126: l_row_notfound BOOLEAN := TRUE;
127: BEGIN
128: IF (p_contracttmpl_rec.CONTRACT_TYPE_ID IS NOT NULL)
126: l_row_notfound BOOLEAN := TRUE;
127: BEGIN
128: IF (p_contracttmpl_rec.CONTRACT_TYPE_ID IS NOT NULL)
129: THEN
130: OPEN cs_contract_types_pk_csr(p_contracttmpl_rec.CONTRACT_TYPE_ID);
131: FETCH cs_contract_types_pk_csr INTO l_cs_contract_types_pk;
132: l_row_notfound := cs_contract_types_pk_csr%NOTFOUND;
133: CLOSE cs_contract_types_pk_csr;
134: IF (l_row_notfound) THEN
127: BEGIN
128: IF (p_contracttmpl_rec.CONTRACT_TYPE_ID IS NOT NULL)
129: THEN
130: OPEN cs_contract_types_pk_csr(p_contracttmpl_rec.CONTRACT_TYPE_ID);
131: FETCH cs_contract_types_pk_csr INTO l_cs_contract_types_pk;
132: l_row_notfound := cs_contract_types_pk_csr%NOTFOUND;
133: CLOSE cs_contract_types_pk_csr;
134: IF (l_row_notfound) THEN
135: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CONTRACT_TYPE_ID');
128: IF (p_contracttmpl_rec.CONTRACT_TYPE_ID IS NOT NULL)
129: THEN
130: OPEN cs_contract_types_pk_csr(p_contracttmpl_rec.CONTRACT_TYPE_ID);
131: FETCH cs_contract_types_pk_csr INTO l_cs_contract_types_pk;
132: l_row_notfound := cs_contract_types_pk_csr%NOTFOUND;
133: CLOSE cs_contract_types_pk_csr;
134: IF (l_row_notfound) THEN
135: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CONTRACT_TYPE_ID');
136: RAISE item_not_found_error;
129: THEN
130: OPEN cs_contract_types_pk_csr(p_contracttmpl_rec.CONTRACT_TYPE_ID);
131: FETCH cs_contract_types_pk_csr INTO l_cs_contract_types_pk;
132: l_row_notfound := cs_contract_types_pk_csr%NOTFOUND;
133: CLOSE cs_contract_types_pk_csr;
134: IF (l_row_notfound) THEN
135: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CONTRACT_TYPE_ID');
136: RAISE item_not_found_error;
137: END IF;