Re: Fooling around with VRPG

[Booth Martin <booth@xxxxxxxxxxxx>]

We're missing something.  I've never used WebSphere for Visual Age RPG, 
so I really would be way off base to try to advise you with WebSphere.  
I would add however that Visual Age RPG is event driven, not cycle 
driven, and I don't see any events in your program.  I am thinking that 
you might rather use a different demo to see VARPG applications.

Here is a couple of event actions from a program, just so you see the 
difference in the coding:

****      *-------------------------------------------------------------------=
     *    If the window closes in some other way than the Exit button.   =
     *-------------------------------------------------------------------=
    C     MAIN          BEGACT    DESTROY       MAIN
    C                   Exsr      LastRecordSR
    C                   ENDACT
     *-------------------------------------------------------------------=
     *    Exit pushbutton pushed                                         =
     *-------------------------------------------------------------------=
    C     EXIT          BEGACT    PRESS         MAIN
    C                   Exsr      LastRecordSR
    C                   ENDACT
     *-------------------------------------------------------------------=
********      *     Last Record SR                                                =
     *-------------------------------------------------------------------=
    C     LastRecordSR  BEGSR

     * When client app ends, clean up server environment
    C                   If        Parms# > 0
     *
     * Delete data queue
    C                   Eval      Tmpxx= 'DLTDTAQ DTAQ(QGPL/'
    C                             + %Trim(Qnameo) + ')'
    C                   Call (E)  QCMDEXC
    C                   Parm                    Tmpxx          1024
    C                   Parm      1024          parm15           15 5
    C                   EndIf

    C                   MOVE      *ON           *INLR
    C                   ENDSR
     *-------------------------------------------------------------------=****



DLee@xxxxxxxx wrote:
> Booth;
>
> <I tried it and it wouldn't build.  (Apparently in Windows World they 
> build, not compile.) 
>
> Something is missing in our communications.  I'd offer more help, but I 
> am pretty sure I am missing something.>
>
> Here is what I do.
>
> 1)I select projects, and open the program MyPgm
> 2)Then I selected Projects/build options/windows - this is to select 
> windows as opposed to java
> 3)Then I select Project/build/windows -  build is always successful, I 
> look at the compile listing, and no errors
> 4)Then I select Project/Run/windows - the program attempts to run, but 
> fails due to the error I mentioned before.
>
> I probably could do all this from the toolbar, but this is the way I have 
> been doing it.  I also have run it from the tool bar as you suggested 
> earlier.
>
> Thank for your help
>
> Darrell Lee
> Information Technology
> Extension 7127