如何从Python调用RPG程序

Question

How do you call an RPG program from IBM's Python for PASE?

I tried os.system, subprocess.popen/call but they didn't work.

Update

I found something on IBM's site. I tried the below; it does not give me any error but the RPG program does not execute (meaning it does not give expected result).

from itoolkit import * 
from itoolkit.lib.ilibcall import * 

itool = iToolKit()                                       
itransport = iLibCall()                                  
itool.add(iCmd('CALL', 'CALL TEMPLIB/TEMPPGM'))      
itool.call(itransport)    

Answer 1

我不是Python方面的专家，但可以在Young i Professional网站上查看iPgm 。

Answer 2

This answer assumes you are using iSeriesPython . It does not apply if you are using one of the Python distributions from IBM.

First of all, os.system should work. It just passes a command to the command line, so you can do

import os
os.system('CALL TEMPLIB/TEMPPGM')

And it should work.

But, just like any program you call on the command line, you can't receive parameters back that way. If you need to get the value of output parameters, use os400.Program to call any *PGM object.

The documentation isn't the most thorough or up-to-date, but it tells you what you need to know. In this case, since your example doesn't have parameters, I'm not including parameters in mine:

import os400
pgm = os400.Program('TEMPPGM', 'TEMPLIB', ())
pgm()

Normally you would want parameters, though. Here's the example from the documentation:

getprice = os400.Program('GETPRICE', '*LIBL', (('c', 10), ('d', 9, 0)))
getprice('PART_A', 0)
price = getprice[1]

Answer 3

The docs for the XMLSERVICE-based Python itoolkit are here , specifically you want iPgm .

A simple example with no parameters would be:

from itoolkit import * 
from itoolkit.lib.ilibcall import *

itransport = iLibCall()
itool = iToolKit()

itool.add(iPgm('pgmcall','TEMPPGM', {'lib': 'TEMPLIB'}))
itool.call(itransport)

output = itool.dict_out('pgmcall')
if 'success' in output:
    print('Success!')

Another solution for specifying the library is to add an iCmd operation first, which adds TEMPLIB to the library list. You can find that and more examples here: http://python-itoolkit.readthedocs.io/en/latest/examples.html

Answer 4

The library XMLSERVICE has a set of demo programs in RPG that are callable and some sample code. I just did a session on XMLSERVICE at the PowerUP18 conference and used this example, which does work in 7.2 and the OPS licensed program.

from itoolkit.lib.ilibcall import *
itransport = iLibCall()
from itoolkit import *
# XMLSERVICE/ZZCALL:
#     D  INCHARA        S              1a
#     D  INCHARB        S              1a
#     D  INDEC1         S              7p 4
#     D  INDEC2         S             12p 2
#     D  INDS1          DS
#     D   DSCHARA                      1a
#     D   DSCHARB                      1a
#     D   DSDEC1                       7p 4
#     D   DSDEC2                      12p 2
#      *+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#      * main(): Control flow
#      *+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#     C     *Entry        PLIST
#     C                   PARM                    INCHARA
#     C                   PARM                    INCHARB
#     C                   PARM                    INDEC1
#     C                   PARM                    INDEC2
#     C                   PARM                    INDS1
itool = iToolKit()
itool.add(iCmd('chglibl', 'CHGLIBL LIBL(XMLSERVICE)'))
itool.add(
iPgm('zzcall','ZZCALL')
.addParm(iData('INCHARA','1a','a'))
.addParm(iData('INCHARB','1a','b'))
.addParm(iData('INDEC1','7p4','32.1234'))
.addParm(iData('INDEC2','12p2','33.33'))
.addParm(
 iDS('INDS1')
 .addData(iData('DSCHARA','1a','a'))
 .addData(iData('DSCHARB','1a','b'))
 .addData(iData('DSDEC1','7p4','32.1234'))
 .addData(iData('DSDEC2','12p2','33.33'))
 )
)

 # xmlservice
itool.call(itransport)

# output
chglibl = itool.dict_out('chglibl')
if 'success' in chglibl:
 print (chglibl['success'])
else:
  print (chglibl['error'])
exit()

zzcall = itool.dict_out('zzcall')
if 'success' in zzcall:
 print (zzcall['success'])
 print ("    INCHARA      : " + zzcall['INCHARA'])
 print ("    INCHARB      : " + zzcall['INCHARB'])
 print ("    INDEC1       : " + zzcall['INDEC1'])
 print ("    INDEC2       : " + zzcall['INDEC2'])
 print ("    INDS1.DSCHARA: " + zzcall['INDS1']['DSCHARA'])
 print ("    INDS1.DSCHARB: " + zzcall['INDS1']['DSCHARB'])
 print ("    INDS1.DSDEC1 : " + zzcall['INDS1']['DSDEC1'])
 print ("    INDS1.DSDEC2 : " + zzcall['INDS1']['DSDEC2'])
else:
 print (zzcall['error'])
exit()

Getting the library list and syntax correct is probably the hardest part