DXL to Build New Database

HCL Domino Domino Forum
1

I am extacting DXL from a database and testing DXL to import that design into another database. Is this possible? When I import the DXL from a RTF item that I have it stored in, I get this error.

<?xml version='1.0'>Expected an attribute nameUnknown DXL class library errorDXL importer operation failed I have the source DXL if someone needs to see it. The code for the import is below. Function importDesignDXLAll(srcdb As NotesDatabase, intMode As Integer, strFile As String) As Integer importDesignDXLAll = False On Error Goto ErrorHandler Dim doc As NotesDocument Dim stream As NotesStream Dim importer As NotesDXLImporter Dim parsObj As NotesDOMParser Dim strRet As String, strServer As String Dim intRet As Integer Dim rtitem As NotesRichTextItem Set parsObj = s.CreateDOMParser parsObj.InputValidationOption=VALIDATE_AUTO On Event PostDOMParse From parsObj Call PostDOMParse Set importer = s.CreateDXLImporter(parsObj, srcdb) importer.ReplicaRequiredForReplaceOrUpdate = False importer.DesignImportOption = 6 '--overwrite existing Design importer.ReplaceDBProperties = True importer.ExitOnFirstFatalError = False Select Case intMode Case 0 Set stream = s.CreateStream If Not stream.Open(strFile) Then Messagebox "Cannot open " & strFile,, "Error" Exit Function End If If stream.Bytes = 0 Then Messagebox "File did not exist or was empty",, strFile Exit Function End If Call parsObj.setInput(stream) Case 1 Set doc = getDXLStorDoc(strFile) If Not (doc Is Nothing) Then Set rtitem = doc.GetFirstItem("rtfDXL") Call parsObj.setInput(rtitem) End If End Select Call parsObj.process importDesignDXLAll = True ExitGracefully: Exit Function ErrorHandler: If Not (importer Is Nothing) Then If importer.log <> "" Then Call errorHandler(CRLF & CRLF & importer.log) Else Call errorhandler("") End If Else Call errorhandler("") End If Resume ExitGracefully End Function
2

Subject: DXL to Build New Database

The first error is saying there is something wrong with the DXL. What is at line 22091, around column 180?

3

Subject: RE: DXL to Build New Database

If I view the line in TextPad, I get:

" End If"

Is there a way to get the NotesDXLImporter to provide the suspected errrant DXL?

4

Subject: RE: DXL to Build New Database

Well, there’s no column 180 there! Are any of the lines nearby long enough?

5

Subject: RE: DXL to Build New Database

Seems like we have been here before, you and I, with another DXL issue that turned out to be a bug, back in January. Anyways…I opened the file up with XML Spy and the line at 22091 is different, it is now:

Again, no column 180 and no near buy likely candidate. However, I was able to contact the developer at IBM and I sent him my DXL. He offered to help debug it. I will let you know if we find the error for this.

6

Subject: RE: DXL to Build New Database

I had help from the product developer on this. It seems that there was some lotuscript functions that the importer didn’t like. These functions compiled Ok in the LotusScript compiler though. For reference, the functions had LotusScript reserved words that were not use proprerly and that were overlooked by the agent compiler.

7

Subject: RE: DXL to Build New Database

Intriguing…can you give an example of how a reserved word was not used properly?