Search results for query: *

This topic was brought up in another forum. Here's 2 possible approaches. Any other suggestion out there? Regards, Jack. The first will "flip" one specific bit in a specified byte. The other will scan 8 bytes of data and determine the "on/off" status of each bit in the...

Hi Gang, I’m asking this because I don’t have access to a mainframe OS390 environment and I‘m hoping someone will be kind enough to offer help. Consider the following UNSTRING stmt: UNSTRING IN-FLD DELIMITED BY ‘AQ’ OR ‘A’ OR ‘B’...

Hi BHL, Tried to use your orig thread, but kept getting error. Sooo.. My 2c: 01 test-fld. 05 50-byte-fld pic x(050). 05 filler pic x(001) value x'FF'. 01 pos pic s9(004). perform with test after varying pos from +1 by +1 until test-fld(pos:1) = '*'...

Hi Clive, Yeah, you can prefix your code with [*code] and suffix it with [*/code]. Don't type the "*", I use it here so that it will be printed. Don't worry about how the code looks when you cut & paste it into the msg box, the [*code] will make it right. To see how it will look when...

Hi All, I could use some help. I'm a COBOL pgmr who has to create a file in "excel format". Where could I go to get this kind of info? Any thoughts and/or suggestions would be greatly appreciated. Thanx, Jack.

Claude, This formatted better: EVAL WS-AGE ALSO TRUE ALSO FALSE WHEN 18 THRU 25 ALSO WS-WT > 200 ALSO MALE PERFORM 1000-ENROLL-IN-FBALL-PGM END-EVAL EVAL TRUE ALSO TRUE WHEN WS-AGE < 18 ALSO WS-AGE > 25 WHEN WS-WT...

This problem represents a major construct in business programming, so the time you devote to this is well spent. Input data is usually presented to a pgm in some sort sequence, e.g: file acct#1 product1 date1 date2 etc. product2 date1 date3 date4...