pre cutover push

SYSPROG/STPROCINS/OLE_GETWEBPAGE_EQUATES.txt

@@ -0,0 +1,40 @@
+Compile Insert OLE_GETWEBPAGE_EQUATES
+
+/*
+   ** Copyright (C) 2024 Revelation Software Inc. All Rights Reserved **
+   
+   Author   : BZS
+   Date     : Feb 2024
+   Purpose  : Options for use with OLE_GETWEBPAGE
+   
+   Comments
+   ========
+   
+   Amended  Date        Reason
+   =======  ====        ======
+
+*/
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
+#ifndef _OLE_GETWEBPAGE_EQUATES_
+#define _OLE_GETWEBPAGE_EQUATES_
+
+Declare Function OLE_GETWEBPAGE
+
+Equ OPTION_IGNORE_ERRS$ To "ignore_errs"
+
+Equ OPTION_TLS_PROTOCOL$ To "tlsprotocol"
+Equ TLS_PROTOCOL_TLS11$ To "tls11"
+Equ TLS_PROTOCOL_TLS12$ To "tls12"
+Equ TLS_PROTOCOL_TLS13$ To "tls13"
+Equ TLS_PROTOCOL_DEFAULT$ To "systemdefault"
+Equ TLS_PROTOCOL_SSL3$ To "ssl3"
+Equ TLS_PROTOCOL_TLS$ To "tls"
+
+Equ OPTION_SPECIFIC_PROTOCOL$ To "progid"
+Equ SPECIFIC_PROTOCOL_REMOVE_WINHTTP$ To "-WinHttp.WinHttpRequest.5.1"
+Equ SPECIFIC_PROTOCOL_SELECT_MSXML$ To 'Msxml2.ServerXMLHTTP.6.0'
+
+Equ TIMEOUT_ASYNC$ To "-1"
+
+#endif