PB中如何取当前日期所在周的每天日期

PB中如何取当前日期所在周的每天日期,第1张

string msg

date nd

int n,t

//----取得并处理本日在本周的序数,周一为0,周日为6----

t=daynumber(today()) -2

if t=-1 then t=6

//--------------------------------------

for n=t to 0 step -1//循环取得本周今日之前的日期(含今日)

nd=relativedate(today(),-n)

msg+=string(nd,'yyyy年mm月dd日')+'~n~n'

next

for n=1 to 6 -t//循环取得本周今日之后的日期(不含今日)

nd=relativedate(today(),n)

msg+=string(nd,'yyyy年mm月dd日')+'~n~n'

next

messagebox('',msg)

global function string uf_firstday ();string ls_date

date ld_today

ld_today=date(today())

choose case month(ld_today)

case 1 to 3

ls_date=string(year(ld_today))+"-01-01"

case 4 to 6

ls_date=string(year(ld_today))+"-04-01"

case 7 to 9

ls_date=string(year(ld_today))+"-07-01"

case 10 to 12

ls_date=string(year(ld_today))+"-10-01"

end choose

return ls_date

end function

取该季度第一天

global function string uf_lastday ();string ls_date

date ld_today

ld_today=date(today())

choose case month(ld_today)

case 1 to 3

ls_date=string(year(ld_today))+"-03-31"

case 4 to 6

ls_date=string(year(ld_today))+"-06-30"

case 7 to 9

ls_date=string(year(ld_today))+"-09-30"

case 10 to 12

ls_date=string(year(ld_today))+"-12-31"

end choose

return ls_date

end function

取该季度最后一天

需要有一列包含时间的字段,如:f_date

date d_date

long l_find

d_date = date("2010-01-05")

l_find = dw_1find("f_date=date('"+string(d_date,"yyyy-mm-dd")+"')", 1, dw_1Rowcount())

if l_find > 0 then

//找到

else

//未找到

end

您好,您说的是获取DW中的日期类型的列的值吗,是的话,给你例子

例:获取Dw_1 中的 第 ll_row 行 'rq' 列的值

datetime dt_rq

dt_rq = dw_1getitemdatetime(ll_row,'rq')

以上就是关于PB中如何取当前日期所在周的每天日期全部的内容,包括:PB中如何取当前日期所在周的每天日期、在pb9.0里 时间取当前季度怎么取、pb 按时间查询该怎么做啊等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9742176.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-01
下一篇 2023-05-01

发表评论

登录后才能评论

评论列表(0条)

保存