Re: Problem with creating empty file

Bernard Moreton <[email protected]> Thu, 21 Mar 2013 15:56:59 +0000
Newsgroups	gmane.comp.lang.4gl.aubit.general
Organization	TNAUK
Message-ID	<[email protected]>
Is it that opening with Notepad implies an MS Windows environment, but the 'cat 
/dev/null' is a *nix command?  I may be completly up a garden path ...

B.


Bernard Moreton
IT Director, National Talking Newspapers and Magazines (TNAUK)
Charity registered in the UK 293656

DDI: 01 435 869 316

On 21/03/2013 15:07, Mike Aubury wrote:
> I dont know then - it works perfectly here :(
>
>
>
>
> On 21 March 2013 15:06, Daniel Kroker <[email protected] <mailto:[email protected]>> wrote:
>
>     Nope the file is not in the DBPATH.
>
>     in our main programm the variable "file" has a absolut path like
>     /bla/blubb/dsdfsdf.txt
>
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ echo $DBPATH
>     /v/MAIN/schema/
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ vi
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ ls -la /v/MAIN/schema/
>     total 2720
>     drwxrwxrwx 7 dbu  users    4096 Mar 16 19:40 .
>     drwxrwxrwx 8 as   users   12288 Feb 14 08:08 ..
>     drwxrwxrwx 2 ans  users    4096 May 20  2011 backup
>     drwxrwxrwx 2 ms   users    4096 Jan 26  2012 backup.ms <http://backup.ms>
>     drwxrwxrwx 2 ans  users    4096 Aug  1  2011 backup_01_08_2011
>     drwxrwxrwx 2 ans  users    4096 Jan 26  2012 backup_2012_01_26
>     drwxrwxrwx 2 ans  users    4096 Feb 26 09:56 backup_ans
>     -rwxrwxrwx 1 as   users 1242056 Mar 16 19:40 im_ex.schidx
>     -rw-rw-rw- 1 root root       36 Feb 26 09:56 trace_adbschema_4646.txt
>     -rwxrwxrwx 1 as   users  239673 Mar 16 19:40 vmain_vdb.schema
>     -rwxrwxrwx 1 as   users 1242056 Mar 16 19:40 vmain_vdb.schidx
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ ls -la /v/MAIN/schema/backup
>     total 1120
>     drwxrwxrwx 2 ans users   4096 May 20  2011 .
>     drwxrwxrwx 7 dbu users   4096 Mar 16 19:40 ..
>     -rwxrwxrwx 1 ans users 446180 May  4  2011 im_ex.schidx
>     -rwxrwxrwx 1 ans users 231127 May  4  2011 vmain_vdb.schema
>     -rwxrwxrwx 1 ans users 446180 May  4  2011 vmain_vdb.schidx
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ ls -la
>     /v/MAIN/schema/backup.ms/ <http://backup.ms/>
>     total 1160
>     drwxrwxrwx 2 ms  users   4096 Jan 26  2012 .
>     drwxrwxrwx 7 dbu users   4096 Mar 16 19:40 ..
>     -rwxrwxr-x 1 ans users 459884 Jan 26  2012 im_ex.schidx
>     -rwxrwxr-x 1 ans users 238508 Jan 26  2012 vmain_vdb.schema
>     -rwxrwxr-x 1 ans users 459884 Jan 26  2012 vmain_vdb.schidx
>     vm-entwicklung26: /e/dk/MAIN/VENTAS/7.1/4gl $ ls -la
>     /v/MAIN/schema/backup_01_08_2011/
>     total 1148
>     drwxrwxrwx 2 ans users   4096 Aug  1  2011 .
>     drwxrwxrwx 7 dbu users   4096 Mar 16 19:40 ..
>     -rwxrwxrwx 1 ans users 457092 Jun 23  2011 im_ex.schidx
>     -rwxrwxrwx 1 ans users 236880 Jun 23  2011 vmain_vdb.schema
>     -rwxrwxrwx 1 ans users 457092 Jun 23  2011 vmain_vdb.schidx
>
>
>
>     Am 21.03.2013 15 <tel:21.03.2013%2015>:48, schrieb Mike Aubury:
>>     Nope - still works for me...
>>
>>
>>     Can you have a look and see if there are any other files call text-txt.txt
>>     in your $DBPATH ?
>>
>>     It will be using DBPATH to find the file - so it might not be the one you
>>     think it is...
>>
>>
>>
>>     On 21 March 2013 14:42, Daniel Kroker <[email protected] <mailto:[email protected]>>
>>     wrote:
>>
>>         Perhabs it is a problem with the locale?
>>
>>         We have:
>>
>>         <ENV NAME="DB_LOCALE" VALUE="de_de.PC-Latin-1"/>
>>
>>         <ENV NAME="LANG" VALUE="de_DE.utf8"/>
>>
>>
>>         Complete output:
>>
>>
>>         << <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <PROGRAMSTARTUP PROGRAMNAME="./m" ID="3">
>>
>>         <ENV NAME="DBPATH"
>>         VALUE=":/v/MAIN/schema/:/t/compiler/a4gl/tools:/home/dk/aubit4gl/tools:/t/compiler/a4gl/incl:/home/dk/aubit4gl/incl:."/>
>>
>>         <ENV NAME="DBDATE" VALUE="DMY4."/>
>>
>>         <ENV NAME="DBMONEY" VALUE=","/>
>>
>>         <ENV NAME="A4GL_NUMERIC" VALUE=","/>
>>
>>         <ENV NAME="DB_LOCALE" VALUE="de_de.PC-Latin-1"/>
>>
>>         <ENV NAME="LANG" VALUE="de_DE.utf8"/>
>>
>>         <ENV NAME="A4GL_VERSION" VALUE="1.2.33"/>
>>
>>         <ENV NAME="XML_VERSION" VALUE="1.3"/>
>>
>>         </PROGRAMSTARTUP>
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <RUNINFO MODE="1" CMD="cat /dev/null &gt; text-txt.txt" RUNCNT="1"
>>         STARTSTOP="1" />
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <RUNINFO MODE="1" CMD="cat /dev/null &gt; text-txt.txt" RUNCNT="1"
>>         STARTSTOP="0" />
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <FILE NAME="text-txt.txt">mFG/t+j0BggQ</FILE>
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <FRONTCALL MODULE="INTERNAL" NAME="ui.vdc.execute"
>>         EXPECT="1"><VS><V>text-txt.txt</V></VS></FRONTCALL>
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <WAITFOREVENT/>
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>         >> <TRIGGERED ID="-123">
>>
>>         <SVS/>
>>
>>         </TRIGGERED>
>>
>>         <<
>>
>>         <ENVELOPE ID="3" PID="18044">
>>
>>         <COMMANDS>
>>
>>         <PROGRAMSTOP EXITCODE="0" ID="3">
>>
>>         </PROGRAMSTOP>
>>
>>         </COMMANDS>
>>
>>         </ENVELOPE>
>>
>>
>>         Am 21.03.2013 15 <tel:21.03.2013%2015>:28, schrieb Mike Aubury:
>>>         I do not get that here..
>>>         Running that program I get :
>>>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <PROGRAMSTARTUP PROGRAMNAME="./x1" ID="0">
>>>         <ENV NAME="DBPATH"
>>>         VALUE=":/home/aubit4gl/aubit4glsrc/tools:/home/aubit4gl/aubit4gl/tools:/home/aubit4gl/aubit4glsrc/incl:/home/aubit4gl/aubit4gl/aubit4gl/incl:."/>
>>>         <ENV NAME="DBDATE" VALUE="dmy4/"/>
>>>         <ENV NAME="DBMONEY" VALUE="#."/>
>>>         <ENV NAME="A4GL_NUMERIC" VALUE=""/>
>>>         <ENV NAME="DB_LOCALE" VALUE=""/>
>>>         <ENV NAME="LANG" VALUE=""/>
>>>         <ENV NAME="A4GL_VERSION" VALUE="1.2.33"/>
>>>         <ENV NAME="XML_VERSION" VALUE="1.3"/>
>>>         </PROGRAMSTARTUP>
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <RUNINFO MODE="1" CMD="cat /dev/null &gt; text-txt.txt" RUNCNT="1"
>>>         STARTSTOP="1" />
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <RUNINFO MODE="1" CMD="cat /dev/null &gt; text-txt.txt" RUNCNT="1"
>>>         STARTSTOP="0" />
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <FILE NAME="text-txt.txt"></FILE>
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <FRONTCALL MODULE="INTERNAL" NAME="ui.vdc.execute"
>>>         EXPECT="1"><VS><V>text-txt.txt</V></VS></FRONTCALL>
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         <ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <WAITFOREVENT/>
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>         ^C<ENVELOPE ID="1" PID="7615">
>>>         <COMMANDS>
>>>         <PROGRAMSTOP EXITCODE="0" ID="0">
>>>         </PROGRAMSTOP>
>>>         </COMMANDS>
>>>         </ENVELOPE>
>>>
>>>
>>>
>>>         (This is from the command line with A4GL_UI=XML, but no AFGLSERVER
>>>         set - so it just outputs to the standard output)
>>>
>>>
>>>         On 21 March 2013 13:27, Daniel Kroker <[email protected]
>>>         <mailto:[email protected]>> wrote:
>>>
>>>             Hello,
>>>
>>>             Example:
>>>
>>>             MAIN
>>>             DEFINE file CHAR(200)
>>>             DEFINE runtxt CHAR(500)
>>>             DEFINE l_errorval CHAR(500)
>>>
>>>             LET file = "text-txt.txt"
>>>
>>>             LET runtxt = "cat /dev/null > ", file
>>>             RUN runtxt CLIPPED
>>>             RETURNING l_errorval
>>>             IF aclfgl_sendfile_to_ui(file CLIPPED) THEN END IF
>>>             IF ui.vdc.execute(file CLIPPED) THEN END IF
>>>
>>>             END MAIN
>>>
>>>
>>>             In this example text-txt.txt is empty and were sent to the client.
>>>             Over the Protocoll i can see:
>>>
>>>             <COMMANDS>
>>>
>>>             <FILE NAME="text-txt.txt">mKG2t+j0BggQ</FILE>
>>>
>>>             </COMMANDS>
>>>
>>>             </ENVELOPE>
>>>
>>>
>>>             If i open the file with Notepad the file has the text: "˜ ½·èô
>>>             " but i
>>>             dont know why.
>>>             What is the problem with RUN and cat ?
>>>
>>>
>>>             --
>>>             Mit freundlichen Grüßen
>>>
>>>             i.A. Daniel kroker
>>>             VENTAS AG
>>>
>>>             VENTAS AG
>>>             Mexikoring 29
>>>             D-22297 Hamburg
>>>             Germany
>>>
>>>             [email protected] <mailto:[email protected]>
>>>             www.ventas.de <http://www.ventas.de>
>>>
>>>             Tel +49-40-32 33 34-0 <tel:%2B49-40-32%2033%2034-0>
>>>             Fax +49-40-32 33 34-38 <tel:%2B49-40-32%2033%2034-38>
>>>
>>>             VENTAS AG
>>>             Firmensitz: Mexikoring 29, 22297 Hamburg, Deutschland
>>>             Registergericht: Hamburg, HRB 80297
>>>             Ust.IdNr.: DE118686712
>>>             Vorstandsvorsitzender: Dipl.Ing. Alain Siverly
>>>             Aufsichtsratsvorsitzender: Dr. Olaf Rehme
>>>
>>>
>>>             ------------------------------------------------------------------------------
>>>             Everyone hates slow websites. So do we.
>>>             Make your web apps faster with AppDynamics
>>>             Download AppDynamics Lite for free today:
>>>             http://p.sf.net/sfu/appdyn_d2d_mar
>>>             _______________________________________________
>>>             Aubit4gl-discuss mailing list
>>>             [email protected]
>>>             <mailto:[email protected]>
>>>             https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>>>
>>>
>>
>>
>>         --
>>         Mit freundlichen Grüßen
>>
>>         i.A. Daniel kroker
>>         VENTAS AG
>>
>>         VENTAS AG
>>         Mexikoring 29
>>         D-22297 Hamburg
>>         Germany
>>
>>         [email protected]  <mailto:[email protected]>
>>         www.ventas.de  <http://www.ventas.de>
>>
>>         Tel+49-40-32 33 34-0  <tel:%2B49-40-32%2033%2034-0>
>>         Fax+49-40-32 33 34-38  <tel:%2B49-40-32%2033%2034-38>
>>
>>         VENTAS AG
>>         Firmensitz: Mexikoring 29, 22297 Hamburg, Deutschland
>>         Registergericht: Hamburg, HRB 80297
>>         Ust.IdNr.: DE118686712
>>         Vorstandsvorsitzender: Dipl.Ing. Alain Siverly
>>         Aufsichtsratsvorsitzender: Dr. Olaf Rehme
>>
>>
>>         ------------------------------------------------------------------------------
>>         Everyone hates slow websites. So do we.
>>         Make your web apps faster with AppDynamics
>>         Download AppDynamics Lite for free today:
>>         http://p.sf.net/sfu/appdyn_d2d_mar
>>         _______________________________________________
>>         Aubit4gl-discuss mailing list
>>         [email protected]
>>         <mailto:[email protected]>
>>         https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>>
>>
>
>
>     --
>     Mit freundlichen Grüßen
>
>     i.A. Daniel kroker
>     VENTAS AG
>
>     VENTAS AG
>     Mexikoring 29
>     D-22297 Hamburg
>     Germany
>
>     [email protected]  <mailto:[email protected]>
>     www.ventas.de  <http://www.ventas.de>
>
>     Tel+49-40-32 33 34-0  <tel:%2B49-40-32%2033%2034-0>
>     Fax+49-40-32 33 34-38  <tel:%2B49-40-32%2033%2034-38>
>
>     VENTAS AG
>     Firmensitz: Mexikoring 29, 22297 Hamburg, Deutschland
>     Registergericht: Hamburg, HRB 80297
>     Ust.IdNr.: DE118686712
>     Vorstandsvorsitzender: Dipl.Ing. Alain Siverly
>     Aufsichtsratsvorsitzender: Dr. Olaf Rehme
>
>
>     ------------------------------------------------------------------------------
>     Everyone hates slow websites. So do we.
>     Make your web apps faster with AppDynamics
>     Download AppDynamics Lite for free today:
>     http://p.sf.net/sfu/appdyn_d2d_mar
>     _______________________________________________
>     Aubit4gl-discuss mailing list
>     [email protected]
>     <mailto:[email protected]>
>     https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>
>
>
>
> ------------------------------------------------------------------------------
> Everyone hates slow websites. So do we.
> Make your web apps faster with AppDynamics
> Download AppDynamics Lite for free today:
> http://p.sf.net/sfu/appdyn_d2d_mar
>
>
>
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>

------------------------------------------------------------------------------
Everyone hates slow websites. So do we.
Make your web apps faster with AppDynamics
Download AppDynamics Lite for free today:
http://p.sf.net/sfu/appdyn_d2d_mar