Changeset 450 for branches/guitools-2.0/shared/rxrpclib.vrs

Timestamp:

Apr 26, 2010, 4:51:52 PM (15 years ago)

Author:

Herwig Bauernfeind

Message:

GUI-Tools: Latest EVFSGUI changes

File:

• branches/guitools-2.0/shared/rxrpclib.vrs (modified) (1 diff)

branches/guitools-2.0/shared/rxrpclib.vrs

@@ -344 +344 @@
             leave
         end
+        if pos("TDB(", translate(rpcline)) > 0 then do
+            Failure = 1
+            /* provide a fake NT_STATUS */
+            rpcline = 'NT_STATUS_TDBERROR 'rpcline
+            leave
+        end
+
         parse var rpcline token ':' tvalue
         token = translate(strip(strip(translate(token),'L','09'x)),'_',' ')