Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Equivalent attribute needed in COBOL for Telon(output-blank-

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
Karthigaiselvan

New User


Joined: 11 Dec 2006
Posts: 35
Location: India

PostPosted: Thu Apr 26, 2007 3:15 pm    Post subject: Equivalent attribute needed in COBOL for Telon(output-blank-
Reply with quote

Hi,

We are converting an Telon-IMS DC application to COBOL - IMS DC application. The screens are coded using MFS. All the Telon Input and output merge routines are replaced with COBOL logic.

In the converted COBOL-IMS DC application the 'highlighted dashes' are not appearing on the screen

eg: Name: _______

In telon the attribut fields are as follows:

Code:
05 ATTRIBUTE-VARIABLES.
   10 CURSOR-ATTR          PIC X(2) VALUE '{A'.
   10 ERROR-ATTR           PIC X(2) VALUE '{I'.
   10 OK-ATTR              PIC X(2) VALUE ' A'.
   10 PROT-ATTR            PIC X(2) VALUE ' 1'.
   10 OUTPUT-ATTR          PIC X(2) VALUE ' 0'.
   10 OUTPUT-BLANK-ATTR    PIC X(2) VALUE ' 4'.
   10 BLANK-ATTR           PIC X(2) VALUE ' 4'.
   10 CURSOR-BLANK-ATTR    PIC X(2) VALUE '{E'.
   10 INPUT-BLANK-ATTR     PIC X(2) VALUE ' E'.
   10 OUTPUT-HIGH-ATTR     PIC X(2) VALUE ' 8'.
   10 INPUT-HIGH-ATTR      PIC X(2) VALUE ' I'.

What will be the equivalent attribute for OUTPUT-BLANK-ATTR in COBOL.

Please help if there is anyother approach.

Thanks in Advance
Back to top
View user's profile Send private message

Karthigaiselvan

New User


Joined: 11 Dec 2006
Posts: 35
Location: India

PostPosted: Thu Apr 26, 2007 3:35 pm    Post subject: Help needed in converting TELON-IMS DC to COBOL - IMS DC
Reply with quote

Hi,

We are converting an Telon-IMS DC application to COBOL - IMS DC application. The screens are coded using MFS. All the Telon Input and output merge routines are replaced with COBOL logic.

In the converted COBOL-IMS DC application the 'highlighted dashes' are not appearing on the screen

eg: Name: _______

In telon the attribute fields are as follows:

Code:
05 ATTRIBUTE-VARIABLES.
10 CURSOR-ATTR PIC X(2) VALUE '{A'.
10 ERROR-ATTR PIC X(2) VALUE '{I'.
10 OK-ATTR PIC X(2) VALUE ' A'.
10 PROT-ATTR PIC X(2) VALUE ' 1'.
10 OUTPUT-ATTR PIC X(2) VALUE ' 0'.
10 OUTPUT-BLANK-ATTR PIC X(2) VALUE ' 4'.
10 BLANK-ATTR PIC X(2) VALUE ' 4'.
10 CURSOR-BLANK-ATTR PIC X(2) VALUE '{E'.
10 INPUT-BLANK-ATTR PIC X(2) VALUE ' E'.
10 OUTPUT-HIGH-ATTR PIC X(2) VALUE ' 8'.
10 INPUT-HIGH-ATTR PIC X(2) VALUE ' I'.

What will be the equivalent attribute for OUTPUT-BLANK-ATTR in COBOL.

Please help if there is any other approach.

Thanks in Advance
Back to top
View user's profile Send private message
ashwinreddy

Active User


Joined: 16 Sep 2004
Posts: 106
Location: Hyderabad

PostPosted: Fri Apr 27, 2007 2:58 pm    Post subject:
Reply with quote

Hi,

As i haven't worked much on the IMS DC, but worked on Telon extensively. I can explain you about the concept behind that attribute.

As OUTPUT-BLANK-ATTR is used to Protect with blanks.

I know this can be done in IMS DC while creating the MFS screen by giving in EATTR.

But your scenario is that the field is declared as Input-Output and if no data is entered it should be Protected and highlighted.

I can give you one suggestion if you have found out the equalent for PROT-ATTR then you can use it.

As both ( OUTPUT-BLANK-ATTR and PROT-ATTR) serve for same purpose.


Cheers
Ashwin
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Incorrect output when trying to add n... monica1 PL/I & Assembler 10 Fri Jan 13, 2017 5:02 pm
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us