added LSL2 stored procedures

LSL2/STPROC/CONVERT_EXCEL_EXPORT_PATHS.txt

@@ -0,0 +1,27 @@
+Function Convert_Excel_Export_Paths(Void)
+
+$Insert LOGICAL
+$insert EXPORTS_EQU
+
+Declare function    Database_Services, Error_Services, SRP_Path
+Declare subroutine  Database_Services, Error_Services, SRP_Path
+
+hExports    = Database_Services('GetTableHandle', 'EXPORTS')
+@DICT       = Database_Services('GetTableHandle', 'DICT.EXPORTS')
+
+Select hExports
+EOF = False$
+Loop
+    Readnext @ID else EOF = True$
+Until EOF EQ True$
+    @RECORD                 = Database_Services('ReadDataRow', 'EXPORTS', @ID)
+    Path                    = @RECORD<EXPORTS_PATH$>
+    NewPath                 = {NEW_PATH}
+    @RECORD<EXPORTS_PATH$>  = NewPath
+*    Database_Services('WriteDataRow', 'EXPORTS', @ID, @RECORD, True$, '', True$)
+    If Error_Services('HasError') then
+        Error_Services('DisplayError')
+    end
+Repeat
+
+Return ''