Search results for query: *

I have a copybook containing all (current) languages as defined by the standard ISO639-2 as conditional names. All fine at well but to my surprise a program using this copybook does not compile using fujitsu COBOL85 version V30L10. The compile step produces the following error message...

For those interested... It is not uncommon to use the timestamp as a unique (log) registration field. Of course, any timestamp field has a limited accuracy! The chances on duplicates is real and often high! The standard 'FUNCTION CURRENT-TIME' is by no means sufficient. This current...

I myself am not a great advert of using 77 level data definitions. It cannot be re-defined, renamed or grouped. But sometimes these are exactly the characteristics that you want! Example: Program A calls B, B calls C, C calls D, D calls...ad infinitum Suppose an exception occurs in program...

Any body interested in the following? Free COBOL source internal table sort routine. Sorts fields: 1. alphanumeric ( PIC x(..) ) 2. binary unsigned ( PIC 9(..) BINARY ) 3. binary signed ( PIC s9(..) BINARY ) 4. packed-decimal ( PIC 9(..) or s9(..) PACKED-DECIMAL) 5. floating-point short...

How to implement methods in COBOL! In OOCOBOL this, of course, is not a problem! But what do we do when we don't have OOCOBOL? Note: Keep in mind that each method can and will use different sets of linkage parameters! And the program will abend when more parameters (more 01 levels) are...

For discussion following see following forum link containing source code: Source code: http://mvshelp.com/cgi-bin/ubb6/ultimatebb.cgi?ubb=get_topic;f=1;t=003263 Don't be intimidated by this source code! The techniques used in the code above are uncommon to most COBOL programmers. It is...

Question: Any bright suggestions for handling platform dependent codes? For example: ---------------- I see some sources using hex values (e.g. for carriage return). This is great but there are (at least 2) distinguish differently coding schemes, namely: ASCII EBCDIC (and of course there is...

When and how to use static or dynamic calls! Information related to the discussion following: - The main program with a static call is called: STATICCALL. - The main program with a dynamic call is called: DYNAMICCALL. - The called (sub)program is called: RETURNLOWEST. - RETURNLOWEST takes 2...

PROGRAM CHALLENGE: Can somebody shorten the following algorithm? (source program included) Note: with the emphasis on 'shorten' or 'shorter' or 'less complex'. I already know you can do this in 10,000 different ways. I just want a smarter algorithm (in COBOL-85 of course!). Restriction: Only...

The truth about the COMP-1 and COMP-2 floating-point fields ...well... to be more precise the truth about COMP-1 and COMP-2 fields in the IBM COBOL environment. All computational fields (COMP-x fields) are non-standard fields, they are vendor defined implementations. So this explanation only...