阿木伯 著 |
|
利用PL/SQL打印ASCII表? |
|
- 系统环境:
1、操作系统:Windows 2000
2、数据库: Oracle 8i R2 (8.1.6) for NT 企业版
3、安装路径:C:\ORACLE
- 实现方法:
SQL> set serveroutput on size 10240 SQL> SQL> declare 2 i number; 3 j number; 4 k number; 5 begin 6 for i in 2..15 loop 7 for j in 1..16 loop 8 k:=i*16+j; 9 dbms_output.put((to_char(k,'000'))||':'||chr(k)||' '); 10 if k mod 8 = 0 then 11 dbms_output.put_line(''); 12 end if; 13 end loop; 14 end loop; 15 end; 16 / 033:! 034:" 035:# 036:$ 037:% 038:& 039:' 040:( 041:) 042:* 043:+ 044:, 045:- 046:. 047:/ 048:0 049:1 050:2 051:3 052:4 053:5 054:6 055:7 056:8 057:9 058:: 059:; 060: 063:? 064:@ 065:A 066:B 067:C 068:D 069:E 070:F 071:G 072:H 073:I 074:J 075:K 076:L 077:M 078:N 079:O 080:P 081:Q 082:R 083:S 084:T 085:U 086:V 087:W 088:X 089:Y 090:Z 091:[ 092:\ 093:] 094:^ 095:_ 096:` 097:a 098:b 099:c 100:d 101:e 102:f 103:g 104:h 105:i 106:j 107:k 108:l 109:m 110:n 111:o 112:p 113:q 114:r 115:s 116:t 117:u 118:v 119:w 120:x 121:y 122:z 123:{ 124:| 125:} 126:~ 127: 128: 129: 130: 131: 132: 133: 134: 135: 136: 137: 138: 139: 140: 141: 142: 143: 144: 145: 146: 147: 148: 149: 150: 151: 152: 153: 154: 155: 156: 157: 158: 159: 160: 161: 162: 163: 164: 165: 166: 167: 168: 169: 170: 171: 172: 173: 174: 175: 176: 177: 178: 179: 180: 181: 182: 183: 184: 185: 186: 187: 188: 189: 190: 191: 192: 193: 194: 195: 196: 197: 198: 199: 200: 201: 202: 203: 204: 205: 206: 207: 208: 209: 210: 211: 212: 213: 214: 215: 216: 217: 218: 219: 220: 221: 222: 223: 224: 225: 226: 227: 228: 229: 230: 231: 232: 233: 234: 235: 236: 237: 238: 239: 240: 241: 242: 243: 244: 245: 246: 247: 248: 249: 250: 251: 252: 253: 254: 255: 256: SQL> show errors 没有错误。 SQL>
|
【最后更新:】 |
|