Menu
▾
▴
Re: [Tiny-cobol-users] Tiny-cobol-users Digest, Vol 11, Issue 1
|
From: jeff k. <jef...@ya...> - 2007-04-13 19:41:21
|
With COBOL/370, the compiler option SSRANGE can force an abnormal end to processing at the point the program tries to exceed the range of the table. The failure message displays the line number and the name of the table with the problem. With this option turned off (NOSSRANGE), processing continues but you risk storage overlay problems and failures even in other programs depending on how wild the subscript value is. tin...@li... wrote: Send Tiny-cobol-users mailing list submissions to tin...@li... To subscribe or unsubscribe via the World Wide Web, visit https://lists.sourceforge.net/lists/listinfo/tiny-cobol-users or, via email, send a message with subject or body 'help' to tin...@li... You can reach the person managing the list at tin...@li... When replying, please edit your Subject line so it is more specific than "Re: Contents of Tiny-cobol-users digest..." Today's Topics: 1. occurs bug ?? (Carlinux) ---------------------------------------------------------------------- Message: 1 Date: Fri, 13 Apr 2007 08:35:08 -0300 From: Carlinux Subject: [Tiny-cobol-users] occurs bug ?? To: tiny-cobol-users Cc: "Fernando Wuthstrack - InfoCont Sistemas Integrados Ltda." Message-ID: <200...@te...> Content-Type: text/plain; charset=US-ASCII identification division. program-id . occurserr. environment division. data division. working-storage section. 01 WK-CADPRO. 03 PRO-WS. 05 PRO-WS1 OCCURS 8 TIMES. 10 AJ-PRODUTO-WS PIC 9(05). 10 AJ-QTDE-WS PIC 9(04). 10 AJ-POSNEG-WS PIC X. procedure division. inicio. ***** occurs = 8 move 10 permited, BUG??? ***** move 1010 to aj-produto-ws (10) MOVE 10 TO AJ-QTDE-WS (10) MOVE "P" to aj-posneg-ws (10) display aj-produto-ws (10) display aj-qtde-ws (10) display aj-posneg-ws (10). stop " " stop run. -- Carlucio Lopes- Cobolito 62-8415-8939 msn:car...@ho... Entenda Pirataria => http://www.carlinux.v10.com.br Compilador Cobol Free http://tinycobol.org em Portugues Porque Cobol? ==> http://www.clubecobol.com.br/cc_porque_cobol_02.asp Projeto Debian Brasil http://cdd.debian-br.org Tinycobol/Debian Gnu-Linux/Postgresql/Tcl-Tk ------------------------------ ------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys-and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV ------------------------------ _______________________________________________ Tiny-cobol-users mailing list Tin...@li... https://lists.sourceforge.net/lists/listinfo/tiny-cobol-users End of Tiny-cobol-users Digest, Vol 11, Issue 1 *********************************************** --------------------------------- Ahhh...imagining that irresistible "new car" smell? Check outnew cars at Yahoo! Autos. |
