topic DCL parameters in Apache under OpenVms in Operating System - OpenVMS

DCL parameters in Apache under OpenVms

rAMIRO_2 — Wed, 30 Jun 2004 08:39:59 GMT

Hello.
How is possible to pass parameters from an url to a CGI script made with a DCL? Can somebody write me a little example?
Many thanks everybody.

Re: DCL parameters in Apache under OpenVms

Wim Van den Wyngaert — Wed, 30 Jun 2004 09:38:14 GMT

This is how it looks on WASD

url : http://salpv1/report_ver_proc/?t=00:05

where t is the parameter value

in dcl you get

$ if www_form_t .eqs. ...

where t is the name of your parameter

Wim

Re: DCL parameters in Apache under OpenVms

Robert Atkinson — Thu, 01 Jul 2004 03:07:41 GMT

Parameters passed in the URL, i.e. 'action.htm?option=edit&call=3456', can be extracted using the string 'QUERY_STRING'.

Below is an example of how to create symbols with there corresponding values :-

$LOAD_PARAMS:
$ QUERY_STRING = F$EDIT("''QUERY_STRING'","UPCASE")
$ !
$ sh sym query_string
$ !
$ COUNT = 0
$ !
$LOAD_PARAMS_LOOP:
$ PARAM_LONG = F$ELEM(COUNT,"&",QUERY_STRING)
$ IF PARAM_LONG .EQS. "&" .OR. PARAM_LONG .EQS. "" THEN GOTO END_LOAD_PARAMS_LOOP
$ !
$ PARAM_NAME = F$ELEM(0,"=",PARAM_LONG)
$ PARAM_VALUE = F$ELEM(1,"=",PARAM_LONG)
$ !
$ 'PARAM_NAME' = "''PARAM_VALUE'"
$ !
$ sh sym 'param_name'
$ !
$ COUNT = COUNT + 1
$ GOTO LOAD_PARAMS_LOOP
$ !
$END_LOAD_PARAMS_LOOP:
$ .......

Form data can also be extracted, using Mark Daniels CGIUTL (http://wasd.vsm.com.au/wasd/) program :-

$LOAD_CGI_VARIABLES:
$ CGIUTL = "$CMS$SYSTEM:CGIUTL.EXE"
$ DEFINE /NOLOG /USER SYS$INPUT APACHE$INPUT
$ CGIUTL /URLDECODE /SYMBOLS /MAXSYM=254
$ !
$! sh sym cgiutl*
$ !

Using these two methods, I've written comprehensive browser-based applications, purely in DCL.

Let me know if you need any more help or examples.

Rob.

Re: DCL parameters in Apache under OpenVms

Karl Rohwedder — Fri, 02 Jul 2004 00:14:19 GMT

Example HTML for a form:

Re: DCL parameters in Apache under OpenVms

Robert Atkinson — Fri, 02 Jul 2004 02:58:32 GMT

Karl, how do you handle the string length limitations of DCL when parsing the HTTP request header?

Rob.

P.S. I like your coding style, but it must take forever with all that upper and lowercase text :-)

Re: DCL parameters in Apache under OpenVms

Ian Miller. — Fri, 02 Jul 2004 03:11:11 GMT

Re Karl Coding Style - it is said program source code is read many times and only written once - its worth the extra time writing readable DCL as DCL procedures have a a habit of persisting for years.
(I am also guilty of too much all uppercase DCL :-)