Map RPG To PHP Toolkit

PGM (optional) LIB (optional)
Input: RPG D Spec cut/paste fixed format 'D' specs (example below)
Generate PHP Stub (ignore "S") Generate PHP Functions (ignore "S") Clear Form
Output: PHP Toolkit (RPG order of appearance, manually re-order PHP statements)

Sample: RPG D Spec cut/paste fixed format 'D' specs
         1         2         3         4
12345678901234567890123456789012345678901234 ...
123456... Yes! -- fixed format input ('D' column 6)
     D dcRec           ds                  qualified based(Template)
     D  dcMyName                     10A
     D somejunk        s             10A   inz(*BLANKS)
     Dzzbigi           PR            20u 0
     Dmmint8                          3i 0
     Dmrec                                 likeds(dcRec)
     DdoRec_t          ds                  qualified based(Template)
     D doFrog                        10i 0
     D doToad                         1N

     D justJunk        s            128A

     DipcRec_t         ds                  qualified based(Template)
     D ipcOwnKey                    128A
     D ipcFlags                            like(doRec_t)


     D cpyIn           PR             1N
     D   node                              likeds(ipcRec_t)
     D                                     dim(999)

     D sql_active_any...        
     D _large_...        
     D frog            PI             1N
     D  type                          1A
     D  label                        10A
     D                                     dim(10)
     D                                     varying(4)
     D  type1                         1A

     D zzold1          PI
     D  Len                           2  0
     D  Wid                           2  0
     D  Area                          4  0
     D  Frog                         10
     D $vevsfi         s              1
     D $vevsrj         s              2
     D $vevsob         s              7s 0
     D $vevsve         s              5s 0
     D*Ergebnisdaten:
     D $vevsods        ds                  occurs(200)
     D $vsukz                  1      1
     D $vpos                   2      9
     D $vtxt                  10     39
     D $vkalw                 40    174  2 dim(15)
     D $vvsw                 175    309  2 dim(15)
     D $vvsk                 310    324  0 dim(15)
     d*
     D i               S             10i 0 inz(0)
     D j               S             10i 0 inz(0)

     D zzvary          PI            20A   varying
     D  myName                       10A   varying

     D zzvary4         PR            20A   varying(4)
     D  myName                       10A   varying(4)

     Dmebun            ds                  qualified based(Template)
     D ipcOwnBun                    128A
     D ipcOwnOven                   128A

     Dmebuns           ds                  likeds(dcRec) dim(23)

     D zzbun           PR                  likeds(mebun)
     D  myName                       10A   varying(4)
     Dmebunso                              likeds(dcRec) dim(23)

     D zznoret         PR
     D  myName                       10A   varying(4)

     D zznoparam       PR            10a   varying

     D zznothing       PR


     D pref_build      PR             5P 0 ExtProc('ProgramA')
     D  webpgmtype                    1A