Download

(click to open)

Quick Page Table of Contents

Scanning…

ezwindow Download

Download

The two functional parts in the download are the PASE ezwindow binary, and ILE RPG/c interface SRVPGM that you compile on your own, all other parts are demos.

Installation (README in xgui10.zip)

To install ezwindows and create the ILE interface (assumes library FREEWARE):

Only two parts needed:
1) /QOpenSys/usr/bin/ezwindow - PASE X GUI binary
2) QSYS/XGUI10 SRVPGM - ILE interface (source code included)

Step 1: Unzip files

unzip xgui10.zip
parts:
xgui10_h.h      - ILE c XGUI10 interface protoypes (#include "xgui10_h")
xgui10_h.rpginc - ILE RPG XGUI10 interface prototypes (/copy xgui10_h)
xgui10.c        - ILE C QSYS/XGUI10 SRVPGM interface to PASE ezwindow binary
xgui10.bnd      - ILE QSYS/XGUI10 SRVPGM export interface file
bldx10.clp      - CLP QSYS/XGUI10 SRVPGM build program
ezwindow        - PASE binary for X GUI
                  must install in /QOpenSys/usr/bin/ezwindow
                  where QSYS/XGUI10 expects
                  Note: ftp in binary

Step 2: ftp ezwindow binary

Ftp the ezwindow binary to /QOpenSys/usr/bin/ezwindow. Make sure you ftp this file in binary (image) mode or it will not work. Also the name /QOpenSys/usr/bin/ezwindow is hard coded in the QSYS/XGUI10 SRVPGM interface (ILE C xgui10.c).

Step 3: create QSYS/XGUI10 SRVPGM

chglibl libl(freeware) curlib(freeware)
CRTCMOD MODULE(freeware/XGUI10) SRCFILE(FREEWARE/QCSRC) DBGVIEW(*LIST) OUTPUT(*PRINT)
CRTSRVPGM SRVPGM(QSYS/XGUI10) MODULE(XGUI10) EXPORT(*SRCFILE) SRCFILE(FREEWARE/QSRVSRC) ACTGRP(*CALLER)

(CL program bldx10 included)

Step Create: your programs

-- create a ILE RPG GUI program --
CRTRPGMOD MODULE(FREEWARE/ezsimpr) SRCFILE(FREEWARE/QRPGLESRC) DBGVIEW(*LIST) ALWNULL(*YES)
CRTPGM PGM(FREEWARE/ezsimpr) BNDSRVPGM(QSYS/XGUI10) ACTGRP(*NEW)

-- create a ILE C GUI program --
CRTCMOD MODULE(freeware/ezsimpc) SRCFILE(FREEWARE/QCSRC) DBGVIEW(*LIST) OUTPUT(*PRINT)
CRTPGM PGM(FREEWARE/ezsimpc) BNDSRVPGM(QSYS/XGUI10) ACTGRP(*NEW)

(CL Program demobld included)

Step Run: Houston we have windows!

ssh -X my400 (or latest ssh -Y my400 if you see "bad atom", or graphics problems)
--or--
>ssh -X myuserid@myi5.xxx.org (if your PC is not same user name)
> echo $DISPLAY
> qsh
> cd /qsys.lib/freeware.lib
> EZGUIR.PGM&

--  or --
5250 emulator with DISPLAY env var set to ssh -X (see echo above)

-- or --
icon on PC though Putty, etc

ftp help

ftp my400
prompt off
quote namefmt 1
quote rcmd CRTPF FILE(FREEWARE/QCSRC) RCDLEN(92) FILETYPE(*SRC) MBR(*NONE) MAXMBRS(*NOMAX) TEXT('C')
quote rcmd CRTPF FILE(FREEWARE/QCLSRC) RCDLEN(92) FILETYPE(*SRC) MBR(*NONE) MAXMBRS(*NOMAX) TEXT('CL')
quote rcmd CRTPF FILE(FREEWARE/QDDSSRC) RCDLEN(92) FILETYPE(*SRC) MBR(*NONE) MAXMBRS(*NOMAX) TEXT('DDS')
quote rcmd CRTPF FILE(FREEWARE/QRPGLESRC) RCDLEN(92) FILETYPE(*SRC) MBR(*NONE) MAXMBRS(*NOMAX) TEXT('RPG')
quote rcmd CRTPF FILE(FREEWARE/QSRVSRC) RCDLEN(92) FILETYPE(*SRC) MBR(*NONE) MAXMBRS(*NOMAX) TEXT('EXP')
cd /qsys.lib/freeware.lib
cd /qsys.lib/freeware.lib/QSRVSRC.FILE
put xgui10.bnd xgui10.MBR
cd /qsys.lib/freeware.lib/QRPGLESRC.FILE
put xgui10_h.rpginc xgui10_h.MBR
cd /qsys.lib/freeware.lib/QCLSRC.FILE
put bldx10.clp bldx10.MBR
cd /qsys.lib/freeware.lib/QCSRC.FILE
put xgui10.c xgui10.MBR
put xgui10_h.h xgui10_h.MBR
bin
cd /QOpenSys/usr/bin
put ezwindow
quit