工作日增减，也可做为股票交易日增减

李泽勇2

你应该这样写会好些。

  

子程序名	返回值类型	公开	备 注
时间_取公历节日_修改	文本型		只适合本系统，只保留 元旦节，劳动节，国庆节
参数名	类 型	参考	可空	数组	备 注
公历年	整数型
公历月	整数型
公历日	整数型
国庆节天数	整数型				留空默认3天

变量名	类 型	静态	数组	备 注
节日文本	文本型
星期几	整数型

星期几 ＝ 取星期几 (到时间 (到文本 (公历年) ＋ “年” ＋ 到文本 (公历月) ＋ “月” ＋ 到文本 (公历日) ＋ “日”))
节日文本 ＝ “”
如果真 (公历月 ＝ 1 且 公历日 ＝ 1)
节日文本 ＝ “元旦节”
如果真 (公历月 ＝ 5 且 公历日 ＝ 1)
节日文本 ＝ “劳动节”

如果真 (是否为空 (国庆节天数))
国庆节天数 ＝ 3

如果真 (公历月 ＝ 10 且 公历日 ≥ 1 且 公历日 ≤ 国庆节天数)
节日文本 ＝ “国庆节”
返回 (节日文本)

.版本 2<br /> <br /> .子程序 时间_取公历节日_修改, 文本型, 公开, 只适合本系统，只保留 元旦节，劳动节，国庆节<br /> .参数 公历年, 整数型, 可空<br /> .参数 公历月, 整数型, 可空<br /> .参数 公历日, 整数型, 可空<br /> .参数 国庆节天数, 整数型, 可空, 留空默认3天<br /> .局部变量 节日文本, 文本型<br /> .局部变量 星期几, 整数型<br /> <br /> 星期几 ＝ 取星期几 (到时间 (到文本 (公历年) ＋ “年” ＋ 到文本 (公历月) ＋ “月” ＋ 到文本 (公历日) ＋ “日”))<br /> 节日文本 ＝ “”<br /> .如果真 (公历月 ＝ 1 且 公历日 ＝ 1)<br />     节日文本 ＝ “元旦节”<br /> .如果真结束<br /> .如果真 (公历月 ＝ 5 且 公历日 ＝ 1)<br />     节日文本 ＝ “劳动节”<br /> .如果真结束<br /> <br /> .如果真 (是否为空 (国庆节天数))<br />     国庆节天数 ＝ 3<br /> .如果真结束<br /> <br /> .如果真 (公历月 ＝ 10 且 公历日 ≥ 1 且 公历日 ≤ 国庆节天数)<br />     节日文本 ＝ “国庆节”<br /> .如果真结束<br /> 返回 (节日文本)

  

子程序名	返回值类型	公开	备 注
国庆中秋是否重复	逻辑型
参数名	类 型	参考	可空	数组	备 注
工时表_日期	文本型

变量名	类 型	静态	数组	备 注
公历节日	文本型
农历节日	文本型
年	整数型
月	整数型
日	整数型
闰月	逻辑型
分割后年	文本型
分割后月	文本型
分割后日	文本型
日期分割	文本型		0

日期分割 ＝ 分割文本 (工时表_日期, “-”, )
分割后年 ＝ 日期分割 [1]
分割后月 ＝ 日期分割 [2]
分割后日 ＝ 日期分割 [3]
公历节日 ＝ 时间_取公历节日_修改 (到整数 (分割后年), 到整数 (分割后月), 到整数 (分割后日), )
公历转农历 (到时间 (工时表_日期), 年, 月, 日, 闰月)
农历节日 ＝ 取农历节日_定制 (月, 日)
返回 (公历节日 ＝ 农历节日)

i支持库列表	支持库注释
CnCalendar	农历日期支持库

.版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 国庆中秋是否重复, 逻辑型<br /> .参数 工时表_日期, 文本型<br /> .局部变量 公历节日, 文本型<br /> .局部变量 农历节日, 文本型<br /> .局部变量 年, 整数型<br /> .局部变量 月, 整数型<br /> .局部变量 日, 整数型<br /> .局部变量 闰月, 逻辑型<br /> .局部变量 分割后年, 文本型<br /> .局部变量 分割后月, 文本型<br /> .局部变量 分割后日, 文本型<br /> .局部变量 日期分割, 文本型, , "0"<br /> <br /> 日期分割 ＝ 分割文本 (工时表_日期, “-”, )<br /> 分割后年 ＝ 日期分割 [1]<br /> 分割后月 ＝ 日期分割 [2]<br /> 分割后日 ＝ 日期分割 [3]<br /> 公历节日 ＝ 时间_取公历节日_修改 (到整数 (分割后年), 到整数 (分割后月), 到整数 (分割后日), )<br /> 公历转农历 (到时间 (工时表_日期), 年, 月, 日, 闰月)<br /> 农历节日 ＝ 取农历节日_定制 (月, 日)<br /> 返回 (公历节日 ＝ 农历节日)

  

