Returns the header control segment of the Functional Group.
Syntax:
Returns
Object of type FREDI.ediDataSegment.
Remarks
For X12 Control Header, the data segment returned is GS. For UN/EDIFACT, the data segment returned is UNG.
Example
Set oGroup = oInterchange.CreateGroup("004010")
'Gets the GS segment, then its element values are changed.
Set oSegment = oGroup.GetDataSegmentHeader
oSegment.DataElementValue(1) = "IN"
oSegment.DataElementValue(2) = "SENDERDEPT"
oSegment.DataElementValue(3) = "007326879"
oSegment.DataElementValue(4) = "19960807"
oSegment.DataElementValue(5) = "1548"
oSegment.DataElementValue(6) = "000001"
oSegment.DataElementValue(7) = "X"
oSegment.DataElementValue(8) = "004010"