[Home] [Help]
67: , 'HEADER' , Manual_Contract_Num_Type
68: , 'CHGREQ' , Manual_ChgReq_Num_Type )
69: INTO X_Num_Mode
70: , X_Manual_Num_Type
71: FROM oke_number_options
72: WHERE K_Type_Code = X_K_Type_Code
73: AND Buy_Or_Sell = X_Buy_Or_Sell;
74:
75: EXCEPTION
137: CURSOR c IS
138: SELECT Contract_Num_Mode Num_Mode
139: , Next_Contract_Num Next_Num
140: , Contract_Num_Width Width
141: FROM oke_number_options
142: WHERE K_Type_Code = X_K_Type_Code
143: AND Buy_Or_Sell = X_Buy_Or_Sell
144: FOR UPDATE OF Next_Contract_Num;
145:
162: ELSE
163: Return_Value := lpad(crec.Next_Num , crec.Width , '0');
164: END IF;
165:
166: UPDATE oke_number_options
167: SET Next_Contract_Num = Next_Contract_Num +
168: Contract_Num_Increment
169: , Last_Update_Date = sysdate
170: , Last_Updated_By = FND_GLOBAL.User_ID
200: CURSOR o IS
201: SELECT ChgReq_Num_Mode Num_Mode
202: , ChgReq_Num_Increment Incr
203: , ChgReq_Num_Width Width
204: FROM oke_number_options O
205: , oke_k_headers EH
206: , okc_k_headers_b CH
207: WHERE O.K_Type_Code = EH.K_Type_Code
208: AND O.Buy_Or_Sell = CH.Buy_Or_Sell
276: CURSOR LnNumOpt IS
277: SELECT ONO.Line_Num_Start_Number
278: , ONO.Line_Num_Increment
279: , ONO.Line_Num_Width
280: FROM oke_number_options ONO
281: , oke_k_headers EH
282: , okc_k_headers_b CH
283: WHERE EH.k_header_id = X_K_Header_ID
284: AND CH.id = EH.k_header_id
288: CURSOR SLnNumOpt IS
289: SELECT ONO.SubLine_Num_Start_Number
290: , ONO.SubLine_Num_Increment
291: , ONO.SubLine_Num_Width
292: FROM oke_number_options ONO
293: , oke_k_headers EH
294: , okc_k_headers_b CH
295: WHERE EH.k_header_id = X_K_Header_ID
296: AND CH.id = EH.k_header_id
476: CURSOR NumOpt IS
477: SELECT ONO.Delv_Num_Start_Number
478: , ONO.Delv_Num_Increment
479: , ONO.Delv_Num_Width
480: FROM oke_number_options ONO
481: , oke_k_headers EH
482: , okc_k_headers_b CH
483: WHERE EH.k_header_id = X_K_Header_ID
484: AND CH.id = EH.k_header_id