fork download
copy 
  1. 	IDENTIFICATION DIVISION.
  2. 	PROGRAM-ID. IDEONE.
  3.  
  4. 	ENVIRONMENT DIVISION.
  5.  
  6. 	DATA DIVISION.
  7. 		WORKING-STORAGE SECTION.
  8. 		A-VAR PIC S9(3)V9(2).
  9. 		B-VAR PIC S9(3)V9(2) VALUE -123.95.
  10. 		C-VAR PIC 9(3)       VALUE -100.
  11. 		D-VAR PIC 9(3)       VALUE 559.
  12.  
  13.  
  14. 	PROCEDURE DIVISION.
  15. 	*>	your code goes here
  16. 		DISPLAY "FIRST VARIABLE :"A-VAR.
  17. 		DISPLAY B-VAR.
  18. 		STOP RUN.
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
prog.cob:8: Error: Invalid level number 'A-VAR'
stdout
copy 
Standard output is empty
https://ideone.com/64L6O8
language:
Cobol (gnucobol 2.2.0)
created:
4 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!