[progress Communities] [progress Openedge Abl] Forum Post: Re: How To Find Who's Locking My...

[George Potemkin]

How to recover records in a damaged partitioned table? knowledgebase.progress.com/.../000047328 DEFINE VARIABLE rid AS ROWID NO-UNDO. Rowids:TableStart(" ", 1408, 3000, ?). rid = Rowids:GetNextRowid(). DO WHILE rid <> ?: FIND WHERE ROWID( ) = rid NO-ERROR. IF AVAILABLE( ) THEN DO: EXPORT . END. rid = Rowids:GetNextRowid(). END.

Continue reading...