midrange.com code scratchpad
Name:
hssf_getSheetName
Scriptlanguage:
Plain Text
Tabwidth:
4
Date:
06/11/2010 05:39:36 pm
IP:
Logged
Description:
Procedure to use the POI HSSF getSheetName function

By Dennis Lovelady
Code:
  1.  
  2.      D hssf_getSheetName...
  3.      D                 PR            32    Varying
  4.      D                                     ExtProc('hssf_getSheetName')
  5.      D workBook                            Like(HSSFWorkbook)
  6.      D sheetIndex                    10I 0 Value
  7.  
  8.  
  9.  
  10.        // hssf_getSheetName
  11.  
  12.      P hssf_getSheetName...
  13.      P                 B                   Export
  14.      D hssf_getSheetName...
  15.      D                 PI            32    Varying
  16.      D workBook                            Like(HSSFWorkbook)
  17.      D sheetIndex                    10I 0 Value
  18.  
  19.      D workbook_getSheetName...
  20.      D                 PR                  Like(jString)
  21.      D                                     ExtProc(*JAVA
  22.      D                                     :'org.apache.poi.hssf.usermodel-
  23.      D                                     .HSSFWorkbook'
  24.      D                                     :'getSheetName')
  25.      D index                               Value Like(jInt)
  26.  
  27.      D sheetName       S             32    Varying
  28.  
  29.       /Free
  30.        sheetName = string_getBytes(
  31.                      workbook_getSheetName(workBook: sheetIndex)
  32.                         ) ;
  33.        Return sheetName ;
  34.       /End-free
  35.  
  36.      P hssf_getSheetName...
  37.      P                 E                                            
© 2004-2019 by midrange.com generated in 0.006s valid xhtml & css