I don't understand what this has to do with Report Writer? You also don't make it clear (to me) what you think the problem is. The only thing I can imagine is that there is a question about writing the last record in the file "buffer" when there isn't a final write and close. Is that your question/problem -or is there something else? -----Original Message----- From: Harald Arnesen [mailto:harald@xxxxxxxxxxx] Sent: Thursday, February 12, 2015 11:27 AM To: open-cobol-list@xxxxxxxxxxxxxxxxxxxxx Subject: GNU COBOL sets execute bit on file creation GNU COBOL 2.0 (and 2.1/reportwriter) is different from GNU COBOL 1.1, and in my opinion the old behaviour is correct. Consider the following program: identification division. program-id. modemask. environment division. input-output section. file-control. select modemask-file assign to "modemask.out". data division. file section. fd modemask-file. 01 modemask-out pic x(80). procedure division. main section. 10. open output modemask-file. move "Hello World" to modemask-out. write modemask-out. close modemask-file. stop run. $ cobc --version cobc (GNU Cobol) 2.0.0 Copyright (C) 2001,2002,2003,2004,2005,2006,2007 Keisuke Nishida Copyright (C) 2006-2012 Roger While Copyright (C) 2009,2010,2012,2014 Simon Sobisch This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Built Feb 11 2015 11:36:40 Packaged Jan 20 2014 07:40:53 UTC C version "4.9.1" $ $ cobc -x -free modemask.cob $ ./modemask $ ls -l modemask.out -rwxr-xr-x 1 harald harald 80 Feb 12 18:21 modemask.out $ $ rm modemask.out $ cobc --version cobc (GNU Cobol) 1.1.0 Copyright (C) 2001,2002,2003,2004,2005,2006,2007 Keisuke Nishida Copyright (C) 2006-2012 Roger While This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Built Feb 11 2015 11:35:47 Packaged Jan 20 2014 07:40:53 UTC C version "4.9.1" $ $ cobc -x -free modemask.cob $ ./modemask $ ls -l modemask.out -rw-r--r-- 1 harald harald 80 Feb 12 18:23 modemask.out $ ---------------------------------------------------------------------------- -- Dive into the World of Parallel Programming. The Go Parallel Website, sponsored by Intel and developed in partnership with Slashdot Media, is your hub for all things parallel software development, from weekly thought leadership blogs to news, videos, case studies, tutorials and more. Take a look and join the conversation now. http://goparallel.sourceforge.net/ _______________________________________________ open-cobol-list mailing list open-cobol-list@xxxxxxxxxxxxxxxxxxxxx https://lists.sourceforge.net/lists/listinfo/open-cobol-list ------------------------------------------------------------------------------ Dive into the World of Parallel Programming. The Go Parallel Website, sponsored by Intel and developed in partnership with Slashdot Media, is your hub for all things parallel software development, from weekly thought leadership blogs to news, videos, case studies, tutorials and more. Take a look and join the conversation now. http://goparallel.sourceforge.net/ _______________________________________________ open-cobol-list mailing list open-cobol-list@xxxxxxxxxxxxxxxxxxxxx https://lists.sourceforge.net/lists/listinfo/open-cobol-list
