`

如何利用自定义函数把阳历转换成阴历

阅读更多

 

 数据库保存的是阳历日期,有时候会遇到把阳历换成阴历的需求,例如下图把阳历转换成阴历。

 

这个问题是我在开发报表过程中遇到的一个小需求,利用的工具是FineReport8.0版本,解决思路是首先定义一个可以将阳历转为阴历的类,然后自定义FineReport函数,在run方法中获取年月日参数并调用之前的类将阳历转为阴历,最终返回给报表。

实现步骤:

1、  阳历转阴历的类

FineReport里面会提供一个现成的农历日历工具类SolarToLunar,该类中通过today(intyear, int month, int day)方法可将输入的年、月、日对应的阳历转为阴历日期,完整代码如下:

package com.fr.function;
import java.text.SimpleDateFormat;
import java.util.Calendar;
import java.util.Date;
import java.util.GregorianCalendar;
import java.util.Locale;
public class SolarToLunar {
	final private static long[] lunarInfo = new long[] { 0x04bd8, 0x04ae0,
			0x0a570, 0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0,
			0x055d2, 0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540,
			0x0d6a0, 0x0ada2, 0x095b0, 0x14977, 0x04970, 0x0a4b0, 0x0b4b5,
			0x06a50, 0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970,
			0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3,
			0x092e0, 0x1c8d7, 0x0c950, 0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0,
			0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, 0x06ca0,
			0x0b550, 0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8,
			0x0e950, 0x06aa0, 0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570,
			0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0, 0x096d0, 0x04dd5,
			0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0,
			0x195a6, 0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50,
			0x06d40, 0x0af46, 0x0ab60, 0x09570, 0x04af5, 0x04970, 0x064b0,
			0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
			0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7,
			0x025d0, 0x092d0, 0x0cab5, 0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50,
			0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, 0x07954,
			0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260,
			0x0ea65, 0x0d530, 0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0,
			0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, 0x0b5a0, 0x056d0,
			0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20,
			0x0ada0 };

	final private static int[] year20 = new int[] { 1, 4, 1, 2, 1, 2, 1, 1, 2,
			1, 2, 1 };

	final private static int[] year19 = new int[] { 0, 3, 0, 1, 0, 1, 0, 0, 1,
			0, 1, 0 };

	final private static int[] year2000 = new int[] { 0, 3, 1, 2, 1, 2, 1, 1,
			2, 1, 2, 1 };

	public final static String[] nStr1 = new String[] { "", "正", "二", "三", "四",
			"五", "六", "七", "八", "九", "十", "十一", "十二" };

	private final static String[] Gan = new String[] { "甲", "乙", "丙", "丁", "戊",
			"己", "庚", "辛", "壬", "癸" };

	private final static String[] Zhi = new String[] { "子", "丑", "寅", "卯", "辰",
			"巳", "午", "未", "申", "酉", "戌", "亥" };

	private final static String[] Animals = new String[] { "鼠", "牛", "虎", "兔",
			"龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪" };

	private final static String[] solarTerm = new String[] { "小寒", "大寒", "立春",
			"雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑",
			"立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至" };

	private final static String[] sFtv = new String[] { "0101*元旦", "0214 情人节",
			"0308 妇女节", "0312 植树节", "0315 消费者权益日", "0401 愚人节", "0501 劳动节",
			"0504 青年节", "0512 护士节", "0601 儿童节", "0701 建党节", "0801 建军节",
			"0808 父亲节", "0909 逝世纪念", "0910 教师节", "0928 孔子诞辰", "1001*国庆节",
			"1006 老人节", "1024 联合国日", "1112 孙中山诞辰", "1220 澳门回归", "1225 圣诞节",
			"1226 诞辰" };

	private final static String[] lFtv = new String[] { "0101*农历春节",
			"0115 元宵节", "0505 端午节", "0707 七夕情人节", "0815 中秋节", "0909 重阳节",
			"1208 腊八节", "1224 小年", "0100*除夕" };

	/**
	 * 传回农历 y年的总天数
	 * 
	 * @param y
	 * @return
	 */
	final private static int lYearDays(int y) {
		int i, sum = 348;
		for (i = 0x8000; i > 0x8; i >>= 1) {
			if ((lunarInfo[y - 1900] & i) != 0)
				sum += 1;
		}
		return (sum + leapDays(y));
	}

	/**
	 * 传回农历 y年闰月的天数
	 * 
	 * @param y
	 * @return
	 */
	final private static int leapDays(int y) {
		if (leapMonth(y) != 0) {
			if ((lunarInfo[y - 1900] & 0x10000) != 0)
				return 30;
			else
				return 29;
		} else
			return 0;
	}

	/**
	 * 传回农历 y年闰哪个月 1-12 , 没闰传回 0
	 * 
	 * @param y
	 * @return
	 */
	final private static int leapMonth(int y) {
		return (int) (lunarInfo[y - 1900] & 0xf);
	}

	/**
	 * 传回农历 y年m月的总天数
	 * 
	 * @param y
	 * @param m
	 * @return
	 */
	final private static int monthDays(int y, int m) {
		if ((lunarInfo[y - 1900] & (0x10000 >> m)) == 0)
			return 29;
		else
			return 30;
	}

	/**
	 * 传回农历 y年的生肖
	 * 
	 * @param y
	 * @return
	 */
	final public static String AnimalsYear(int y) {
		return Animals[(y - 4) % 12];
	}

	/**
	 * 传入 月日的offset 传回干支,0=甲子
	 * 
	 * @param num
	 * @return
	 */
	final private static String cyclicalm(int num) {
		return (Gan[num % 10] + Zhi[num % 12]);
	}

	/**
	 * 传入 offset 传回干支, 0=甲子
	 * 
	 * @param y
	 * @return
	 */
	final public static String cyclical(int y) {
		int num = y - 1900 + 36;
		return (cyclicalm(num));
	}

	/**
	 * 传出农历.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
	 * 
	 * @param y
	 * @param m
	 * @return
	 */
	final private long[] Lunar(int y, int m) {
		long[] nongDate = new long[7];
		int i = 0, temp = 0, leap = 0;
		Date baseDate = new GregorianCalendar(1900 + 1900, 1, 31).getTime();
		Date objDate = new GregorianCalendar(y + 1900, m, 1).getTime();
		long offset = (objDate.getTime() - baseDate.getTime()) / 86400000L;
		if (y < 2000)
			offset += year19[m - 1];
		if (y > 2000)
			offset += year20[m - 1];
		if (y == 2000)
			offset += year2000[m - 1];
		nongDate[5] = offset + 40;
		nongDate[4] = 14;

		for (i = 1900; i < 2050 && offset > 0; i++) {
			temp = lYearDays(i);
			offset -= temp;
			nongDate[4] += 12;
		}
		if (offset < 0) {
			offset += temp;
			i--;
			nongDate[4] -= 12;
		}
		nongDate[0] = i;
		nongDate[3] = i - 1864;
		leap = leapMonth(i); // 闰哪个月
		nongDate[6] = 0;

		for (i = 1; i < 13 && offset > 0; i++) {
			// 闰月
			if (leap > 0 && i == (leap + 1) && nongDate[6] == 0) {
				--i;
				nongDate[6] = 1;
				temp = leapDays((int) nongDate[0]);
			} else {
				temp = monthDays((int) nongDate[0], i);
			}

			// 解除闰月
			if (nongDate[6] == 1 && i == (leap + 1))
				nongDate[6] = 0;
			offset -= temp;
			if (nongDate[6] == 0)
				nongDate[4]++;
		}

		if (offset == 0 && leap > 0 && i == leap + 1) {
			if (nongDate[6] == 1) {
				nongDate[6] = 0;
			} else {
				nongDate[6] = 1;
				--i;
				--nongDate[4];
			}
		}
		if (offset < 0) {
			offset += temp;
			--i;
			--nongDate[4];
		}
		nongDate[1] = i;
		nongDate[2] = offset + 1;
		return nongDate;
	}

	/**
	 * 传出y年m月d日对应的农历.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
	 * 
	 * @param y
	 * @param m
	 * @param d
	 * @return
	 */
	final public static long[] calElement(int y, int m, int d) {
		long[] nongDate = new long[7];
		int i = 0, temp = 0, leap = 0;
		Date baseDate = new GregorianCalendar(0 + 1900, 0, 31).getTime();
		Date objDate = new GregorianCalendar(y, m - 1, d).getTime();
		long offset = (objDate.getTime() - baseDate.getTime()) / 86400000L;
		nongDate[5] = offset + 40;
		nongDate[4] = 14;

		for (i = 1900; i < 2050 && offset > 0; i++) {
			temp = lYearDays(i);
			offset -= temp;
			nongDate[4] += 12;
		}
		if (offset < 0) {
			offset += temp;
			i--;
			nongDate[4] -= 12;
		}
		nongDate[0] = i;
		nongDate[3] = i - 1864;
		leap = leapMonth(i); // 闰哪个月
		nongDate[6] = 0;

		for (i = 1; i < 13 && offset > 0; i++) {
			// 闰月
			if (leap > 0 && i == (leap + 1) && nongDate[6] == 0) {
				--i;
				nongDate[6] = 1;
				temp = leapDays((int) nongDate[0]);
			} else {
				temp = monthDays((int) nongDate[0], i);
			}

			// 解除闰月
			if (nongDate[6] == 1 && i == (leap + 1))
				nongDate[6] = 0;
			offset -= temp;
			if (nongDate[6] == 0)
				nongDate[4]++;
		}

		if (offset == 0 && leap > 0 && i == leap + 1) {
			if (nongDate[6] == 1) {
				nongDate[6] = 0;
			} else {
				nongDate[6] = 1;
				--i;
				--nongDate[4];
			}
		}
		if (offset < 0) {
			offset += temp;
			--i;
			--nongDate[4];
		}
		nongDate[1] = i;
		nongDate[2] = offset + 1;
		return nongDate;
	}

	public final static String getChinaDate(int day) {
		String a = "";
		if (day == 10)
			return "初十";
		if (day == 20)
			return "二十";
		if (day == 30)
			return "三十";
		int two = (int) ((day) / 10);
		if (two == 0)
			a = "初";
		if (two == 1)
			a = "十";
		if (two == 2)
			a = "廿";
		if (two == 3)
			a = "三";
		int one = (int) (day % 10);
		switch (one) {
		case 1:
			a += "一";
			break;
		case 2:
			a += "二";
			break;
		case 3:
			a += "三";
			break;
		case 4:
			a += "四";
			break;
		case 5:
			a += "五";
			break;
		case 6:
			a += "六";
			break;
		case 7:
			a += "七";
			break;
		case 8:
			a += "八";
			break;
		case 9:
			a += "九";
			break;
		}
		return a;
	}

	public static String today(int y, int m, int d) {
		int year = y;
		int month = m;
		int date = d;
		long[] l = calElement(year, month, date);
		StringBuffer sToday = new StringBuffer();
		try {

			sToday.append(" 农历");
			sToday.append(cyclical(year));
			sToday.append('(');
			sToday.append(AnimalsYear(year));
			sToday.append(")年");
			sToday.append(nStr1[(int) l[1]]);
			sToday.append("月");
			sToday.append(getChinaDate((int) (l[2])));
			return sToday.toString();
		} finally {
			sToday = null;
		}
	}

	private static SimpleDateFormat sdf = new SimpleDateFormat(
			"yyyy年M月d日 EEEEE");

	/**
	 * 农历日历工具使用演示
	 * 
	 * @param args
	 */
	public static void main(String[] args) {
		System.out.println(today(1988, 10, 27));
	}
} 

 2、自定义FineReport函数

自定义函数Lunar扩展于AbstractFunction,并重写run方法,获得年月日参数值,调用农历日历工具类SolarToLunar的today方法,求得农历日期并返回,代码如下:

package com.fr.function;  

import com.fr.script.AbstractFunction;
   
public class Lunar extends AbstractFunction {  
    public Object run(Object[] args) {  
        String result = "";  
        int y = Integer.parseInt(args[0].toString());  
        int m = Integer.parseInt(args[1].toString());  
        int d = Integer.parseInt(args[2].toString());  
        result = SolarToLunar.today(y, m, d);  
        return result;  
    }  
}

 3、编译并运行

编译自定义函数

编译Lunar.java和SolarToLunar.java类生成Lunar.class和SolarToLunar.class文件拷贝至报表应用所在目录/WEB-INF/classes/com/fr/function下。

注册自定义函数

启动设计器,点击服务器|函数管理器,新增函数取名为Lunar,选择Lunar.class类,如下图:

 

自定义函数定义好了就可以在设计器中直接使用。

比如在单元格中写入公式=Lunar(2011,7,11),预览模板,可以看到日期2011年7月11日阳历就可以转换成阴历。

若数据库日期类型字段如图:

 

拖到模板设计界面,设置高级属性,在自定义显示值里面输入公式Lunar(year(

$),month(

$),day($$$)),如下图设置,则可把保存在数据库里面的阳历日期转换成阴历了。

 

 

分享到:
评论

相关推荐

    VB写的阳历转换阴历的程序

    标题 "VB写的阳历转换阴历的程序" 描述了这是一个使用Visual Basic (VB) 开发的程序,其主要功能是将公历日期(阳历)转换为农历日期(阴历)。在编程领域,这样的程序涉及到日期和时间的处理,以及特定文化(如中国...

    阳历and阴历转换.rar_MATLAB 阴历_MATLAB 阴历阳历_阴历阳历

    4. **自定义函数**:在MATLAB中编写自定义函数来实现阴历阳历转换。这可能包括解析阳历日期,计算阴历日期,以及反之的过程。 5. **代码结构**:一个好的程序应该有清晰的逻辑结构,包括输入验证、主函数、辅助函数...

    VC++阳历(公历)到阴历(农历)转换

    本主题聚焦于使用VC++(Visual C++ 6.0)进行日期转换,特别是从阳历(公历)到阴历(农历)的转换。在很多文化中,尤其是中国的传统文化,农历具有重要的地位,因此这种转换功能在很多应用场景中非常实用,如节假日...

    Android自定义预定日历,并且显示阴历源码(可扩展)

    这个项目“Android自定义预定日历,并且显示阴历源码(可扩展)”提供了一个解决方案,它允许开发者构建一个不仅能够展示公历,还能同时显示阴历的自定义日历组件。下面我们将详细探讨这个项目中的关键知识点。 1. ...

    阴历日期转换实现(pb制作)

    4. **封装PB函数**:在PB中创建自定义函数,分别调用DLL中的转换函数,并将参数和返回值封装成PB可识别的形式。 5. **测试和优化**:编写测试用例,验证转换的准确性和性能。根据需要优化算法,确保在各种边缘情况...

    阳历转阴历源码

    阳历,也称为公历,是我们普遍使用的国际标准日历,而阴历则是按照月亮周期来计算的历法,常见于东亚国家。本篇文章将深入探讨如何在PB(PowerBuilder)环境下实现阳历转阴历的功能,并解析提供的`calendar.dll`和`...

    Python自定义函数计算给定日期是该年第几天的方法示例

    3. **在线阴历/阳历转换工具:**[在线阴历/阳历转换工具](http://tools.jb51.net/bianmin/yinli2yangli) 4. **Unix时间戳(timestamp)转换工具:**[Unix时间戳转换工具](http://tools.jb51.net/code/unixtime) 通过...

    oracle日历转化成农历

    在Oracle中,虽然没有内置的直接转换函数来实现这一功能,但可以通过自定义函数或者利用现有的开源存储过程来实现这一转换。下面我们将详细介绍如何在Oracle中进行阳历到农历的转换。 首先,我们需要理解阳历和农历...

    一个阴历阳历互相转化的类

    因此,为了实现阴历阳历的转换,我们需要自定义一个类,如"ChineseCalendar"。这个类可能包含以下关键组成部分: 1. **数据结构**:为了存储阴历和阳历的日期信息,类中应定义私有变量,如阳历的年、月、日以及阴历...

    vb公历农历转换.rar

    3. **自定义函数**:在VB中,可以创建自定义函数来实现公历到农历或农历到公历的转换。例如,你可以创建一个`ChineseCalendar`模块,包含两个函数:`GregorianToLunar(date As Date) As String` 和 `...

    阴阳历转换

    阴阳历转换是中华文化中一项重要的历法知识,涉及到中国传统农历与国际公历之间的转换。在计算机编程中,理解和实现阴阳历转换算法对于开发具有中国特色的日历应用至关重要。本篇文章将深入探讨阴阳历转换的原理,并...

    Qt/C++实现阳历转农历功能

    4. **事件处理**:当用户点击转换按钮时,捕获这个事件,获取输入框的阳历日期,调用转换函数,并将结果显示在界面上。 5. **测试与调试**:确保转换函数的准确性,对不同年份、月份和日期进行广泛的测试,以验证其...

    农历与公历转换_PB日历公历农历_

    标题中的“农历与公历转换_PB日历公历农历_”指的是使用PowerBuilder(PB)开发的一个程序,该程序能够实现公历日期与农历日期之间的转换功能。在计算机编程中,这种转换通常涉及到时间日期处理,是软件开发中的一个...

    java 万年历(农历和阳历的互换)

    1. **农历和阳历的转换函数**:这两个函数是核心,用于在农历和阳历之间进行转换。通常,转换涉及复杂的算法,包括农历月份的计算、闰月的处理、节气的考虑等。 2. **农历日期对象**:类中可能会定义一个内部类或...

    C#开发阴历转阳历类

    - 我们需要自定义一个类来处理阴历,这个类可能包含年、月、日的阴历属性,并提供转换方法。 在`ChineseCalendarInfo.cs`文件中,我们可以看到以下关键组件: 1. 类定义:创建一个名为`ChineseCalendarInfo`的类...

    AS3公历转农历和农历转公历

    3. **转换算法**:讲解农历和公历转换的数学模型和算法。可能包括阳历到阴历的转换方法,如通过太阳黄经和月相计算农历日期;以及阴历到阳历的转换,可能需要处理农历的闰月情况。 4. **自定义函数**:编写自定义...

    公历转农历delphi源码

    - **转换函数**:实现公历到农历和农历到公历转换的核心算法。 - **辅助函数**:可能包含一些帮助计算或验证的函数,比如判断是否为闰年、计算农历月份天数等。 - **示例或测试代码**:为了验证算法的正确性,可能会...

    公历农历转换C++源码

    在提供的压缩包文件中,"代码中国.txt"可能包含了关于公历农历转换算法的详细说明或源码注释,而"57578863公历(阳历)和农历(阴历)相互转换"可能是实际的源代码文件。这些资源可以帮助我们理解作者是如何实现这个...

    改善版: excel vba 萬年歷 万年历 阳历 农历 阴历 记事录功能 全部vba代码 和excel公式做成

    - VBA(Visual Basic for Applications)是微软开发的一种编程语言,用于编写能够控制Office应用程序(如Excel)的宏或自定义函数。 - 在Excel中,VBA代码通常存储在工作簿的VBAProject模块中,可以通过开发者工具...

    阳历转换程序 VC++6.0

    首先,阳历通常指的是公历,是国际上广泛使用的历法,而阴历则是基于月亮周期的历法,常见于一些传统节日的计算。在计算机程序中,进行阴阳历转换涉及到日期和时间处理,这是编程中的一个重要组成部分。 1. **日期...

Global site tag (gtag.js) - Google Analytics