zOs/TX/PER10
*
* segmented table für reorg drain retries
* per10Reo ==> reo mit retry parametern
* per10job ==> startet mehrere Jobs mit dem
* per10Ru script, jeder Job wird durch ein per10Ru? member
* per10Ru? member gesteuert
* per10RuC Select Insert Commit, sleep, loop
* per10RuD Insert Commit select, sleep, loop
* per10RuI Insert (ohne commit), sleep, loop
* per10RuJ Insert, Commit , sleep, loop
* per10RuM (Insert 500, Commit) * 200 , exit
* per10RuS Select (ohne Commit), sleep, loop
* per10RuT Select Commit, sleep, loop
=parts = -13 $** < = ==> pbg
creDb trg 1
+ ok creDb DSN.TX.GENF(PER10t1)