IBM Mainframe Forum

by **lxw039** » Tue Nov 18, 2008 2:51 am

anybody know the mainframe cobol coding rule:
the 15th column is indicator,2--7 column is sequence number, 7--14 column as a comments area
in my IBM 3270 terminal, why is it not the same as cobol standard format? maybe somewhere
we can modify that as a standard format, thanks.

by **dick scherrer** » Tue Nov 18, 2008 3:51 am

Hello,

the 15th column is indicator,2--7 column is sequence number, 7--14 column as a comments area

I do not understand. Col 1-6 is seq, col 7 is comment indicator, col 8 is area-a, col 12 is area-b.

It sounds as though you are describing some custom setup defined to your emulator or you are using some pre-defined panels online.

If you use copy/paste (don't edit anything), and use the "Code" tag, you can show us what you are seeing. Use Preview to see how your post will appear to the forum and when you are satisfied with how your post looks, Submit. Using the Code tag will make your post more readable as well as preserve alignment.

Please do not try to use a screen capture image. They typically make a mess and are deleted.

by **lxw039** » Tue Nov 18, 2008 7:35 pm

this is my screen, why like that?

Select all

File Edit Edit_Settings Menu Utilities Compilers Test Help

EDIT MP.LXW039.SOURCE(CALC1000) - 01.33 Columns 00001 00072
****** ***************************** Top of Data ******************************
==MSG> -Warning- The UNDO command is not available until you change
==MSG> your edit profile using the command RECOVERY ON.
000001 IDENTIFICATION DIVISION.
000002 *
000003 PROGRAM-ID. CALC1000.
000004 *
000005 ENVIRONMENT DIVISION.
000006 *
000007 INPUT-OUTPUT SECTION.
000008 *
000009 DATA DIVISION.
000010 *
000011 FILE SECTION.
000012 *
000013 WORKING-STORAGE SECTION.
000014 *
000015 77 END-OF-SESSION-SWITCH PIC X VALUE "N".
Command ===> Scroll ===> CSR
F1=Help F2=Split F3=Exit F5=Rfind F6=Rchange F7=Up
F8=Down F9=Swap F10=Left F11=Right F12=Cancel

by **dick scherrer** » Wed Nov 19, 2008 3:28 am

Hello,

That is the normal way for an "edit" screen to appear.

The numbers ln the left are not part of the source. Positions 1-6 in the data portion of the screen are the sequence numbers the compiler will see. Note that the editor is working on columns 1 thru 72 - which is again normal.

FWIW, you probably want to enter "RECOVERY ON" as well. This will save a copy of your work if your session is ended and you have not saved what you have edited. When you come back in, you have the choice to recover or discard the unsaved editing.

by **lxw039** » Mon Nov 24, 2008 11:42 pm

thank you very much!

by **dick scherrer** » Tue Nov 25, 2008 2:48 am

You're welcome

d

IBM Mainframe Forum

can i modify coding rules?

can i modify coding rules?

Re: can i modify coding rules?

Re: can i modify coding rules?

Re: can i modify coding rules?

Re: can i modify coding rules?

Re: can i modify coding rules?