批量生成大数据量的SQL脚本
2009-09-23 00:00:00 来源:WEB开发网 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳缍婇弻鐔兼⒒鐎靛壊妲紒鐐劤缂嶅﹪寮婚悢鍏尖拻閻庨潧澹婂Σ顔剧磼閻愵剙鍔ょ紓宥咃躬瀵鎮㈤崗灏栨嫽闁诲酣娼ф竟濠偽i鍓х<闁绘劦鍓欓崝銈囩磽瀹ュ拑韬€殿喖顭烽幃銏ゅ礂鐏忔牗瀚介梺璇查叄濞佳勭珶婵犲伣锝夘敊閸撗咃紲闂佺粯鍔﹂崜娆撳礉閵堝洨纾界€广儱鎷戦煬顒傗偓娈垮枛椤兘骞冮姀銈呯閻忓繑鐗楃€氫粙姊虹拠鏌ュ弰婵炰匠鍕彾濠电姴浼i敐澶樻晩闁告挆鍜冪床闂備浇顕栭崹搴ㄥ礃閿濆棗鐦遍梻鍌欒兌椤㈠﹤鈻嶉弴銏犵闁搞儺鍓欓悘鎶芥煛閸愩劎澧曠紒鈧崘鈹夸簻闊洤娴烽ˇ锕€霉濠婂牏鐣洪柡灞诲妼閳规垿宕卞▎蹇撴瘓缂傚倷闄嶉崝搴e垝椤栫偛桅闁告洦鍨扮粻鎶芥倵閿濆簼绨藉ù鐘荤畺濮婃椽妫冨☉娆愭倷闁诲孩鐭崡鎶芥偘椤曗偓瀹曞爼顢楁径瀣珫婵犳鍣徊鍓р偓绗涘洤绠查柛銉墮閽冪喖鏌i弬鎸庢喐闁荤喎缍婇弻娑⑩€﹂幋婵囩亪濡炪値鍓欓悧鍡涒€旈崘顔嘉ч幖绮光偓鑼嚬缂傚倷绶¢崰妤呭箰閹间焦鍋╅柣鎴f绾偓闂佺粯鍔曠粔闈浳涢崘顔兼槬闁逞屽墯閵囧嫰骞掗幋婵愪紑閻庤鎸风粈渚€鍩為幋锔藉亹闁圭粯甯╂导鈧紓浣瑰劤瑜扮偟鍒掑▎鎾宠摕婵炴垶鐭▽顏堟煙鐟欏嫬濮囨い銉︾箞濮婃椽鏌呴悙鑼跺濠⒀傚嵆閺岀喖鎼归锝呯3闂佹寧绻勯崑娑㈠煘閹寸姭鍋撻敐搴樺亾椤撴稒娅婇柡灞界У濞碱亪骞忕仦钘夊腐闂備焦鐪归崐鏇㈠箠閹邦喗顫曢柟鎯х摠婵挳鏌涢幘鏉戠祷闁告挸宕—鍐Χ閸℃浠搁梺鑽ゅ暱閺呮盯鎮鹃悜钘壩ㄧ憸澶愬磻閹剧粯鏅查幖绮瑰墲閻忓秹姊虹紒妯诲鞍婵炲弶锕㈡俊鐢稿礋椤栨氨鐤€闂傚倸鐗婄粙鎰姳閼测晝纾藉ù锝堟閻撴劖鎱ㄥΟ绋垮婵″弶鍔欓獮妯兼嫚閼碱剦妲伴梻浣稿暱閹碱偊宕愭繝姣稿洭寮舵惔鎾存杸濡炪倖姊婚妴瀣啅閵夛负浜滄い鎾跺仜濡插鏌i敐鍥у幋妤犵偞甯¢獮瀣籍閳ь剟鎮楁繝姘拺閻熸瑥瀚崕妤呮煕濡 鍋撻悢鎻掑緧婵犵數濮烽弫鍛婃叏閻戣棄鏋侀柛娑橈攻閸欏繑銇勯幘鍗炵仼缁炬儳顭烽弻鐔煎礈瑜忕敮娑㈡煃闁垮鐏﹂柕鍥у楠炴帡宕卞鎯ь棜缂傚倸鍊风粈渚€藝闁秴鏋佸┑鐘虫皑瀹撲線鏌涢埄鍐姇闁稿﹦鍏橀弻娑樷攽閸℃浼€濡炪倖姊归崝鏇㈠煘閹达附鍊婚柛銉㈡櫇鏍¢梻浣告啞閹稿鎮烽敂鐣屸攳濠电姴娲﹂崵鍐煃閸濆嫬鏆熼柨娑欑矒濮婇缚銇愰幒鎴滃枈闂佸憡鐟ユ鎼佸煝閹炬枼鍫柛顐ゅ枔閸樻悂鏌h箛鏇炰户缁绢厼鐖煎畷鎴﹀箻鐠囪尙鐤€婵炶揪绲介幉锟犲磹椤栫偞鈷戠痪顓炴噹娴滃綊鎮跺☉鏍у姦闁糕斁鍋撳銈嗗笒閸燁偊鎯冨ú顏呯厸濞达絽婀辨晶顏堟煃鐟欏嫬鐏撮柟顔界懇瀵爼骞嬮悩杈敇闂傚倷绀佸﹢杈ㄧ仚闂佺濮ょ划搴ㄥ礆閹烘绫嶉柛顐ゅ枎娴犺櫣绱撴担鍓插創妞ゆ洘濞婇弫鍐磼濞戞艾骞堥梻浣告惈濞层垽宕濆畝鍕€堕柣妯肩帛閻撴洟鏌熼懜顒€濡煎ù婊勫劤閳规垿鏁嶉崟顐℃澀闂佺ǹ锕ラ悧鐘茬暦濠靛鏅濋柍褜鍓熼垾锕傚锤濡も偓閻掑灚銇勯幒宥堝厡缂佺姴澧介埀顒€鍘滈崑鎾斥攽閻樿京绐旈柛瀣殔閳规垿顢欑涵鐑界反濠电偛鎷戠徊鍨i幇鏉跨闁瑰啿纾崰鎾诲箯閻樼粯鍤戦柤绋跨仛濮f劙姊婚崒姘偓鐑芥嚄閼哥數浠氭繝鐢靛仜椤曨參宕楀Ο渚殨妞ゆ劑鍊栫€氭氨鈧懓澹婇崰鏍р枔閵婏妇绡€闁汇垽娼ф牎缂佺偓婢樼粔鐟邦嚕閺屻儱绠甸柟鐑樼箘閸炵敻鏌i悩鐑橆仩閻忓繈鍔岄蹇涘Ψ瑜夐崑鎾舵喆閸曨剙纰嶅┑鈽嗗亝缁诲倿锝炶箛娑欐優闁革富鍘鹃敍婊冣攽閳藉棗鐏犻柟纰卞亰閿濈偛顓奸崶鈺冿紳婵炶揪缍侀ˉ鎾诲礉瀹ュ鐓欑紒瀣仢閺嗛亶鏌i敐鍥у幋妤犵偛顑夐弫鍐焵椤掑倻涓嶅┑鐘崇閸嬶綁鏌涢妷鎴濆暟妤犲洭鎮楃憴鍕碍缂佸鎸抽垾鏃堝礃椤斿槈褔鏌涢埄鍏狀亪妫勫鍥╃=濞达絽澹婇崕鎰版煕閵娿儱顣崇紒顔碱儏椤撳吋寰勭€n亖鍋撻柨瀣ㄤ簻闁瑰搫绉堕ˇ锔锯偓娈垮枛閻忔繈鍩為幋锕€鐓¢柛鈩冾殘娴狀垶姊洪崨濠庣劶闁告洦鍙庡ú鍛婁繆閵堝繒鍒伴柛鐕佸灦瀹曟劙宕归锝呭伎濠碘槅鍨抽崢褎绂嶆ィ鍐╁€垫慨妯煎亾鐎氾拷

