ING_DB

WEGA/contrib/ingres/dbs/src/redabas/cdb.bat

@@ -0,0 +1,15 @@
+@echo %ECHO%
+if %1.==. goto usage
+if %2.==. goto usage
+if %3.==. set $DBP=0
+goto ok
+:usage
+echo usage: cdb db dbi pathno
+goto ende
+:ok
+copy %2 .\%1$.bat > nul
+ed - .\%1$.bat < %INDP%\files\cdb.ed > nul
+call .\%1$.bat %1 %$DBP%
+rm .\%1$.bat
+:ende
+set $DBP=

WEGA/contrib/ingres/dbs/src/redabas/cdb.ed

@@ -0,0 +1,12 @@
+v/^[TD]/d
+g/^T/s//destroyr %1/
+g/destroy\(.*\)/s//&\
+ create\1/
+g/^D/-s/$/	\\/
+g/^D	* *[0-9][0-9]*/s///
+g/\\/s///
+2,$j
+g/[	 ][	 ]*/s// /g
+s/$/ %2/
+w
+