列记录转换为行记录

最新推荐文章于 2018-09-14 11:44:17 发布

lygcw9602

最新推荐文章于 2018-09-14 11:44:17 发布

阅读量538

点赞数

分类专栏：数据处理

本文链接：https://blog.youkuaiyun.com/lygcw9602/article/details/43342723

版权

数据处理专栏收录该内容

5 篇文章

订阅专栏

clear all
create cursor t3 (学号 c(4),姓名 c(8),课目 c(10),成绩 n(3))
create cursor t1 (学号 c(4),姓名 c(8),数学 n(3),语文 n(3))
insert into t1 values ("1001","张三",102,120)
insert into t1 values ("1002","李四",119,108)
nzds=2 
scan
    scatter to azd
    for lnI=1 to fcount("t1")-nzds
        insert into t3 values (t1.学号,t1.姓名,field(lnI+nzds,"t1"),azd[lnI+nzds])
    endfor
endscan
select t3
browse