如何根据表B的字段的天数和开始日期,级别为A的数据生成记录,如果生成记录的日期是表A的日期的星期六,星期日,或节假不为空时,跳过,向下日期生成日期?如下图:
[此贴子已经被作者于2025/1/9 9:46:42编辑过]
遍历+查询
dim d1 as date = #12/30/2024#
dim cnt as integer = 5
dim dr as datarow
do while cnt > 0
dr = datatables("表A").find("日期=#" & d1 & "# and (星期 in ('六','日') or 节假 is not null)")
if dr is nothing then
output.show(d1)
cnt -= 1
end if
d1 = d1.adddays(1)
loop
如何实现根据表B和表A的数据和条件生成表C的记录?步骤如下: |
|
|
1.在表B中将项目相同和级别的数据进行合并; |
|
|
|
|
|
|
|
2.将表B按条件合并后的数据,根据状态一和状态二均为1时,生成表C的记录; |
|
|
|
3.生成表C记录时,生成开始日期如果是表A的中星期六,星期日,节假,要跳过,顺延下个日期? |
注:1.表B中灰色的记录是状态一和状态二均不是1时,不生成表C的记录; |
|
|
|
|
|
2.表B中线蓝与绿色的虽然项目、状态一和状态二相同,但级别不同,需根据条件独立生成表C的记录。 |
|
[此贴子已经被作者于2025/1/6 15:40:17编辑过]
先筛选状态一和状态二均为1的数据,然后遍历筛选后的数据,查询的用法参考3楼
Do While cnt > 0
' Do While xs > 0
If dr Is Nothing Then
nr = Tables("表D").addnew
nr("日期") = d1
cnt -= 1
End If
d1 = d1.adddays(1)
Loop
Next
如何实现代码一和代码二组合,实现合并后,生成记录?
[此贴子已经被作者于2025/1/9 9:48:34编辑过]
服务报错
[此贴子已经被作者于2025/1/9 9:37:02编辑过]