ORACLE 用32進制表示月中的一天
WHEN 'YMD' THEN
v_year := to_char(SYSDATE, 'Y');
v_month := FN_CONVERT_DECIMAL_TO_BASE(to_number(to_char(SYSDATE, 'MM')),32,1);
v_day := FN_CONVERT_DECIMAL_TO_BASE(to_number(to_char(SYSDATE, 'DD')),32,1);
v_str := v_year || v_month || v_day;
WHEN 'YMDD' THEN
v_year := to_char(SYSDATE, 'Y');
v_month := FN_CONVERT_DECIMAL_TO_BASE(to_number(to_char(SYSDATE, 'MM')),16,1);
v_day :=to_char(SYSDATE, 'DD');
FUNCTION FN_CONVERT_DECIMAL_TO_BASE (P_DECIMAL_NUM IN INTEGER, P_DIGITAL_TYPE IN VARCHAR2, P_LEN IN INTEGER) RETURN VARCHAR2
IS v_result_str VARCHAR2 (20) := '0';
v_replace_str VARCHAR2 (8000);
v_baseindex INT := 1;
v_quotient INT := p_decimal_num;
v_digit INT := P_LEN - 1;
v_digit_loop INT := 0;
v_basenumber INT := 0;
v_basebeginnumber INT := 10;
v_decodesql VARCHAR2 (1000);
v_remainder INT := 0;
v_baseloopnumber INT := 0;
v_base_10 VARCHAR2(10) := '0123456789';
v_base_16 VARCHAR2(16) := '0123456789ABCDEF';
v_base_30 VARCHAR2(30) := '0123456789ABCDEFGHJKLMNPQRTWXY';
v_base_32 VARCHAR2(32) := '0123456789ABCDEFGHJKLMNPRSTVWXYZ';
v_base_33 VARCHAR2(33) := '0123456789ABCDEFGHJKLMNPQRSTVWXYZ';
v_base_34 VARCHAR2(34) := '0123456789ABCDEFGHJKLMNPQRSTUVWXYZ';
v_base_36 VARCHAR2(36) := '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ';
v_base_code varchar2(62) := '';
BEGIN
CASE
P_DIGITAL_TYPE WHEN '10' THEN
v_basenumber := LENGTH(v_base_10);
v_base_code := v_base_10;
WHEN '16' THEN
v_basenumber := LENGTH(v_base_16);
v_base_code := v_base_16;
WHEN '30' THEN
v_basenumber := LENGTH(v_base_30);
v_base_code := v_base_30;
WHEN '32' THEN
v_basenumber := LENGTH(v_base_32);
v_base_code := v_base_32;
WHEN '33' THEN
v_basenumber := LENGTH(v_base_33);
v_base_code := v_base_33;
WHEN '34' THEN
v_basenumber := LENGTH(v_base_34);
v_base_code := v_base_34;
WHEN '36' THEN
v_basenumber := LENGTH(v_base_36);
v_base_code := v_base_36;
END CASE;
v_baseloopnumber := v_basenumber - 10;
v_digit_loop := v_digit;
IF v_basenumber = 10
THEN
RETURN LPAD(P_DECIMAL_NUM,P_LEN,'0');
ELSE
v_result_str := LPAD(v_result_str,v_digit,'0');
END IF;
LOOP
v_decodesql := v_decodesql || '''' || v_basebeginnumber || ''',''' || SUBSTR (v_base_code, v_basebeginnumber + 1, 1) || ''',';
v_basebeginnumber := v_basebeginnumber + 1;
v_baseloopnumber := v_baseloopnumber - 1;
EXIT WHEN v_baseloopnumber = 0; END LOOP;
LOOP
v_remainder := MOD (v_quotient, v_basenumber);
EXECUTE IMMEDIATE 'select Decode(' || v_remainder || ' ,' || v_decodesql || v_remainder || ') From dual ' INTO v_replace_str;
v_result_str := SUBSTR (v_result_str, 0, v_digit_loop) || v_replace_str || SUBSTR (v_result_str, v_digit_loop + 2, v_digit - v_digit_loop); v_quotient := FLOOR (v_quotient / v_basenumber); v_digit_loop := v_digit_loop - 1; EXIT WHEN v_digit_loop < 0; END LOOP;
RETURN v_result_str; END FN_CONVERT_DECIMAL_TO_BASE;
ORACLE 用32進制表示月中的一天的更多相关文章
- Oracle 中的进制转换
Oracle 中的进制转换 */--> Oracle 中的进制转换 Table of Contents 1. 进制名 2. 10进制与16进制互相转换 2.1. 10进制转换为16进制 2.2. ...
- 64位主机64位oracle下装32位客户端ODAC(NFPACS版)
64位主机64位oracle下装32位客户端ODAC(NFPACS版) by dd 1.下载Oracle Data Access Components(ODAC) Xcopy的两个版本: x86:(我 ...
- 51nod1086(多重背包&二進制)
題目鏈接:http://www.51nod.com/onlineJudge/questionCode.html#!problemId=1086 題意:中文題誒- 思路:很顯然這是一道多重背包題,不過這 ...
- php利用32进制实现对id加密解密
前言 最近在项目中遇到一个问题,当前用户分享一个邀请码给好友,好友根据邀请码注册成为新用户之后,则成为当前用户的下级,特定条件下,可以得到下级用户的一系列返利.这里要实现的就是根据当前用户的id,生成 ...
- (64位oracle使用32位的PLSQL)安装64位的oracle数据库软件,使用32位的PLSQL Developer连接方法
因为PLSQL Developer没有提供64位的,于是依据网上的资料做了一下整理,发上来 1.下载并安装Oracle 11g R2 64位,在server上安装时忽略硬件检測失败信息: 2.下载Or ...
- Windows Server 2008 R2 64位操作系统安装Oracle 11g 64位数据库,在客户终端上安装Oracle 11g 32位,才能安装P/L Sql Developer并配置
1.下载Oracle 11g R2 for Windows的版本 下载地址: http://www.oracle.com/technetwork/database/enterprise-edition ...
- 让 Oracle 11g 32位运作在64位 Windows 上
并非不能运行. 本人安装版未曾尝试,但绿色版倒是运行成功了. 很简单:注册表的位置发生了变化而已! 默认(32位.64位),oracle会读取以下注册表的位置: [HKEY_LOCAL_MA ...
- Guid和Oracle中16进制字符的转换
我们知道在Oracle中存的guid是16进制字符串,而在我们的C#代码中存的是guid对象,这样我会就要进行转换, 下面给出了两者进行转换的方法: public class Guid2RawProc ...
- [Oracle] - 使用32位 PLSQL(PL/SQL Developer)登陆64位Oracle失败之解决
配置环境 Oracle服务端oracle_winx64_12c_database.iso Oracle客户端instantclient-basiclite-nt-12.1.0.1.0.zip 集成开发 ...
随机推荐
- 通过POI实现上传EXCEL的批量读取数据写入数据库
最近公司新增功能要求导入excel,并读取其中数据批量写入数据库.于是就开始了这个事情,之前的文章,记录了上传文件,本篇记录如何通过POI读取excel数据并封装为对象上传. 上代码: 1.首先这是一 ...
- 【译】高级T-SQL进阶系列 (七)【上篇】:使用排序函数对数据进行排序
[译注:此文为翻译,由于本人水平所限,疏漏在所难免,欢迎探讨指正] 原文链接:传送门. 什么是排序函数(Ranking Functions)? 排序函数基于一组记录的集合返回一个排序值.一个排序值其实 ...
- Docker安装、命令详情、层级架构、docker服务启动失败解决方法
容器背景: 层级架构: 容器对比传统化虚拟机: 可以把docker理解成是一款自带软件(比如:nignx.tomcat.....)的镜像操作系统(首先是要下载镜像) 以下是Windows环境安装Do ...
- 使用电脑热点和Fiddler对Android app进行抓包
如果没有路由器,怎么对app抓包?如果你的电脑可以开热点的话也可以. 打开Fiddler,菜单栏选择Tools->Options->Connections,勾选Allow remote c ...
- 「NOI2016」区间
传送门 Luogu 解题思路 对于选出的区间,我们可以直接用线段树维护区间内单点被覆盖次数最大值. 那么解题重心便落在了选取方式上. 为了让最大值最小,考虑尺取,不能二分,降低效率而且不好写. 先将区 ...
- css 属性值 calc (目前只了解部分)
移动端页面,有如下图的需求: 实现效果: 实现 css 代码: .list {/*父级*/ border: 1px solid #E9EAEA; border-radius: 2px; backgro ...
- 【快学SpringBoot】快速上手好用方便的Spring Cache缓存框架
前言 缓存,在开发中是非常常用的.在高并发系统中,如果没有缓存,纯靠数据库来扛,那么数据库压力会非常大,搞不好还会出现宕机的情况.本篇文章,将会带大家学习Spring Cache缓存框架. 原创声明 ...
- 激活win10企业版,亲测可用,(win7步骤相同,请自行测试)
其他版本我没试过,亲们可以尝试! win7神key win7神key1:2HYJ4-V71WM-BAF6Y-G2BTH-X8QOD win7神key2:9LM54-Z3LQ1-5IRAN-T4JNI- ...
- [03] Recursive Function递归应用
递归应用 1.理解 百科:一种计算过程,如果其中每一步都要用到前一步或前几步的结果,称为递归的: 理解:函数调用自己的过程,这类函数处理的事情具有重复性,处理此类实行可用while或者for,但结构上 ...
- rtt学习之线程间同步与通信
一 线程间的同步与互斥:信号量.互斥量.实践集 线程互斥是指对于临界区资源访问的排它性,如多个线程对共享内存资源的访问,生产消费型对产品的操作.临界区操作操作方法有: rt_hw_interrupt_ ...