Information générale
Catégorie:
West Wind Web Connection
Titre:
No PARAMETERS statement is found.
I am migrating a 2.97 app to 3.51 and I get a "No PARAMETERS statement is found." error on processing a request. Anyone have any ideas?
from WeblogMain.prg
CASE lcParameter == "WEBLOG" is executed
************************************************************************
* WeblogServer :: Process
******************************
*** Function: This procedure's main purpose is to route incoming
*** requests to individual project PRGs/APPs.
***
*** The URL formatting used is as follows:
*** /wconnect/wc.dll?project~ClassMethod~Parm1~Parm2 etc.
***
*** The project 'parameter' is routed to the appropriate
*** program file which actually implements a Process class
*** to respond to requests. ClassMethod calls the method
*** in the wwProcess class implemented in project.prg
************************************************************************
PROTECTED FUNCTION Process
LOCAL lcParameter, lcExtension, lcPhysicalPath
*** Retrieve first parameter
lcParameter=UPPER(THIS.oRequest.Querystring(1))
*** Set up project types and call external processing programs:
DO CASE
CASE lcParameter == "WEBLOG"
DO WebLog with THIS
*** SUB APPLETS ADDED ABOVE - DO NOT MOVE THIS LINE ***
from Weblog.prg
begining of file
************************************************************************
*PROCEDURE WebLog
******************
*** Modified: 07/16/02
*** Procedure: Processes incoming WebLog CGI requests. Called from
*** wcMain.prg using WebLog~Task~Optional+Parms parameter.
*** Pass: loServer - wwServer/wwOLEServer object
*************************************************************************
lparameter loServer
local loProcess
#INCLUDE WCONNECT.h
#include path.h
#include LogFiles.h
#include TimeZone.h
#include adircols.h
#define MAX_DOWNLOAD_SIZE 16000000 && prevent surpassing 16MB string size
#define FILE_DATA_TYPE 5 && adir() column redefinition
#define FILE_DESCRIPTION 2 && adir() column redefinition
#define ORIGINAL_LANGUAGE_CODE 437
#define ORIGINAL_LANGUAGE_NAME "ORIGINAL"
#define ORIGINAL_LANGUAGE_CHARSET "windows-1252"
#define USE_IMAGE .t.
#define BACKGROUND_COLOR "#CCCCCC"
#define BACKGROUND_IMAGE "/images/g5.jpg"
#define CODE_WIDTH 8
#define DEFAULT_TIMEOUT 1800 && Seconds - 1/2 hour
#define TICK_MAX_SECONDS 3600 && Seconds - 1 hour
#define MAX_REPORT_ROWS 1000 && The max rows for a report
* message results
#define MESSAGE_SUCCESS "0"
#define MESSAGE_FAILURE "1"
#define MESSAGE_BAD_COMMAND "2"
#define MESSAGE_INVALID_PASSWORD "3"
* pid command types
#define SET_STATUS_BITS 0
#define SET_OUTPUT_VARIABLE 1
#define SET_PROP_GAIN 2
#define SET_INTEGRAL_RATE 3
#define SET_DERIVATIVE_GAIN 4
#define SET_SET_POINT 5
* alarm states
#define AL_NORMAL 0
#define AL_SHUTDOWN 2
#define AL_ALARM 3
* analog states
#define AN_NORMAL 0
#define AN_FAIL 1
#define AN_SHUTDOWN 2
#define AN_ALARM 3
* status states
#define ST_ON 5
#define ST_OFF 4
* control function states
#define CF_ON 5
#define CF_OFF 4
* timer states
#define TI_NORMAL 0
#define TI_NOT_RUNNING 6
#define TI_COUNTING_DOWN 7
#define TI_TIMED_OUT 8
* pid states
#define PI_SIZE 24 && 2 * 12
#define PI_MANUAL_OUTPUT 1
#define PI_PROP_GAIN 3
#define PI_INTEGRAL_RATE 5
#define PI_DERIVATIVE_GAIN 7
#define PI_SET_POINT 9
#define PI_REMOTE_SET_POINT 11
#define PI_PROCESS_VARIABLE 13
#define PI_OUTPUT_VARIABLE 15
#define PI_PID_STATUS_BITS 17
#define PI_AUTO_MANUAL 0
#define PI_LOCAL_REMOTE 1
#define PI_SET_STATUS_BITS 1
#define PI_SET_OUTPUT_VARIABLE 2
#define PI_SET_PROP_GAIN 3
#define PI_SET_INTEGRAL_RATE 4
#define PI_SET_DERIVATIVE_GAIN 5
#define PI_SET_SET_POINT 6
* surge control states
#define SU_SIZE 100 && 2 * 50
#define SU_NUM_CONTROL_LINE_POINTS 6 && this is a count
#define SU_COMMON_Y 3
#define SU_CONTROL_LINE_Y 5
#define SU_CONTROL_LINE_X 17
#define SU_OPER_POINT_X 41
#define SU_SETPOINT 43
#define SU_BACK_CONT_RATIO 45
#define SERVER_TITLE "Dresser-Rand WebLog Viewer"
loProcess=createobject("WebLogProcess",loServer)
if vartype(loProcess)#"O"
*** All we can do is return...
wait window nowait "Unable to create Process object..."
return .f.
endif
*** Call the Process Method that handles the request
loProcess.process()
return
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement