|
View previous topic :: View next topic
|
| Author |
Message |
Karthigaiselvan
New User
Joined: 11 Dec 2006
Posts: 35
Location: India
|
|
|
|
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 |
|
 |
Karthigaiselvan
New User
Joined: 11 Dec 2006
Posts: 35
Location: India
|
|
|
|
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 |
|
|
ashwinreddy
Active User
.jpg)
Joined: 16 Sep 2004
Posts: 106
Location: Hyderabad
|
|
|
|
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 |
|
|
|
|
