(5)阅读程序 set heading off USE GZ REPL all应领工资WITH标准工资+津贴+补贴 GO TOP SKIP 2 DISP NEXT2编号,应领工资OFF USE GZ. DBF 编号标准工资津贴补贴应领工资扣款实发工资 (C,4)(N,7)(N,6)(N6)(N,7)(N6)(N,7 30011650095.0080.000.0010.00 0.00 1002165.0095.0080.000.0010.0 0.00 200130500140.00120.000.0040.000.00 1001520.0021000140.000.00 50.00 0.00 3002305.00140.00120.000.0040.000.00 2002285.00110.00100.000.00 30.00 0.00
(5)阅读程序 set heading off USE GZ REPL all 应领工资WITH 标准工资+津贴+补贴 GO TOP SKIP 2 DISP NEXT 2 编号,应领工资OFF USE GZ.DBF 编号 标准工资 津贴 补贴 应领工资 扣款 实发工资 (C,4 ) (N,7) (N,6) (N,6) (N,7) (N,6) (N,7) 3001 165.00 95.00 80.00 0.00 10.00 0.00 1002 165.00 95.00 80.00 0.00 10.00 0.00 2001 305.00 140.00 120.00 0.00 40.00 0.00 1001 520.00 210.00 140.00 0.00 50.00 0.00 3002 305.00 140.00 120.00 0.00 40.00 0.00 2002 285.00 110.00 100.00 0.00 30.00 0.00
(6)阅读程序 set heading off USE RS GoTO 3 DELETE FOR性别="男"and"教授"$职称 pack goto 2 disp off fields编号,姓名,职称 RS DBF 编号姓名性别出生日期职称工龄婚否 (c,4)(c6)(c,2)(d,8)(c,6)(n2)(l,1) 1001李力男19600915教授19T 3001王玫女19751220助教 4F 2001赵大山男19650512副教授14T 3002丁一林男1960924副教授13T 1002孙夏女19730822助教6F 2002黄刚男19701020讲师 9 T
(6)阅读程序 set heading off USE RS GOTO 3 DELETE FOR 性别="男" and "教授" $ 职称 pack goto 2 disp off fields 编号,姓名,职称 RS.DBF 编号 姓名 性别 出生日期 职称 工龄 婚否 (c,4) (c,6) (c,2) (d,8) (c,6) (n,2) (l,1) 1001 李力 男 19600915 教授 19 T 3001 王玫 女 19751220 助教 4 F 2001 赵大山 男 19650512 副教授 14 T 3002 丁一林 男 19660924 副教授 13 T 1002 孙夏 女 19730822 助教 6 F 2002 黄刚 男 19701020 讲师 9 T