平常心

摘要： ---- Generated by OCIULDR--OPTIONS(BINDSIZE=8388608,READSIZE=8388608,ERRORS=-1,ROWS=50000)LOAD DATAINFILE 'xxxx.unl' "STR X'0a'"Append into TABLE temp_tableFIELDS TERMINATED BY X'7c' TRAILING NULLCOLS ( a CHAR(60), v CHAR(60))其中xxxx.unl就是平面定界文件。temp_table就是oracle数据的 阅读全文

摘要： maindefine m,n,k smallintdefine lc_database char(1000)define lv_base char(18)define lv_fgs char(7)define lc_name char(20)clear screendisplay "data do" let lc_database='90101009020100'for k=1 to 2 let m=k*7-6 let n=k*7 let lv_fgs=lc_database[m,n] let lv_base="data","_ 阅读全文