Re: Forms4.5 - Batch generation

From: Markus Flechtner <flechtne_at_uni-duesseldorf.de>
Date: 1997/04/08
Message-ID: <33494492.6655940_at_news.rz.uni-duesseldorf.de>#1/1

On Tue, 1 Apr 1997 22:43:25 GMT, Selwyn Wies <scwies_at_world.std.com> wrote:

>I need to regenerate 100's of forms. Create a script:
>
>f45gen form1 batch=y ....
>f45gen form2 ............
>.
>f45gen form500 .......
>Now how do I detect after the fact that a few forms failed to compile?
>(without checking for .fmx). I would like to output the failed forms to
>a file. (running WIN95, 16bit version of Forms4.5). I don't know of any
>utilities provided by Oracle Corp.
The following batch file worked fine for me Parameters:

1 .. Filename
2 .. Type ( FMB or MMB)
3 .. Úser-ID
4 .. Log-File

directories error, ok and pcfmx must exist.

Markus

---

_at_echo off

echo --------------------------- >>%4

echo Generating %1 %2 >>%4
echo Generating %1 %2

if %2#==FMB# goto :fmb
if %2#==MMB# goto :mmb
if %2#==fmb# goto :fmb
if %2#==mmb# goto :mmb

echo invalid type: %1 . %2 >>%4
goto :ende
:mmb
f45gen32.exe Module=%1.%2 userid=%3 module_type=menu logon=yes batch=yes generate=yes compile_all=yes
if exist %1.mmx goto :mmb_ok
goto :mmb_ko
:mmb_ok

if exist %1.mmx pkzip -m mmb_zip\%1.zip %1.%2
if exist %1.mmx move %1.mmx pcfmx32
if exist %1.err del %1.err

echo Generation Successful >>%4
goto :ende
:mmb_ko
echo Error >>%4
goto :ende
:fmb
f45gen32.exe Module=%1.%2 userid=%3 module_type=Form logon=yes batch=yes generate=yes compile_all=yes
if exist %1.fmx goto :fmb_ok
goto :fmb_ko
:fmb_ok

if exist %1.fmx pkzip -m fmb_zip\%1.zip %1.%2
if exist %1.fmx move %1.fmx pcfmx32
if exist %1.err del %1.err

echo Generation Successful >>%4
goto :ende
:fmb_ko
echo Error >>%4

:ende

echo ---------------------------- >>%4

------------------------------------------

Received on Tue Apr 08 1997 - 00:00:00 CEST