API tools faq
paste
Advertisement
Guest User

plsql

a guest
Jun 5th, 2014
270
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 19.09 KB | None | 0 0
raw download clone embed print report
  1. CREATE OR REPLACE procedure BI_CRM.gen_dic_customers as
  2.  
  3. v_counter int :=0;
  4. v_CUSTOMER_ID NUMBER(16);
  5. v_CUSTOMER_SRC_ID NUMBER(12);
  6. v_CUSTOMER_CODE VARCHAR2 (20 CHAR);
  7. v_CUSTOMER_SRC_CODE VARCHAR2 (20 CHAR);
  8. v_customer_status_id number(1);
  9. v_linked_customer_id NUMBER(12);
  10. v_ACCOUNT_ID NUMBER(12);
  11. v_ACCOUNT_CODE VARCHAR2 (12 BYTE);
  12. v_NAME VARCHAR2(80 CHAR);
  13. v_SURNAME VARCHAR2(80 CHAR);
  14. v_SEX VARCHAR2(20 CHAR);
  15. v_AGE_RANGE VARCHAR2(20 CHAR);
  16. v_CITY VARCHAR2(80 CHAR);
  17. v_STREET VARCHAR2(200 CHAR);
  18. v_HOUSE_NUM VARCHAR2(10 CHAR);
  19. v_FLAT_NUM VARCHAR2(10 CHAR);
  20. v_EMAIL_ADDR1 VARCHAR2(200 CHAR);
  21. v_EMAIL_ADDR2 VARCHAR2(200 CHAR);
  22. v_EMAIL_VALID_STATUS NUMBER(1);
  23. v_PHONE1 VARCHAR2(15 CHAR);
  24. v_PHONE2 VARCHAR2(15 CHAR);
  25. v_PHONE_VALID_STATUS NUMBER(1);
  26. v_BANK VARCHAR2(30 CHAR);
  27. v_SALUTATION VARCHAR2(30 CHAR);
  28. v_TITLE VARCHAR2(10 CHAR);
  29. v_PROVINCE VARCHAR2(100 CHAR);
  30. v_POST_CODE VARCHAR2(20 CHAR);
  31. v_POST_OFFICE VARCHAR2(80 CHAR);
  32. v_MUNICIPALITY VARCHAR2(100 CHAR);
  33. v_ADDRESS_VALID_STATUS NUMBER(1);
  34. v_BIRTH_DATE DATE;
  35. v_BIRTH_YEAR VARCHAR2 (10 CHAR);
  36. v_BIRTH_MONTH INT;
  37. v_BIRTH_DAY_OF_MONTH INT;
  38. v_a int;
  39. v_z int;
  40. v_LANG1_CODE VARCHAR2(8 CHAR);
  41. v_LANG2_CODE VARCHAR2(8 CHAR);
  42. v_LANG3_CODE VARCHAR2(8 CHAR);
  43. v_customer_active_flag NUMBER(1);
  44. v_customer_login VARCHAR2(30 CHAR);
  45. v_PROF_DEGREE VARCHAR2(20 CHAR);
  46. v_SRC_ID NUMBER(2);
  47. v_PESEL NUMBER(11);
  48. v_TABACCO_ALCOHOL_PERMISSION VARCHAR2(1 CHAR);
  49. v_MARKETING_PERMISSION VARCHAR2(1 CHAR);
  50. v_EMAIL_PERMISSION VARCHAR2(1 CHAR);
  51. v_SMS_PERMISSION VARCHAR2(1 CHAR);
  52. v_CALL_PERMISSION VARCHAR2(1 CHAR);
  53. v_INTERNET_USAGE VARCHAR2(30 CHAR);
  54. v_LIVING_STATUS VARCHAR2(30 CHAR);
  55. v_MARITIAL_STATUS VARCHAR2(30 CHAR);
  56. v_probability NUMBER;
  57. v_nbr_child NUMBER(2);
  58. v_birth_child1 NUMBER(4);
  59. v_birth_child2 NUMBER(4);
  60. v_birth_child3 NUMBER(4);
  61. v_birth_child4 NUMBER(4);
  62. v_birth_child5 NUMBER(4);
  63. v_profession VARCHAR2(30 CHAR);
  64. v_size_of_household number(2);
  65. v_name_day1 VARCHAR2 (30 CHAR);
  66. v_name_day_num VARCHAR2(20 CHAR);
  67. v_name_day_number2 number;
  68. v_house_income VARCHAR2 (20 CHAR);
  69. v_birth_segment int;
  70. v_birth_segment_max int;
  71. v_account_type_id number(5);
  72.  
  73.  
  74.  
  75.  
  76. begin
  77.  
  78.  
  79. for v_counter IN 1..1500 loop
  80.  
  81.  
  82. v_probability:= dbms_random.value;
  83. v_CUSTOMER_ID := bi_crm.customer_id.nextval;
  84. v_CUSTOMER_SRC_ID := bi_crm.customer_id.currval;
  85. v_customer_code := 'CUST'||trunc(dbms_random.value(10000,99999));
  86. v_customer_src_code := 'CUST_SRC'||trunc(dbms_random.value(10000, 99999));
  87. v_customer_status_id := trunc(dbms_random.value(1,9));
  88. IF dbms_random.value <=0.2 THEN
  89. v_linked_customer_id := v_customer_id +51;
  90. ELSE v_linked_customer_id := null;
  91. END IF;
  92.  
  93. IF dbms_random.value <=0.8 THEN
  94. select account_id into v_account_id from (select account_id from "BI_CRM"."CRM_DIM_ACCOUNTS" where account_type_id = 1 order by dbms_random.value) where not exists (select account_id from "BI_CRM"."CRM_DIM_CUSTOMERS");
  95. ELSIF dbms_random.value >0.95 THEN
  96. select account_id into v_account_id from (select account_id from "BI_CRM"."CRM_DIM_ACCOUNTS" where account_type_id = 3 order by dbms_random.value) where rownum =1;
  97. ELSE select account_id into v_account_id from (select account_id from "BI_CRM"."CRM_DIM_ACCOUNTS" where account_type_id = 2 order by dbms_random.value) where rownum =1;
  98. END IF;
  99.  
  100. select account_type_id into v_account_type_id from (select account_type_id from "BI_CRM"."CRM_DIM_ACCOUNTS" where account_id = v_account_id) where rownum=1;
  101.  
  102.  
  103.  
  104. select account_code into v_account_code from (select account_code from "BI_CRM"."CRM_DIM_ACCOUNTS" where account_id = v_account_id) where rownum =1;
  105. SELECT SEX into V_SEX FROM (SELECT SEX FROM "BI_CRM"."GEN_DIC_SEX" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  106. SELECT NAME into V_NAME FROM (SELECT NAME FROM "BI_CRM"."GEN_DIC_NAME" WHERE SEX = v_sex ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  107. SELECT SURNAME into V_SURNAME FROM (SELECT SURNAME FROM "BI_CRM"."GEN_DIC_SURNAME" WHERE SEX = v_sex ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  108. SELECT SEGMENT into v_age_range FROM (SELECT SEGMENT FROM "BI_CRM"."GEN_DIC_AGE" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  109. SELECT SALUTATION into v_salutation from (SELECT SALUTATION from "BI_CRM"."GEN_DIC_SALUTATION" WHERE sex=v_sex) WHERE rownum=1;
  110.  
  111.  
  112.  
  113.  
  114.  
  115. select MARITIAL_STATUS into v_maritial_status from (select maritial_status from "BI_CRM"."GEN_DIC_AGE" where segment=v_age_range and v_probability>maritial_probability_min and v_probability<=maritial_probability_max ) where rownum=1;
  116.  
  117.  
  118. SELECT CITY into v_city FROM (SELECT CITY FROM "BI_CRM"."GEN_DIC_CITY" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  119.  
  120. SELECT STREET into v_street FROM (SELECT STREET FROM "BI_CRM"."GEN_DIC_STREET" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  121.  
  122. v_street := 'ul. '||v_street;
  123. v_house_num := ROUND(DBMS_RANDOM.VALUE*100,0);
  124. v_flat_num := ROUND(DBMS_RANDOM.VALUE*100,0);
  125.  
  126. SELECT PROVINCE into v_province FROM (SELECT province from "BI_CRM"."GEN_DIC_PROVINCE" WHERE CITY = v_city order by dbms_random.value) WHERE rownum=1;
  127.  
  128. SELECT POST_CODE into v_post_code FROM (select post_code from "BI_CRM"."GEN_DIC_POST_CODE" where city = v_city order by dbms_random.value) where rownum=1;
  129.  
  130. SELECT CITY into v_post_office from (select city from "BI_CRM"."GEN_DIC_POST_CODE" where post_code = v_post_code order by dbms_random.value) where rownum=1;
  131.  
  132. select CITY into v_MUNICIPALITY from (select city from "BI_CRM"."GEN_DIC_POST_CODE" where city = v_city order by dbms_random.value) where rownum=1;
  133.  
  134. SELECT EMAIL into v_email_addr1 FROM (SELECT EMAIL FROM "BI_CRM"."GEN_DIC_MAIL" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  135. v_email_addr1 := v_name||'.'||v_surname||v_email_addr1;
  136.  
  137. IF DBMS_RANDOM.VALUE <= 0.3 THEN
  138. SELECT EMAIL into v_email_addr2 FROM (SELECT EMAIL FROM "BI_CRM"."GEN_DIC_MAIL" WHERE EMAIL not in (v_email_addr1) ORDER BY DBMS_RANDOM.VALUE) WHERE rownum =1;
  139. v_email_addr2 := v_name||'_'||v_surname||v_email_addr2;
  140. ELSE v_email_addr2 :=null;
  141. END IF;
  142.  
  143. IF DBMS_RANDOM.VALUE <=0.85 THEN
  144. v_email_valid_status :=1;
  145. ELSE v_email_valid_status :=0;
  146. END IF;
  147.  
  148. IF DBMS_RANDOM.VALUE <=0.95 THEN
  149. v_phone_valid_status :=1;
  150. ELSE v_phone_valid_status :=0;
  151. END IF;
  152.  
  153. v_phone1 := trunc(dbms_random.value(500,798))||trunc(dbms_random.value(100,999))||trunc(dbms_random.value(100,999));
  154.  
  155. IF DBMS_RANDOM.VALUE <=0.4 THEN
  156. v_phone2 := trunc(dbms_random.value(500,798))||trunc(dbms_random.value(100,999))||trunc(dbms_random.value(100,999));
  157. ELSE v_phone2 := null;
  158. END IF;
  159.  
  160.  
  161. IF DBMS_RANDOM.VALUE <=0.7 THEN
  162. v_address_valid_status :=1;
  163. ELSE v_address_valid_status :=0;
  164. END IF;
  165.  
  166. IF DBMS_RANDOM.VALUE <=0.9 THEN
  167. v_customer_active_flag :=1;
  168. ELSE v_customer_active_flag :=0;
  169. END IF;
  170.  
  171. select INTERNET into v_internet_usage from (select INTERNET from "BI_CRM"."GEN_DIC_INTERNET_USAGE" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  172. select living_status into v_living_status from (select living_status from "BI_CRM"."GEN_DIC_LIVING_STATUS" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum = 1;
  173.  
  174. CASE WHEN v_age_range = '16-18' THEN v_a:=1996; v_z:=1998;
  175. WHEN v_age_range = '18-24' THEN v_a:=1990; v_z:=1996;
  176. WHEN v_age_range = '24-30' THEN v_a:=1984; v_z:=1990;
  177. WHEN v_age_range = '30-40' THEN v_a:=1974; v_z:=1984;
  178. WHEN v_age_range = '40-50' THEN v_a:=1964; v_z:=1974;
  179. WHEN v_age_range = '50-65' THEN v_a:=1954; v_z:=1964;
  180. WHEN v_age_range = '65<' THEN v_a:=1920; v_z:=1954;
  181. ELSE v_a:=1920; v_z:=1998;
  182. END case;
  183.  
  184.  
  185.  
  186.  
  187. v_BIRTH_YEAR := TRUNC(dbms_random.value(v_a,v_z));
  188. v_birth_segment := v_BIRTH_YEAR;
  189. v_BIRTH_MONTH := TRUNC(dbms_random.value(1,12));
  190. IF v_BIRTH_MONTH < 10 THEN
  191. v_BIRTH_YEAR := v_BIRTH_YEAR||'0'||v_BIRTH_MONTH;
  192. ELSE
  193. v_BIRTH_YEAR := v_BIRTH_YEAR||v_BIRTH_MONTH;
  194. END IF;
  195.  
  196. CASE WHEN v_BIRTH_MONTH = 2 THEN
  197. v_BIRTH_DAY_OF_MONTH := TRUNC(dbms_random.value(1,28));
  198.  
  199. WHEN v_BIRTH_MONTH = 1 OR v_BIRTH_MONTH = 3 OR v_BIRTH_MONTH = 5 OR v_BIRTH_MONTH = 7 OR v_BIRTH_MONTH = 8 OR v_BIRTH_MONTH = 10 OR v_BIRTH_MONTH = 12 THEN
  200. v_BIRTH_DAY_OF_MONTH := TRUNC(dbms_random.value(1,31));
  201.  
  202. ELSE
  203. v_BIRTH_DAY_OF_MONTH := TRUNC(dbms_random.value(1,30));
  204. END CASE;
  205.  
  206.  
  207. IF v_BIRTH_DAY_OF_MONTH < 10 THEN
  208. v_BIRTH_YEAR := v_BIRTH_YEAR||'0'||v_BIRTH_DAY_OF_MONTH;
  209. ELSE
  210. v_BIRTH_YEAR := v_BIRTH_YEAR||v_BIRTH_DAY_OF_MONTH;
  211. END IF;
  212.  
  213.  
  214.  
  215. v_pesel:= substr(v_BIRTH_YEAR, 3, 6)||trunc(dbms_random.value(10000,99999));
  216.  
  217. v_BIRTH_DATE:=to_date(v_BIRTH_YEAR, 'YYYYMMDD');
  218.  
  219. IF v_sex = 'F' THEN
  220. IF v_BIRTH_YEAR < '19550000' THEN
  221. select TITLE into v_title FROM (SELECT TITLE FROM "BI_CRM"."GEN_DIC_TITLE" WHERE TITLE not in ('Mr.') ORDER BY DBMS_RANDOM.VALUE) WHERE rownum=1;
  222. else
  223. select TITLE into v_title FROM (SELECT TITLE FROM "BI_CRM"."GEN_DIC_TITLE" WHERE TITLE not in ('Mr.', 'Prof.', 'Dr.') ORDER BY DBMS_RANDOM.VALUE) WHERE rownum=1;
  224. end if;
  225.  
  226. ELSE
  227. IF v_BIRTH_YEAR < '19550000' THEN
  228. select TITLE into v_title FROM (SELECT TITLE FROM "BI_CRM"."GEN_DIC_TITLE" WHERE TITLE not in ('Mrs.', 'Miss', 'Ms.') ORDER BY DBMS_RANDOM.VALUE) WHERE rownum=1;
  229. else
  230. v_title := 'Mr.';
  231. END IF;
  232. END IF;
  233.  
  234.  
  235. IF dbms_random.value <=0.9
  236. THEN v_marketing_permission :='1';
  237. IF dbms_random.value <=0.75 THEN
  238. v_email_permission :='1';
  239. IF dbms_random.value <=0.6 THEN
  240. v_sms_permission := '1';
  241. IF dbms_random.value <=0.4 THEN
  242. v_call_permission :='1';
  243. ELSE v_call_permission :='0';
  244. END IF;
  245. ELSE v_sms_permission :='0';
  246. v_call_permission:='0';
  247. END IF;
  248. ELSE v_email_permission := '0';
  249. v_sms_permission :='0';
  250. v_call_permission:='0';
  251. END IF;
  252. ELSE v_marketing_permission :='0';
  253. v_email_permission := '0';
  254. v_sms_permission :='0';
  255. v_call_permission:='0';
  256. END IF;
  257.  
  258.  
  259. IF v_marketing_permission = '1' THEN
  260. IF v_age_range = '16-18' THEN
  261. v_TABACCO_ALCOHOL_PERMISSION:='0';
  262. ELSE v_TABACCO_ALCOHOL_PERMISSION:='1';
  263. END IF;
  264. ELSE v_TABACCO_ALCOHOL_PERMISSION:='0';
  265. END IF;
  266.  
  267.  
  268.  
  269.  
  270. SELECT BANK into V_BANK FROM (SELECT BANK FROM "BI_CRM"."GEN_DIC_BANK" ORDER BY DBMS_RANDOM.VALUE) WHERE rownum=1;
  271. IF dbms_random.value <=0.9 THEN
  272. select LANG into v_lang1_code from (select lang from "BI_CRM"."GEN_DIC_LANG" order by dbms_random.value) where rownum=1;
  273. ELSE v_lang1_code:='PL';
  274. END IF;
  275.  
  276. IF dbms_random.value <=0.65
  277. THEN
  278. select LANG into v_lang2_code from (select lang from "BI_CRM"."GEN_DIC_LANG" where lang <> v_lang1_code order by dbms_random.value) where rownum=1;
  279. ELSE v_lang2_code := null;
  280. END IF;
  281.  
  282. IF dbms_random.value <=0.2
  283. THEN
  284. begin
  285. select LANG into v_lang3_code from (select lang from "BI_CRM"."GEN_DIC_LANG" where lang not in (NVL(v_lang1_code,'ERROR'), NVL(v_lang2_code, 'ERROR')) order by dbms_random.value) where rownum=1;
  286. exception when NO_DATA_FOUND THEn
  287. dbms_output.put_line('v_lang1_code :'||v_lang1_code||' v_lang2_code: '||v_lang2_code);
  288. return;
  289. end;
  290. ELSE v_lang3_code := null;
  291. END IF;
  292.  
  293. v_customer_login:= substr(v_name, 1, 3)||substr(v_surname, 1, 3)||trunc(dbms_random.value*100,0);
  294.  
  295. select prof_degree into v_PROF_DEGREE from (select PROF_DEGREE from "BI_CRM"."GEN_DIC_DEGREE" order by dbms_random.value) where rownum=1;
  296.  
  297. IF v_age_range ='16-18' THEN
  298. IF dbms_random.value <= 0.2 THEN
  299. v_prof_degree:='Student';
  300. else v_prof_degree := null;
  301. END IF;
  302. else v_prof_degree := v_prof_degree;
  303. END IF;
  304.  
  305. select src_id into v_src_id from "BI_CRM"."CRM_DIC_SOURCE" where rownum=1;
  306.  
  307.  
  308. case when v_maritial_status = 'Single' then v_nbr_child := round(dbms_random.value(0,1));
  309. when v_maritial_status = 'Married' then v_nbr_child := round(dbms_random.value(0,5));
  310. when v_maritial_status = 'Divorced' then v_nbr_child := round(dbms_random.value(0,2));
  311. when v_maritial_status = 'Widowed' then v_nbr_child := round(dbms_random.value(2,4));
  312. ELSE v_nbr_child :=0;
  313. END CASE;
  314.  
  315.  
  316.  
  317. IF v_age_range <> '16-18' THEN
  318. select PROFESSION into v_profession from (select profession from "BI_CRM"."GEN_DIC_PROFESSION" order by dbms_random.value) where rownum=1;
  319. ELSE v_profession := null; v_nbr_child := 0;
  320. END IF;
  321.  
  322.  
  323.  
  324. IF v_birth_segment > 1984 THEN
  325. v_birth_segment_max :=2014;
  326. ELSE v_birth_segment_max :=v_birth_segment+30;
  327. END IF;
  328.  
  329. CASE WHEN v_nbr_child = 0 THEN v_birth_child1:=null; v_birth_child2:=null; v_birth_child3:=null; v_birth_child4:=null; v_birth_child5:=null;
  330. WHEN v_nbr_child = 1 THEN v_birth_child1:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child2:=null; v_birth_child3:=null; v_birth_child4:=null; v_birth_child5:=null;
  331. WHEN v_nbr_child = 2 THEN v_birth_child1:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child2:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child3:=null; v_birth_child4:=null; v_birth_child5:=null;
  332. WHEN v_nbr_child = 3 THEN v_birth_child1:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child2:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child3:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child4:=null; v_birth_child5:=null;
  333. WHEN v_nbr_child = 4 THEN v_birth_child1:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child2:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child3:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child4:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child5:=null;
  334. WHEN v_nbr_child = 5 THEN v_birth_child1:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child2:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child3:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child4:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max)); v_birth_child5:=trunc(dbms_random.value(v_birth_segment+20,v_birth_segment_max));
  335. ELSE v_size_of_household := 0;
  336. END CASE;
  337.  
  338.  
  339.  
  340. IF v_maritial_status = 'Married' THEN
  341. v_size_of_household := v_nbr_child + trunc(dbms_random.value(2,5));
  342. ELSE v_size_of_household := v_nbr_child + trunc(dbms_random.value(1,3));
  343. END IF;
  344.  
  345.  
  346.  
  347. --select name_day into v_name_day1 from (select name_day from "BI_CRM"."GEN_DIC_NAME_DAY" order by dbms_random.value) where rownum=1;
  348. --select name_day_number into v_name_day_number2 from (select name_day_number from "BI_CRM"."GEN_DIC_NAME_DAY" order by dbms_random.value) where rownum=1;
  349.  
  350. --v_name_day_num:= round(dbms_random.value(0,365));
  351.  
  352. IF dbms_random.value <=0.4 THEN
  353. v_house_income := trunc(dbms_random.value(2000,4800));
  354. ELSE v_house_income := null;
  355. END IF;
  356.  
  357.  
  358. INSERT INTO "BI_CRM"."CRM_DIM_CUSTOMERS" (
  359. "CUSTOMER_ID",
  360. "CUSTOMER_CODE",
  361. "CUSTOMER_SRC_ID",
  362. "CUSTOMER_SRC_CODE",
  363. "CUSTOMER_STATUS_ID",
  364. "LINKED_CUSTOMER_ID",
  365. "ACCOUNT_ID",
  366. "ACCOUNT_CODE",
  367. "SALUTATION",
  368. "TITLE", "NAME", "SURNAME",
  369. "SEX", "STREET", "HOUSE_NUMBER",
  370. "FLAT_NUMBER", "POST_CODE", "POST_OFFICE",
  371. "CITY", "PROVINCE", "MUNICIPALITY",
  372. "ADDRESS_VALID_STATUS", "BIRTH_DATE", "PESEL",
  373. "EMAIL1", "EMAIL2", "EMAIL_VALID_STATUS",
  374. "PHONE_NUMBER1", "PHONE_NUMBER2", "PHONE_VALID_STATUS", "MARITIAL_STATUS", "SIZE_OF_HOUSEHOLD", "NBR_OF_CHILDREN",
  375. "CHILD1_YEAR_OF_BIRTH", "CHILD2_YEAR_OF_BIRTH", "CHILD3_YEAR_OF_BIRTH", "CHILD4_YEAR_OF_BIRTH", "CHILD5_YEAR_OF_BIRTH", "HOUSE_INCOME",
  376. "PROFESSION",
  377. "PROF_DEGREE", "BANK", "LIVING_STATUS",
  378. --"NAME_DAY",
  379. --"NAME_DAY_DATE",
  380. "INTERNET_USAGE",
  381. "CUSTOMER_LOGIN", "MARKETING_PERMISSION",
  382. "EMAIL_PERMISSION", "SMS_PERMISSION", "CALL_PERMISSION",
  383. "TABACCO_ALCOHOL_PERMISSION", "LANG1_CODE", "LANG2_CODE",
  384. "LANG3_CODE", "CUSTOMER_ACTIV_FLAG", "DCRE",
  385. "USER_CRE", "DMOD", "USER_MOD",
  386. "ENROLMENT_CARD_NUMBER", "SRC_ID", "SRC_DCRE",
  387. "SRC_USER_CRE", "SRC_DMOD", "SRC_USER_MOD"
  388. ) VALUES (
  389. v_customer_id,
  390. v_customer_code,
  391. v_customer_src_id,
  392. v_customer_src_code,
  393. v_customer_status_id,
  394. v_linked_customer_id,
  395. v_account_id,
  396. v_account_code,
  397. v_salutation,
  398. v_title,
  399. v_name,
  400. v_surname,
  401. v_sex,
  402. v_street ,
  403. v_house_num,
  404. v_flat_num,
  405. v_post_code,
  406. v_post_office,
  407. v_CITY ,
  408. v_PROVINCE,
  409. v_MUNICIPALITY,
  410. v_address_valid_status,
  411. v_BIRTH_DATE,
  412. v_pesel,
  413. v_email_addr1,
  414. v_email_addr2,
  415. v_email_valid_status,
  416. v_phone1,
  417. v_phone2,
  418. v_phone_valid_status,
  419. v_maritial_status,
  420. --v_name_day1,
  421. --v_name_day_num,
  422. v_size_of_household,
  423. v_nbr_child,
  424. v_birth_child1,
  425. v_birth_child2,
  426. v_birth_child3,
  427. v_birth_child4,
  428. v_birth_child5,
  429. v_house_income,
  430. v_profession,
  431. v_PROF_DEGREE,
  432. v_bank,
  433. v_living_status,
  434. v_INTERNET_USAGE,
  435. v_customer_login,
  436. v_MARKETING_PERMISSION,
  437. v_EMAIL_PERMISSION,
  438. v_SMS_PERMISSION,
  439. v_CALL_PERMISSION,
  440. v_TABACCO_ALCOHOL_PERMISSION,
  441. v_lang1_code,
  442. v_lang2_code,
  443. v_lang3_code,
  444. v_customer_active_flag,
  445. sysdate,
  446. 'TA',
  447. sysdate,
  448. 'TA',
  449. 1234567889,
  450. v_src_id,
  451. sysdate,
  452. 'TA',
  453. sysdate,
  454. 'TA'
  455. );
  456.  
  457. commit;
  458. end loop;
  459. end;
  460. /
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!