Sets or gets property values in the object.
Syntax:
Parameters:
Returns
Returns a variant data type containing the value of the property type requested.
Example:
Set oEdiDoc = New Fredi.ediDocument
oEdiDoc.CursorType = Cursor_ForwardOnly
oEdiDoc.LoadSchema spath & sSefFile, 0
Set oAck = oEdiDoc.GetAcknowledgment
oAck.Property(PropertyAck_StartGroupControlNum) = nGroupControlNo
oAck.Property(PropertyAck_StartInterchangeControlNum) = nInterchangeControlNo
oAck.Property(PropertyAck_StartTransactionSetControlNum) = nTsControlNo
oAck.EnableFunctionalAcknowledgment = True
oEdiDoc.LoadEdi sEdiFile
Set oSegment = oEdiDoc.FirstDataSegment
Do While Not oSegment Is Nothing
Set oSegment = oSegment.Next
Loop
oAck.Save sAckfile