Framework EDI Reference. Methods and Properties
ediInterconnectMailbag. GetEdiString

Gets the string containing the entire content of the Interconnect Mailbag.

Syntax:

• <sText> = object.GetEdiString

Controlling Agency:

• ASC/X12

Remarks

The text starts with and includes the Interconnect Mailbag Control Header (IH), and ends with and includes the Interconnect Mailbag Control Trailer (IT).

Example

Dim oEdiDoc As ediDocument
Dim oSchema As ediSchema
Dim oInterconnect As ediInterconnectMailbag
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 Interconnect Mailbag from document
Set oInterconnect = oEdiDoc.FirstInterconnectMailbag

' Get Interconnect Mailbag string
sOutputString = oInterconnect.GetEdiString
Debug.Print sOutputString