假定有數據表D1.DBF,結構為:NF N 4 0 (年份)YF N 2 0 (月份)SJ N 3 0 (數據)編寫程序P7.RPG,根據D1.DBF的第一個記錄的年份,按月遞增填寫所有記錄的年份和月份(列如,如果第一個記錄的年份是1990,則程序運行后,從第一個記錄開始,各記錄的年份和月份依次為1990年1月,1990年2月...1990年12月.1991年1月...)