Progress Worldwide Sites

Worldwide Offices Close
Sitemap Close
Sitemap Close
Sitemap Close
Sitemap Close
Sitemap Close
Sitemap Close

4GL/ABL: How to programmatically dump the values of the connected database 4GL sequences?

Printable View
« Go Back

Information

 
EnvironmentProgress 9.x
OpenEdge 10.x
All Supported Operating Systems
Question/Problem Description
4GL/ABL:  How to programmatically dump the values of the connected database 4GL sequences?
How to dump the values of the sequences of a 4GL database using 4GL?
Clarifying Information
Error Message
Defect/Enhancement Number
Cause
Resolution

The following code will dump the values of all the 4GL sequences of the first connected database ( LDBNAME(1) ):

OUTPUT TO TemporaryProcedure.p.
FOR EACH _Sequence WHERE NOT _Sequence._Seq-name BEGINS "$":
    PUT UNFORMATTED
        'EXPORT '
        _Sequence._Seq-Num
        ' '
        QUOTER(_Sequence._Seq-Name)
        ' CURRENT-VALUE('
        _Sequence._Seq-Name
        ','
        LDBNAME(1)
        ').'
        SKIP.
END.
OUTPUT CLOSE.

OUTPUT TO SequenceDataDump.d.
RUN TemporaryProcedure.p.
OUTPUT CLOSE.

Workaround
Notes
Attachment