running COBOL program error - mfcobol, CALL ... RETURNING -
i got problem simple cobol phone call - returning test program.
i using micro focus cobol.
here 2 codes.
***************** calling programme identification division. program-id. callreturning. environment division. info division. working-storage section. 01 va pic s9(8) usage display. 01 vb pic s9(8) usage display. 01 vc pic 9(4) usage display value 0. procedure division. move 1 va. move 2 vb. move 3 vc. phone call "add_two" using va vb returning vc. * display va vb vc. exit program. end programme callreturning. *********called programme identification division. program-id. add_two. environment division. info division. linkage section. 01 parm_a pic s9(8) usage display. 01 parm_b pic s9(8) usage display. 01 parm_c pic 9(4) usage display value 0. procedure partition using parm_a parm_b returning parm_c. move 3 parm_c. * add together parm_a parm_b giving parm_c. goback. end programme add_two. calling programme calls sec programme using returing value.
but when compile both programme , run, error happens.
error code: 114, pc=0, call=1, seg=0 114 effort access item beyond bounds of memory (signal 11)
did create wrong code? or other problem? please help me :)
i testing 'returning' phrase
your programme compiles , works fine if rid of returning statement.
runtime-error call cobol error-code microfocus
No comments:
Post a Comment