MIDRANGE dot COM Mailing List Archive



Home » WEB400 » April 2011

Re: Library list in CGIDEV2



fixed

Yes, just call the relevant program as you would in any other application. CGISRVPGM2 is a service program in its own activation group so you can share it across multiple programs being called in any single request. You don't have to have one CGI program only called per request - you can build up the response with calls to any number of programs responsible for different parts of the response - the only rule is that you clear the buffer once at the start of the request and you send it to stdout (wrtsection('*fini')) once at the end of the request. In your case you want to have one program per application, but you might end up with some very big and unwieldy programs, so consider breaking it up a bit. You can make it as modular as you like, down to the point that you may have individual programs or service program procedures responsible for creating textboxes, or dropdown boxes etc.

One of the things that people do commonly is have one HTML template per CGI program in the same way that you might have one display file per ordinary green screen application. In my opinion (and it is only my opinion) that is not a great idea. It results in lots of duplication and makes it difficult to apply a standard look and feel (unless you are the only developer).


-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On Behalf Of ewart.desouza@xxxxxxxxxxx
Sent: 25 April 2011 11:12
To: Web Enabling the AS400 / iSeries
Cc: web400-bounces@xxxxxxxxxxxx
Subject: Re: [WEB400] Library list in CGIDEV2

Hello Kevin,

Sorry I mean 'Javascript' in the HTML source & not 'Java'.

I plan to have one 'start' program as the central program (partly pasted
below) & one program for each application eg: WIP:SPMW005, Pending
Orders:SPMW010.... So depending on the user's choice the library list will
be set (as pasted below) & the respective program should be called for
which I'm not sure if the normal 'call' / 'callp' will work which I
thought would be simple.

From what I have seen a CGI program is initiated from the URL in the
browser or through HTML events.





I've pasted the screens with what I have so far, hope it comes through in
the mail.

Thanks for the reply & best regards
Ewart



Kevin Turner

From:
Kevin Turner <kevin.turner@xxxxxxxxxxxxxxx>


To:
Web Enabling the AS400 / iSeries <web400@xxxxxxxxxxxx>


Cc:
"web400-bounces@xxxxxxxxxxxx" <web400-bounces@xxxxxxxxxxxx>


Date:
04/25/2011 03:04 PM


Subject:
Re: [WEB400] Library list in CGIDEV2



What do you mean by "branching out" and why would java be required?

I must be missing something. I would have thought you would just call the
program that you want to call, and that program (or whatever it calls)
will take responsibility for building the response.



-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On
Behalf Of ewart.desouza@xxxxxxxxxxx
Sent: 25 April 2011 05:44
To: Web Enabling the AS400 / iSeries
Cc: web400-bounces@xxxxxxxxxxxx
Subject: Re: [WEB400] Library list in CGIDEV2

Hi Guys,

I continuation with my quest to have the user branch to the respective
application after selecting the database. My next problem is how do I
branch out ???

I have the division & the application as in the link below:
http://...:1097/spmwebp/spmstart.pgm?div=F&appl=outstg

My question now is do I need to make the branching out in the HTML
file(using Java ?) or can it be done through the RPG program eg:

wdiv = zhbgetvarupper('div');
wappl = zhbgetvarupper('appl');

select;
when wdiv = 'F';
wcmd='CHGLIBL LIBL(QTEMP QGPL SOPDTAF SPMLOCF SPMDTAF)' +
' CURLIB(SPMDTAF)';
callp(e) qcmdexc(wcmd:%len(%trim(wcmd)));
>>>>>>> here is where I want to branch to the respective application
calling another RPG program, can it be done? if so, how ??

other;
endsl;

My apologies if this is a stupid newbie question.

Thanks & best regards
Ewart



Scott Klement

From:
Scott Klement <web400@xxxxxxxxxxxxxxxx>


To:
Web Enabling the AS400 / iSeries <web400@xxxxxxxxxxxx>


Cc:



Date:
04/21/2011 11:05 PM


Subject:
Re: [WEB400] Library list in CGIDEV2



hello Ewart,

I've done this using the usropn function in RPG but I plan to use SQL.
So
I feel it would be easier to use the CHGLIBL command to set the library
list before using any SQL command. The problem is how ??

To use the CHGLIBL command, just do:

CHGLIBL LIBL(LIB1 LIB2 LIB3 .. etc)

Is that really what you're asking? Or are you asking us where to store
the library lists for each database environment? Or...?


After the login screen I plan to have another screen where the various
product areas are listed (using Radio buttons)& the various
applications
are listed (in the form of links / Radio buttons, which is better ??).
The
user will then have to select any one product area& an application to
proceed. Is this a good way of doing it ??

I would use radio buttons if you want the "product area" and
"application" to be submitted together. A link would be more appropriate
if you want to go to the application without submitting anything else on
the page long with it.

(At least... that's what a user would expect.)

It seems like an okay method to me -- but it's really hard to say
whether it's a good design without being familiar with the application.
What's important here is that it's easy for the user to understand,
use, and not cumbersome to repeat (if repetition is necessary.)
--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.




This e-mail is confidential and it is intended only for the addressees.
Any review, dissemination, distribution, or copying of this message by
persons or entities other than the intended recipient is prohibited. If
you have received this e-mail in error, kindly notify us immediately by
telephone or e-mail and delete the message from your system. The sender
does not accept liability for any errors or omissions in the contents of
this message which may arise as a result of the e-mail transmission.

--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.


NOTICE: The information in this electronic mail transmission is intended
by CoralTree Systems Ltd for the use of the named individuals or entity to
which it is directed and may contain information that is privileged or
otherwise confidential. If you have received this electronic mail
transmission in error, please delete it from your system without copying
or forwarding it, and notify the sender of the error by reply email or by
telephone, so that the sender's address records can be corrected.



--------------------------------------------------------------------------------


CoralTree Systems Limited
25 Barnes Wallis Road
Segensworth East, Fareham
PO15 5TT

Company Registration Number 5021022.
Registered Office:
12-14 Carlton Place
Southampton, UK
SO15 2EA
VAT Registration Number 834 1020 74.
--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.




NOTICE: The information in this electronic mail transmission is intended by CoralTree Systems Ltd for the use of the named individuals or entity to which it is directed and may contain information that is privileged or otherwise confidential. If you have received this electronic mail transmission in error, please delete it from your system without copying or forwarding it, and notify the sender of the error by reply email or by telephone, so that the sender's address records can be corrected.



--------------------------------------------------------------------------------


CoralTree Systems Limited
25 Barnes Wallis Road
Segensworth East, Fareham
PO15 5TT

Company Registration Number 5021022.
Registered Office:
12-14 Carlton Place
Southampton, UK
SO15 2EA
VAT Registration Number 834 1020 74.





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact