Skip to main content

Hello (again).

I have a program that reads records in a .txt file. Depending on the content of that file
it will determine what program is to be CALLed next. The records are read into a structure in 
WORKING-STORAGE SECTION. The content of the txt file is written manually.

http://puu.sh/hhyKO/3210509123.png

If someone is very interested: http://pastebin.com/bjWsUUtN

The CALLed program displays "hello"... The main issue is that TBN01002T
be called. I have displayed f1-prg and it displayes TBN01002T, so I don't see how
TBN01002T could be a problem. Any help would be very appreciated!

- Thomas


#COBOL
#call
#EVALUATE

Hello (again).

I have a program that reads records in a .txt file. Depending on the content of that file
it will determine what program is to be CALLed next. The records are read into a structure in 
WORKING-STORAGE SECTION. The content of the txt file is written manually.

http://puu.sh/hhyKO/3210509123.png

If someone is very interested: http://pastebin.com/bjWsUUtN

The CALLed program displays "hello"... The main issue is that TBN01002T
be called. I have displayed f1-prg and it displayes TBN01002T, so I don't see how
TBN01002T could be a problem. Any help would be very appreciated!

- Thomas


#COBOL
#call
#EVALUATE

Hi Thomas,

It appears you have F1-PRG (the field you're testing in the EVALUATE) defined as PIC X(8), yet the value you are testing for is 9 characters. So, at best, F1-PRG may contain "TBN01002", but will never contain the "TBN01002T" you are testing for. Either change the definition of F1-PRG to match the true field size, or change the value you are testing for in the EVALUATE to be 8 characters.

Hello (again).

I have a program that reads records in a .txt file. Depending on the content of that file
it will determine what program is to be CALLed next. The records are read into a structure in 
WORKING-STORAGE SECTION. The content of the txt file is written manually.

http://puu.sh/hhyKO/3210509123.png

If someone is very interested: http://pastebin.com/bjWsUUtN

The CALLed program displays "hello"... The main issue is that TBN01002T
be called. I have displayed f1-prg and it displayes TBN01002T, so I don't see how
TBN01002T could be a problem. Any help would be very appreciated!

- Thomas


#COBOL
#call
#EVALUATE

Oh, why didn't I see that? Thank you!

- Thomas

Terms & ConditionsAccessibility statement