iSeries上RPGLE中的SetMargin (HSSF Scott Klement Java)

Question

我在iSeries上使用Scott Klement的HSSF Excel工具。

我尝试在Excelfile上设置页边距，以便用较小的页边距打印Excel。但保证金方法并不是Scott Klement HSSF中的RPGLE原型。

我的问题是:如何在RPGLE中使用setMargin方法？如何用HSSF编写原型才能在我的RPGLE代码上使用它？

下面是我的RPG所需的Java代码：

    sheet.setMargin ( Sheet.LeftMargin, 0.25 );
    sheet.setMargin ( Sheet.RightMargin, 0.25 );
    sheet.setMargin ( Sheet.TopMargin, 0.25 );
    sheet.setMargin ( Sheet.BottomMargin, 0.5 );

下面是用于在Landscape中设置页面的运行RPG代码

PrintOptions = SSSheet_getPrintSetup(sheet);   
SSPrintSetup_setLandscape(PrintOptions: *ON);  

HSSF中的原型：

D SSSheet_getPrintSetup...                                        
D                 PR                  like(SSPrintSetup)          
D                                     extproc(*JAVA               
D                                     : SHEET_CLASS               
D                                     : 'getPrintSetup')          

D SSPrintSetup_setLandscape...                                       
D                 PR                  extproc(*JAVA                  
D                                     : PRINTSETUP_CLASS             
D                                     : 'setLandscape')              
D   setting                      1N   value                          

Answer 1

您需要查看Java接口

public void setMargin(short margin,
                      double size)

然后构建RPG原型，就像这样：(我的Java有点生疏了)

dcl-c LEFT_MARGIN   const(0);
dcl-c RIGHT_MARGIN  const(1);
dcl-c TOP_MARGIN    const(2);
dcl-c BOTTOM_MARGIN const(3);

dcl-pr SSSheet_setMargin extproc(*JAVA: SHEET_CLASS: 'setMargin');
  margin like(jshort) value;
  size   like(jdouble) value;
end-pr;

现在你可以调用它了

SSSheet_setMargin(LEFT_MARGIN:0.25);