Working in COBOL 400. I have a display file that has a size defined as DSPSIZ(24 80 *DS3). The subfile that is being displayed currently the last field going to character 75. I'm trying to add a new field that is 3 characters in length to the end starting at value 78. This should work but...
I'm new to IBM iSeries. I need to know if you can just increase the size of a field PIC X(12) to PIC X(25) or if you have to create a new field with the larger size and start using that field? I know in Unix COBOL, you had to create a new field from a filler area and use the new field. I'm...
I recently made a change to an existing DDS source to add a couple indicators. In a different SFL, there are lines with EDTCTE(5) (User defined) settings. When I compile and test the object, my indicators work fine but now the lines in the other SFL with the EDTCDE code don't display properly...
I am new to using display screen and subfiles. Is there a way to have a record in a list blink if the value of a field is negative while all other records would not blink? I know you can use DSPATR(BL) on a field but my understanding is that field would always blink in that case. I want the...
I am new to using display screen and subfiles. Is there a way to have a record in a list blink if the value of a field is negative while all other records would not blink? I know you can use DSPATR(BL) on a field but my understanding is that field would always blink in that case. I want the...
I am running COBOL on an AS400 system. The system compiles all programs using CRTCBLPGM. I am trying to start a debug session using STRDBG. I enter STRDBG and hit F4. I enter my program name and the library. When I hit enter, it isn't taking me into the screen where I can set breakpoints...
I'm new to using AS400 COBOL. I'm trying to compile a program that is already in production. I have not made any changes to the program or any of the related files (DDS, CL, etc). When I compile, I get the following error"
* 20 MSGID: LBL1106 SEVERITY: 30 SEQNBR: 002300...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.