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 = ''