added remaining LSL2 entities
This commit is contained in:
41
LSL2/STPROCINS/MCP_SETUP.txt
Normal file
41
LSL2/STPROCINS/MCP_SETUP.txt
Normal file
@ -0,0 +1,41 @@
|
||||
Compile insert MCP_Setup
|
||||
|
||||
/***********************************************************************************************************************
|
||||
|
||||
This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written
|
||||
permission from SRP Computer Solutions, Inc.
|
||||
|
||||
Name : MCP_Setup
|
||||
|
||||
Description : Declares and equates used by MCP.
|
||||
|
||||
Notes :
|
||||
|
||||
History : (Date, Initials, Notes)
|
||||
08/13/10 dmb Original programmer.
|
||||
07/24/14 dmb Add Error_Services as a declared function. - [SRPFW-77]
|
||||
|
||||
***********************************************************************************************************************/
|
||||
|
||||
Declare function RetStack, MCP, Inet_QueryParam, Error_Services
|
||||
Declare subroutine Error_Services, RTP27
|
||||
|
||||
|
||||
// Make sure any request parameters which have not been assigned are nulled.
|
||||
If Assigned(ServiceHandler) else ServiceHandler = ''
|
||||
If Assigned(Service) else Service = ''
|
||||
|
||||
If Assigned(Param1) else Param1 = ''
|
||||
If Assigned(Param2) else Param2 = ''
|
||||
If Assigned(Param3) else Param3 = ''
|
||||
If Assigned(Param4) else Param4 = ''
|
||||
If Assigned(Param5) else Param5 = ''
|
||||
If Assigned(Param6) else Param6 = ''
|
||||
If Assigned(Param7) else Param7 = ''
|
||||
If Assigned(Param8) else Param8 = ''
|
||||
If Assigned(Param9) else Param9 = ''
|
||||
If Assigned(Param10) else Param10 = ''
|
||||
If Assigned(Response) else Response = ''
|
||||
|
||||
// These are request parameters used by INET_MCP.
|
||||
If Assigned(Payload) else Payload = ''
|
Reference in New Issue
Block a user