as / 400 rpg / free d-spec to dcl -s spec with pointer based

Question

在RGP中的AS / 400上，我有以下声明

D DataAttribute s 16383c based（p_Attr）

我需要将它翻译成/ free version

dcl -s DataAttribute ucs2（16383）based（p_attr）;
我有这个陈述，但编译器不喜欢基于关键字＆＃34;基于＆＃34;。

请让我知道我做错了什么。

Answer 1

对我来说很好。

您收到了什么错误消息？

您确定自由格式D规格需要PTF吗？