{"id":654,"date":"2019-05-20T08:49:31","date_gmt":"2019-05-20T00:49:31","guid":{"rendered":"http:\/\/www.hefeiyu.com\/?p=654"},"modified":"2019-05-20T08:49:31","modified_gmt":"2019-05-20T00:49:31","slug":"tiptop%e5%b8%b8%e7%94%a8%e6%8a%80%e5%b7%a71","status":"publish","type":"post","link":"https:\/\/www.hefeiyu.com\/?p=654","title":{"rendered":"TIPTOP\u5e38\u7528\u6280\u5de7(1)"},"content":{"rendered":"<pre class=\"pure-highlightjs\"><code class=\"null\">CALL cl_replace_str(g_wc,'a','b'):\u5728g_wc\u4e2d\u628aa\u6362\u6210b\r\nCALL cl_set_comp_att_text(l_f,l_tc_duh11 CLIPPED)\uff1a\u4f7fl_f\u680f\u4f4d\u7684\u540d\u79f0\u663e\u793a\u4e3al_tc_duh11\r\nLET g_zm.d_s=MDY(MONTH(g_today),1,YEAR(g_today)) :g_zm.d_s\u7684\u503c\u4e3a\u8fd9\u4e2a\u6708\u7684\u7b2c\u4e00\u5929\r\n\r\n\u5207\u6362\u8425\u8fd0\u4e2d\u5fc3\r\nIF l_dbname IS NOT NULL THEN \r\n     \r\nCALL cl_switchdb(l_dbname) RETURNING li_result\r\n   \r\nEND IF\r\n\r\n\u5f39\u51fa\u4fe1\u606f\u6846\uff1a\r\nCALL s_showmsg_init()------\u653e\u5728\u8fd9\u4e2a\u51fd\u6570\u7684\u5f00\u59cb\r\nCALL s_errmsg('oea01',l_oea.oea01,'\u6b64\u8ba2\u5355\u7f16\u53f7\u4e0d\u5b58\u5728','',1)-----\u5982\u679c\u6709foreach ,\u5219\u653e\u5728foreach\r\nCALL s_showmsg() -------\u5728\u9700\u8981\u663e\u793a\u7684\u5730\u65b9call\u8fd9\u4e2a\u51fd\u6570\r\n\r\n\u5982\u679c\u60f3\u628a\u680f\u4f4d\u7684\u5907\u6ce8\u653e\u5728\u680f\u4f4d\u7684\u4e0a\u65b9\uff0c\u5219\u663e\u793a\u680f\u4f4d\u547d\u540d\u539f\u5219\u662fdummy01,dummy02......\r\n\r\n \r\n\r\n\u81ea\u52a8\u83b7\u53d6\u5355\u522b\uff1as_get_slip\uff08\uff09\u53d6\u5355\u522b\uff0c s_get_doc_no\uff08\uff09\u6709\u5173\u5355\u522b\u7684\u4f5c\u4e1aaapt120 s_get_doc_no(g_oga.oga01)\r\n\u81ea\u52a8\u9a8c\u8bc1\u5355\u522b\uff1as_check_no(\uff09 \u5728\u8fd9\u652f\u4f5c\u4e1as_auto_assign_no.4gl\u4e2d\r\n\r\n\u589e\u52a0\u5b57\u6bb5\u5e76\u4e14\u8d4b\u503c\u8bf4\u660e\uff1a\r\nalter table shb_file add(ta_shb20 number(10));\/*\u8ba1\u8d39\u6570\u91cf*\/\r\n\u5220\u9664\u4e3b\u952e\u7ea6\u675f\uff1aalter table tc_gan_file drop constraint tpc_gan_pk;\r\n\u5220\u9664\u7d22\u5f15\uff1a    drop index tic_gan_01;\r\n\u65b0\u5efa\u7d22\u5f15\uff1a create unique index tic_gan_01 on tc_gan_file(tc_gan01,tc_gan02,tc_gan03);\r\n\u65b0\u5efa\u4e3b\u4ef6constraint:ALTER TABLE TC_OGA_FILE ADD\r\n CONSTRAINT tpc_oga_pk\r\n PRIMARY KEY (TC_OGA01,TC_OGA02,TC_OGA03,TC_OGA06) \r\n ENABLE \r\n VALIDATE;\r\n\uff08\u5907\u6ce8\uff1a\u65b0\u589econstraint\u8bed\u53e5\u8981\u5199\u5728\u4e00\u884c\uff09\r\n\u66f4\u6539\u5b57\u6bb5\u7c7b\u578b\uff1aalter table tc_gan_file modify tc_gan04 number(5);\r\nper&gt;&gt;&gt;&gt;&gt;4fd(per\u6863\u8f6c\u6362\u62104fd\u6863)\r\nr.f2.per xxx\r\ngsform -import xxx.per\r\n\r\nGDC\u9ed8\u8ba4\u7aef\u53e3\u662f6400\uff0c\u4f46\u662f\u6709\u65f6\u5019\u4f1a\u6253\u5f00\u591a\u4e2aGDC,\u5bfc\u81f4\u7aef\u53e3\u6539\u53d8\uff0c\u6bd4\u5982\u7aef\u53e3\u662f6401\uff0c\u90a3\u4e48\u5c31\u8981\u628aFGLSERVER\u7aef\u53e3\u503c\u6539\u62106401\uff0c\u547d\u4ee4\u5982\u4e0b\uff1a\r\n\r\necho $FGLSERVER\r\n\r\nexport FGLSEVER=$FGLSERVER:01\r\n\r\n\r\n\u9488\u5bf9bin\u4e0b\u9762\u7684\u7a0b\u5e8f\u7684\u7f16\u8bd1\u4e0e\u94fe\u63a5\uff1a\r\nfglcomp file_download\r\nfgllink -o file_download.42r file_download.42m\r\n\r\n\u753b\u9762\u6863\u4e0a\u7684\u989c\u8272\uff0c\u53ef\u4e0d\u53ef\u4ee5\u6839\u636e\u4e0d\u540c\u6761\u4ef6\uff0c\u6bd4\u5982\u6b63\u8d1f\uff0c\u5c31\u663e\u793a\u4e0d\u540c\u7684\u989c\u8272\uff1f\r\nCALL cl_set_comp_font_color(\"rvv01\", \"red\")\r\n\r\nCALL cl_replace_str(g_wc,'a','b') RETURNING g_wc #b\u66ff\u6362a\r\n\r\ndebug\u65f6\u60f3\u4e34\u65f6\u6539\u53d8\u53d8\u91cf\u7684\u503c\uff0c\u5219\uff1a\r\nctrl+D \u7136\u540eset variable g_gui=3\r\n\r\n\u538b\u7f29\u4e0e\u89e3\u538b\r\ncd cxm\r\n\u6253\u5305\uff1atar -cvf .\/cxm.tar .\/\r\n\u89e3\u538b\uff1atar -xvf .\/cxm.tar .\/\r\n\r\n\u5efa\u8868\u65f6\u5982\u679c\u63d0\u793a\u4e0d\u7b26\u5408\u5efa\u8868\u547d\u540d\u89c4\u5219\uff08tc_ima\uff09\u65f6\uff0c\u53ef\u4ee5\u8fdb\u884c\u5982\u4e0b\u64cd\u4f5c\uff0c\u518d\u91cd\u65b0\u6253\u5f00p_zta,\u6c47\u5165sch\u6863\r\nexport TOPLINK=test\r\n\r\n\u521b\u5efa\u4e34\u65f6\u8868\u89c4\u8303\u5199\u6cd5\uff1a\r\nFUNCTION t003_table()\r\n   \r\n   DROP TABLE cwmbt003_tmp;\r\n\r\n   CREATE TEMP TABLE cwmbt003_tmp(\r\n\r\n        ibb01 LIKE ibb_file.ibb01,\r\n\r\n        ibb06 LIKE ibb_file.ibb06,\r\n\r\n        pihao LIKE rvb_file.rvb38,\r\n\r\n        shuliang LIKE type_file.num15_3 );\r\n\r\nEND FUNCTION\r\n\r\n\u67e5\u770b%\u6240\u5728\u4f4d\u7f6e\uff1a\r\nLET g_rvb36= g_rvb_b[l_ac].rvb36\r\n\r\nLET l_length= LENGTH(g_rvb36)\r\n        \r\nSELECT instr(g_rvb_b[l_ac].rvb36,'%',1,1) INTO l_n FROM dual\r\n        \r\nLET g_rvb_b[l_ac].rvb36 = g_rvb36[1,l_n-1]\r\n        \r\nLET g_rvb_b[l_ac].rvb37 = g_rvb36[l_n+1,l_length]\r\n\r\n\u5220\u9664\u7d22\u5f15\uff1astep1\u3001\u8981\u5148\u5220\u9664primary key ,\u7136\u540e\u91cd\u65b0\u521b\u5efa\u7d22\u5f15\r\n            ALTER TABLE hrdp_file DROP primary KEY;\r\n            DROP INDEX hrdp_pk;\r\n\u65b0\u589e\u7d22\u5f15\uff1astep2\u3001\u8981\u5148\u521b\u5efa\u7d22\u5f15\uff0c\u518d\u521b\u5efaprimary key\r\n            create INDEX hrdp_pk on hrdp_file (hrdp04);\r\n            alter table hrdp_file add  constraint hrdp_pk primary key (hrdp04);\r\n\r\n#\u53d6\u5b8c\u5de5\u65e5\u671f\u5f53\u524d\u5468\u7684\u5468\u4e00\u4e3a\u5f00\u5de5\u65e5\u671f\r\n    \r\n#trunc(new_t.e_date,'day') \u8fd9\u4e2a\u51fd\u6570\u7684\u610f\u4e49\u5728\u4e8e\u53d6\u5f53\u524d\u65e5\u671f\u6240\u5728\u5468\u7684\u7b2c\u4e00\u5929              \r\nselect trunc(new_t.e_date,'day') +1 INTO new[g_j].b_date from dual;\r\n\r\necho $LOGNAME \u67e5\u770b\u767b\u9646\u540d\u79f0\r\nexport LOGNAME='tiptop' \u5207\u6362\u767b\u9646\u8005\r\n\r\n\u53d6\u6d88p_zta\u539f\u5219\u7684\u9650\u5236\uff1aexport TOPLINK='test'\r\n\r\n\u67e5\u770b\u8fdb\u7a0b\uff1a1\u3001top 2\u3001ps -ef |grep 2759\r\n\u6740\u8fdb\u7a0b\uff1a kill -9 2759   \r\n \r\n\r\n\u8001\u7cfb\u7edf\u770b\u8868\u7ed3\u6784dbaccess ds -&gt;table -&gt;alter -&gt;\u8868\u540d -&gt;\u9000\u51fa\u662fe\u8fd4\u56de\u4e0a\u4e00\u83dc\u5355\uff1b\r\n   \u770b\u8001\u7cfb\u7edf\u7684\u753b\u9762\u5b57\u6bb5\u662fctrol+\u9f20\u6807\u53f3\u51fb\u8be5\u5b57\u6bb5\u53ef\u67e5\u770b\r\n\r\n\r\n\u5f53\u8bef\u5220\u4e86\u8868\u4e2d\u6570\u636e\u65f6\uff0c\u6062\u590d\u6570\u636e\u5230\u67d0\u4e00\u65f6\u95f4\u70b9\u65f6\uff1a\r\nFlashback table sfa_file,sfb_file to timestamp to_timestamp('2015-12-09 15:30:30','yyyy-mm-dd hh24:mi:ss')\r\n<\/code><\/pre>\n<p>&nbsp;<\/p>\n<p>\u8f6c\u8f7d\u8bf7\u6ce8\u660e\uff1a<a href=\"https:\/\/www.hefeiyu.com\">\u8d6b\u975e\u57df<\/a> &raquo; <a href=\"https:\/\/www.hefeiyu.com\/?p=654\">TIPTOP\u5e38\u7528\u6280\u5de7(1)<\/a><\/p>","protected":false},"excerpt":{"rendered":"<p>CALL cl_replace_str(g_wc,&#8217;a&#8217;,&#8217;b&#8217;):\u5728g_wc\u4e2d\u628aa\u6362\u6210b CALL cl_set_comp_att_text(l_f,l_tc_duh11 CLIPPED)\uff1a\u4f7fl_f\u680f\u4f4d\u7684\u540d\u79f0\u663e\u793a\u4e3al_tc_duh11 LET g_ [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[26],"tags":[73,225],"class_list":["post-654","post","type-post","status-publish","format-standard","hentry","category-4gl","tag-call","tag-wc"],"_links":{"self":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts\/654","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=654"}],"version-history":[{"count":1,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts\/654\/revisions"}],"predecessor-version":[{"id":655,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts\/654\/revisions\/655"}],"wp:attachment":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=654"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=654"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=654"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}