define variable sequence as ISequence no-undo.
sequence = service:NewSequence("OrderSequence"). /* Set properties */ . . . service:CreateSequence(sequence). . . . sequence = service:GetSequence("CustSequence"). /* Set properties */ . . . service:UpdateSequence(sequence). . . . service:DeleteSequence("CustSequence"). |
define variable sequenceSet as ISequenceSet no-undo.
define variable sequence as ISequence no-undo. sequenceSet = service:GetUsers(). sequence = service:NewSequence("ItemSeq"). /* Set properties */ . . . sequenceSet:Add(sequence). sequence = sequenceSet:Find("OrderSequence"). sequence:Description = "Sequence for the Order table.". sequence = sequenceSet:Find("ItemSeq"). sequenceSet:Remove(sequence). service:UpdateSequences(sequenceSet). |