子程序名	返回值类型	公开	备 注
取清明节_定制	文本型		清明节用公历日期
参数名	类 型	参考	可空	数组	备 注
公历月份	整数型
公历天数	整数型

变量名	类 型	静态	数组	备 注
节日文本	文本型

判断 (时间_取月总天数 (取年份 (取现行时间 ()), 2) ＝ 29)
如果真 (公历月份 ＝ 4 且 公历天数 ＝ 4)
节日文本 ＝ “清明节”

如果真 (公历月份 ＝ 4 且 公历天数 ＝ 5)
节日文本 ＝ “清明节”

返回 (节日文本)

.版本 2<br /> <br /> .子程序 取清明节_定制, 文本型, 公开, 清明节用公历日期<br /> .参数 公历月份, 整数型<br /> .参数 公历天数, 整数型<br /> .局部变量 节日文本, 文本型<br /> <br /> .判断开始 (时间_取月总天数 (取年份 (取现行时间 ()), 2) ＝ 29)<br />     .如果真 (公历月份 ＝ 4 且 公历天数 ＝ 4)<br />         节日文本 ＝ “清明节”<br />     .如果真结束<br /> <br /> .默认<br />     .如果真 (公历月份 ＝ 4 且 公历天数 ＝ 5)<br />         节日文本 ＝ “清明节”<br />     .如果真结束<br /> <br /> .判断结束<br /> 返回 (节日文本)

  

子程序名	返回值类型	公开	备 注
取农历节日_定制	文本型		取农历所对应该的节日，需要事先知道农历日期的月份，与日子，
参数名	类 型	参考	可空	数组	备 注
农历月份	整数型
农历天数	整数型

变量名	类 型	静态	数组	备 注
节日文本	文本型
农历年	整数型
农历月	整数型
农历日	整数型
闰月	逻辑型

节日文本 ＝ “”
如果真 (农历月份 ＝ 1 且 农历天数 ≥ 1 且 农历天数 ≤ 到整数 (集_春节))
节日文本 ＝ “春节”
如果真 (农历月份 ＝ 1 且 农历天数 ＝ 15)
节日文本 ＝ “元宵节”
如果真 (农历月份 ＝ 2 且 农历天数 ＝ 2)
节日文本 ＝ “中和节”
如果真 (农历月份 ＝ 5 且 农历天数 ＝ 5)
节日文本 ＝ “端午节”
如果真 (农历月份 ＝ 7 且 农历天数 ＝ 7)
节日文本 ＝ “七巧节”
如果真 (农历月份 ＝ 8 且 农历天数 ＝ 15)
节日文本 ＝ “中秋节”
如果真 (农历月份 ＝ 9 且 农历天数 ＝ 9)
节日文本 ＝ “重阳节”
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 8)
节日文本 ＝ “腊八节”
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 24)
节日文本 ＝ “小年”
公历转农历 (取现行时间 (), 农历年, 农历月, 农历日, 闰月)
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 取农历月总天数 (农历年, 农历月, 闰月))
节日文本 ＝ “除夕”
返回 (节日文本)

i支持库列表	支持库注释
CnCalendar	农历日期支持库

.版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 取农历节日_定制, 文本型, 公开, 取农历所对应该的节日，需要事先知道农历日期的月份，与日子，<br /> .参数 农历月份, 整数型<br /> .参数 农历天数, 整数型<br /> .局部变量 节日文本, 文本型<br /> .局部变量 农历年, 整数型<br /> .局部变量 农历月, 整数型<br /> .局部变量 农历日, 整数型<br /> .局部变量 闰月, 逻辑型<br /> <br /> 节日文本 ＝ “”<br /> .如果真 (农历月份 ＝ 1 且 农历天数 ≥ 1 且 农历天数 ≤ 到整数 (集_春节))<br />     节日文本 ＝ “春节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 1 且 农历天数 ＝ 15)<br />     节日文本 ＝ “元宵节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 2 且 农历天数 ＝ 2)<br />     节日文本 ＝ “中和节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 5 且 农历天数 ＝ 5)<br />     节日文本 ＝ “端午节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 7 且 农历天数 ＝ 7)<br />     节日文本 ＝ “七巧节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 8 且 农历天数 ＝ 15)<br />     节日文本 ＝ “中秋节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 9 且 农历天数 ＝ 9)<br />     节日文本 ＝ “重阳节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 8)<br />     节日文本 ＝ “腊八节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 24)<br />     节日文本 ＝ “小年”<br /> <br /> .如果真结束<br /> 公历转农历 (取现行时间 (), 农历年, 农历月, 农历日, 闰月)<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 取农历月总天数 (农历年, 农历月, 闰月))<br />     节日文本 ＝ “除夕”<br /> .如果真结束<br /> 返回 (节日文本)

h59460

面对现实吧 2020的假期已经过完了