ＳＰＦ・ＰＡＮＥＬ画面コンバージョン・サービス
ＩＳＰＦ・ＰＡＮＥＬ画面コンバージョン・サービス
富士通・ＳＰＦ用画面定義体のＰＡＮＥＬやＩＢＭ・ＩＳＰＦ用画面定義体のＰＡＮＥＬをＩＢＭｉ（Ｓｙｓｔｅｍ－ｉ、ＡＳ／４００）の画面定義体のＤＤＳに変換します。（Ｗｅｂ化対応も可能です）
以下にＳＰＦ・ＰＡＮＥＬをＤＤＳに変換した例を掲載します。
変換後の画面例
定義体例
変換前 ＰＡＮＥＬソース
PANEL1 FID PGM=CMN TYPE=DSP LANG=ANY PARM=ALL
DEVICE DVK=DP10
FRAME
PART ATT=(E000,F003)
'&' SCHAR TYPE=ATTR FIELD=TEXT ATTR=(ODL)
'%' SCHAR TYPE=ATTR FIELD=TEXT ATTR=(ODL WHT)
'+' SCHAR TYPE=ATTR FIELD=TEXT ATTR=(OTL WHT RVS)
'<' SCHAR TYPE=ATTR FIELD=IN ATTR=(IUL WHT MDT NUM OTL)
ATTR2=(IDH RED MDT NUM OTL BLK)
'=' SCHAR TYPE=ATTR FIELD=OUT ATTR=(ODL)
LAYOUT
&№ PANEL1; %日付^YY.MM.DD;
%時間^HH:MM:SS;
+ ◯◯◯ 店所別発地／個人売上日計表（新） ◯◯◯ ;
<&1 ;%年;<M1;%月度 の出勤日数合計 <S1 ;
<Y2 ;%年;<M2;%月;<D2;%日現在の出勤日数合計 <S2 ;
%消費税率 <X;%％分作表; %複写枚数 <C ;
=MSG01 ;
=MSG02 ;
LAYEND
PANEL1R RECORD TYPE=INOUT
PANEL1A DATA USAGE=AIDP,NAME=PANEL1A
PANEL1D DATA USAGE=DCA6,NAME=PANEL1D
PANEL1C DATA USAGE=CUR,NAME=PANEL1C
Y1 DATA USAGE=CTRL1,PIC=(X,4),NAME=Y1
Y2 DATA USAGE=CTRL1,PIC=(X,4),NAME=Y2
M1 DATA USAGE=CTRL1,PIC=(X,2),NAME=M1
M2 DATA USAGE=CTRL1,PIC=(X,2),NAME=M2
D2 DATA USAGE=CTRL1,PIC=(X,2),NAME=D2
S1 DATA USAGE=CTRL1,PIC=(X,4),NAME=S1
S2 DATA USAGE=CTRL1,PIC=(X,4),NAME=S2
X DATA USAGE=CTRL1,PIC=(X,1),NAME=X
C DATA USAGE=CTRL1,PIC=(X,2),NAME=C
MSG01 DATA USAGE=CTRL1,PIC=(N,25),NAME=MSG01
MSG02 DATA USAGE=CTRL1,PIC=(N,25),NAME=MSG02
END
変換後 ＤＤＳソース（一部割愛）
A CF03(03 'FUNCTION 03')
A R PANEL1
A 1 2G'№'
A COLOR(WHT)
A 1 5'PANEL1'
A COLOR(WHT)
A 1 67G'日付'
A COLOR(WHT)
A 2 67G'時間'
A COLOR(WHT)
A 3 16G'◯◯◯ 店所別発地／個人売上日+
A 計表（新） ◯◯◯'
A COLOR(WHT)
A DSPATR(RI)
A 8 30G'年'
A COLOR(WHT)
A 8 38G'月度 の出勤日数合計'
A COLOR(WHT)
A 10 22G'年'
A COLOR(WHT)
A 10 30G'月'
A COLOR(WHT)
A 10 38G'日現在の出勤日数合計'
A COLOR(WHT)
A 13 22G'消費税率'
A COLOR(WHT)
A 13 38G'％分作表'
A COLOR(WHT)
A 13 50G'複写枚数'
A COLOR(WHT)
A SYS_DATE 8A B 1 72DSPATR(PR)
A COLOR(WHT)
A SYS_TIME 8A B 2 72DSPATR(PR)
A COLOR(WHT)
4 A Y1 4A B 8 24DSPATR(&Y1_B)
A OVRATR
A N70 COLOR(WHT)
A 70 COLOR(RED)
5 A Y2 4A B 10 16DSPATR(&Y2_B)
A OVRATR
A N70 COLOR(WHT)
A 70 COLOR(RED)
中略
4 A Y1_B 1A P
5 A Y2_B 1A P
以下省略
