-- TEST NUMBERING SEQUENCE
create sequence SEQ_TEST_STBID start with 1 increment by 1;
drop sequence SEQ_TEST_STBID;
select SEQ_TEST_STBID.nextval from dual;
select SEQ_TEST_STBID.currval from dual;
-- stbid, charid
select '{ABC'||to_char(SEQ_TEST_STBID.currval ,'FM09999')||'-BBBB-11E2-B616-5D7CAF36E0E5}' from dual;
-- pid
select to_char(SEQ_TEST_STBID.nextval + 30000) from dual;
-- ClientID
select '111222333-'||to_char(SEQ_TEST_STBID.currval, 'FM09999') from dual;
-- Readable_ClientID
select '01999'||to_char(SEQ_TEST_STBID.currval, 'FM099999') from dual;
-- userid
select 'tester'||to_char(SEQ_TEST_STBID.currval, 'FM09999') from dual;
-- date
select to_char(sysdate, 'YYYY-MM-DD HH24:MI:SS') from dual;
-- add pairing
insert into t_nps_pairing(PID, STBID, CHARID, CLIENTID, CLIENTTYPE, READABLE_CLIENTID, STATUS, REGDATE, USERID, REP_FLAG)
values(
SEQ_TEST_STBID.nextval + 30000,
'{ABC'||to_char(SEQ_TEST_STBID.currval ,'FM09999')||'-BBBB-11E2-B616-5D7CAF36E0E5}',
'{ABC'||to_char(SEQ_TEST_STBID.currval ,'FM09999')||'-BBBB-11E2-B616-5D7CAF36E0E5}',
'111222333'||to_char(SEQ_TEST_STBID.currval, 'FM09999'),
'ME',
'01999'||to_char(SEQ_TEST_STBID.currval, 'FM099999'),
1,
sysdate,
'tester'||to_char(SEQ_TEST_STBID.currval, 'FM09999'),
1);
-- PID, STBID, CHARID, CLIENTID, CLIENTTYPE, READABLE_CLIENTID, STATUS, REGDATE, USERID, REP_FLAG
begin
for i in 1..5000 loop
insert into t_nps_pairing(PID, STBID, CHARID, CLIENTID, CLIENTTYPE, READABLE_CLIENTID, STATUS, REGDATE, USERID, REP_FLAG)
values(
SEQ_TEST_STBID.nextval + 30000,
'{ABC'||to_char(SEQ_TEST_STBID.currval ,'FM09999')||'-BBBB-11E2-B616-5D7CAF36E0E5}',
'{ABC'||to_char(SEQ_TEST_STBID.currval ,'FM09999')||'-BBBB-11E2-B616-5D7CAF36E0E5}',
'CID-'||to_char(SEQ_TEST_STBID.currval, 'FM09999'),
'ME',
'01999'||to_char(SEQ_TEST_STBID.currval, 'FM099999'),
1,
sysdate,
'tester'||to_char(SEQ_TEST_STBID.currval, 'FM09999'),
1);
end loop;
end;
-- Check table. t_nps_pairing
select * from t_nps_pairing where stbid like '{ABC%-BBBB-11E2-B616-5D7CAF36E0E5}';
select count(*) from t_nps_pairing where stbid like '{ABC%-BBBB-11E2-B616-5D7CAF36E0E5}';
-- Delete pairing data
delete from t_nps_pairing where stbid like '{ABC%-BBBB-11E2-B616-5D7CAF36E0E5}';