业务逻辑:利用游标从数据库中现有的表数据,查询出部分属性,来插入到目标表中,来在目标表中生成大批量的数据,SQL实现如下:
create or replace procedure add_subscription_c(i_count in number,-- i_count输入值为循环插入记录的次数
i_usersegment in varchar2,
i_startaccount in number,
o_resultcode out number,
o_resulstring out varchar2) as
v_count number;
v_startcount number;
v_sql varchar2(1024);
v_subscriber zxdbm_ismp.ssrv_subscription.subscriber%type; --订购方号码
v_usercode zxdbm_ismp.ssrv_subscription.usercode%type; --使用号码
v_payuser zxdbm_ismp.ssrv_subscription.payuser%type; --付费号码
v_servicekeyid zxdbm_ismp.ssys_service_type.servicekeyid%type; --内部业务键id
v_status zxdbm_ismp.ssrv_subscription.status%type; --状态0-待生效;1-正常;2:暂停+待生效;3:暂停;4:待失效;5:暂停+待失效;6:注销,
v_subscriptionindex zxdbm_ismp.ssrv_subscription.subscriptionindex%type; --定购关系顺序号
v_serviceindex zxdbm_ismp.ssrv_subscription.serviceindex%type; --业务序号
v_serviceid zxdbm_ismp.ssrv_subscription.serviceid%type; --新业务ID
v_productid zxdbm_ismp.ssrv_subscription.productid%type; --产品ID
v_productindex zxdbm_ismp.ssrv_subscription.productindex%type; --产品序号
v_cpid zxdbm_ismp.ssrv_subscription.cpid%type; --CPID
v_cpindex zxdbm_ismp.ssrv_subscription.cpindex%type; --CP序号
v_corpindex zxdbm_ismp.ssrv_subscription.corpindex%type; --集团序号
v_corpid zxdbm_ismp.ssrv_subscription.corpid%type; --集团ID
v_msisdntype zxdbm_ismp.ssrv_subscription.msisdntype%type; --用户号码类型,1-msisdn,2-phs,3-pstn,4-IPTV接入号, 5-宽带接入号,6-固定IP
v_servicetype zxdbm_ismp.ssrv_subscription.servicetype%type; --业务能力类型
v_newCode zxdbm_ismp.ssrv_subscription.usercode%type;
v_subnumber number(10);
type cur_t is ref cursor;
cur_product cur_t;
begin
--缺省为300 000000
v_startcount := 30000000;
if i_startaccount is not null then
v_startcount := i_startaccount;
end if;
--构造用户号码
v_usercode := '191';
if i_usersegment is not null then
v_usercode := i_usersegment;
end if;
v_msisdntype := 1;
v_corpindex := 0;
v_corpid := ' ';
-------------------------------------------------------------------------
-------------------------------------------------------------------------
v_subnumber := v_startcount;
v_count := v_startcount;
-- i_count输入值为循环的次数 v_count为缺省0
while v_count <= (v_startcount + i_count) loop
--组合生成号码
v_newCode := v_usercode || v_count;
--从产品表中找一条现成的数据来得到订购关系表中一些属性值来插入订购关系
open cur_product for 'select servicetype,serviceindex,serviceid,productindex,productid,status,cpid,cpindex from v_ssrv_product where productid =111100009020000000030';
loop
fetch cur_product
into v_servicetype, v_serviceindex, v_serviceid, v_productindex, v_productid, v_status, v_cpid, v_cpindex;
sp_get_next_seq('slp_order_prdindex', v_subscriptionindex);
exit when cur_product%notfound;
insert into zxdbm_500.s500_user_subscription
(subscriptionindex,
subscriptionid,
servicetype,
serviceindex,
serviceid,
productindex,
productid,
corpindex,
corpid,
subscriber,
usercode,
payuser,
status,
msisdntype,
cpid,
cpindex)
values
(v_subscriptionindex,
v_newCode||v_subscriptionindex,
v_servicetype,
v_serviceindex,
v_serviceid,
v_productindex,
v_productid,
v_corpindex,
v_corpid,
v_newCode,
v_newCode,
v_newCode,
v_status,
v_msisdntype,
v_cpid,
v_cpindex);
v_subnumber := v_subnumber + 1;
end loop;
--每1000条commit一次 或 v_count=v_startcount+循环次数
if mod(v_subnumber, 1000) = 0 or v_count = (v_startcount + i_count) then
commit;
end if;
--在v_startcount的基础上+1
v_count := v_count + 1;
v_usercode := i_usersegment;
end loop;
o_resultcode := 0;
o_resulstring := v_count || 'Success';
commit;
exception
when others then
rollback;
o_resultcode := SQLCODE;
o_resulstring := v_newCode || ':' || SQLCODE || ':' || SQLERRM;
end ;
更多精彩
赞助商链接