Framework EDI Reference. Methods and Properties
ediInterchange. GetEdiString

Gets a string containing the entire content of the Interchange.

Syntax:

• <sInterchangeText> = object.GetEdiString

Remarks

The text starts with and includes the Interchange Control Header and ends with and includes the Interchange Control Trailer.

ASC/X12

• ISA - Interchange Control Header.
• IEA - Interchange Control Trailer.

UN/EDIFACT

• UNB - Interchange Header Service Segment.
• UNZ - Interchange Trailer Service Segment.

 

Example

Dim oEdiDoc As ediDocument
Dim oSchema As ediSchema
Dim oInterchange As ediInterchange
Dim sEdiFile As String
Dim sSefFile As String
Dim sOutputString As String

sEdiFile = App.Path & "\850.X12"
sSefFile = App.Path & "\850.SEF"

Set oEdiDoc = New ediDocument
Set oSchema = oEdiDoc.LoadSchema(sSefFile, 0)

oEdiDoc.LoadEdi sEdiFile

' Get Interchange from document
Set oInterchange = oEdiDoc.FirstInterchange

' Get interchange string
sOutputString = oInterchange.GetEdiString
Debug.Print sOutputString