COBOL
-
yep.
77 try-mid value 'n' pic x.
88 try-mid-n value 'n'.
88 try-mid-y value 'y'.oh, you mean:
bool try_mid;
?
That's one example of their use. I used to use them a lot for "bit-wise" enumeration.
15 ws-field-attr pic 9 comp.
88 underscore value 1.
88 blink value 2.
88 protected value 4.And in some code there would be
move hdr-field-def to ws-field-attr.
if underscore Perform AddUnderscoreEscapeToBuffer.
if bink Perform AddBlinkEscapeToBuffer.
if protected Perform AddProtectedEscapeToBuffer.They allowed for pretty imaginative ways of writing truly readable code. :) [Edit] That code is probably not quite right, but it's the best I can do from memory since I'm only a couple of years away from retirement. :)
Chris Meech I am Canadian. [heard in a local bar] In theory there is no difference between theory and practice. In practice there is. [Yogi Berra] posting about Crystal Reports here is like discussing gay marriage on a catholic church’s website.[Nishant Sivakumar]
-
'Probably' interfacing to a COBOL system 'somewhere'. Our app communicates to everything via FIX and so for all I know there's a COBOL system out there, somewhere, talking ot us. :~
Panic, Chaos, Destruction. My work here is done. Drink. Get drunk. Fall over - P O'H OK, I will win to day or my name isn't Ethel Crudacre! - DD Ethel Crudacre I cannot live by bread alone. Bacon and ketchup are needed as well. - Trollslayer Have a bit more patience with newbies. Of course some of them act dumb - they're often *students*, for heaven's sake - Terry Pratchett
Same here... I think our AS/400 accounting system is COBOL, but I reach it through HTTP/XML queries... But back in the 90s, I did spend part of a summer teaching an old COBOL programmer transition to VB...
Proud to have finally moved to the A-Ark. Which one are you in?
Author of the Guardians Saga (Sci-Fi/Fantasy novels) -
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
-
Not me, but I personally know five people who actively develop for IBM mainframes with languages such as COBOL, PL/I and Rexx. Three of them are at Verizon, one is a consultant and one works in a Swiss bank. I also know a guy wo was a RPG developer until recently and then decided to become a real estate agent :)
-
Almost as bad as the vascetomy, but hey that's another story ;)
Software Kinetics Wear a hard hat it's under construction
Metro RSSWell if the vasectomy broke your heart, I'd strongly urge you to seek alternate medical services. I'm no doctor, but I'm pretty sure that's not how it's supposed to work.
¡El diablo está en mis pantalones! ¡Mire, mire! SELECT * FROM User WHERE Clue > 0 0 rows returned Save an Orange - Use the VCF! Personal 3D projects Just Say No to Web 2 Point Blow
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
I just met a guy who is working for a company that wrote an application that ports COBOL code to Azure!!! Talk about working the full spectrum.
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
Eeewww! I tried COBOL exactly once, in college. Ten lines (cards) of code, 106 lines of preamble, 157 error messages, and not one of the computer center experts could find a single error in my program. Never again... X|
Will Rogers never met me.
-
My first programming gig was COBOL for a Sunny Canadian insurance company, Haven't touched it since though.
Henry Minute Do not read medical books! You could die of a misprint. - Mark Twain Girl: (staring) "Why do you need an icy cucumber?" “I want to report a fraud. The government is lying to us all.” I wouldn't let CG touch my Abacus! When you're wrestling a gorilla, you don't stop when you're tired, you stop when the gorilla is.
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
And just today a coworker that somehow shares department with us (she is administrative staff, administrative as in "secretary") got all excited because after 2 years of requesting career change, she is finally transferred to dev, guess in charge of what? you got it, ticket support for the old-as-dinosaurs system which is written in COBOL. Of course, she was all excited about it and came running to tell us...to be brought to earth by our straight faces telling her, COBOL has been dead since 20 years ago... Sadly enough, some of the guys of the corner, to whom no one talks to, grabbed her and say they are the COBOL experts in the company...as they still develop and maintain systems, and that they'd be her teachers... :wtf:
"Whether you think you can, or you think you can't--either way, you are right." — Henry Ford "When I waste my time, I only use the best, Code Project...don't leave home without it." — Slacker007
-
Eeewww! I tried COBOL exactly once, in college. Ten lines (cards) of code, 106 lines of preamble, 157 error messages, and not one of the computer center experts could find a single error in my program. Never again... X|
Will Rogers never met me.
You either left out a period (one of my missing '.'s generated over 1000 error messages) or maybe a blank card between the source code and the link instructions (done that too - CDC 3150 mainframe) :rolleyes:
Steve _________________ I C(++) therefore I am
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
Received a listing last week for an opening at a large Canadian bank - they want essentially 6+ years exp in 'mainframe MVS, COBOL, JCL Utilities, and databases such as DB 2 and IMS'. For a 4 month contract. :| Not quite my skill set - will pass on to anyone who wants. and yeah I did a little COBOL in school - and actually liked it kinda - don't tell anybuddy ok?
This sig no verb.
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
Chris Maunder wrote:
So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
My company has a few products that use a mixture of COBOL and RPG.
"One man's wage rise is another man's price increase." - Harold Wilson
"Fireproof doesn't mean the fire will never come. It means when the fire comes that you will be able to withstand it." - Michael Simmons
"Some people are making such thorough preparation for rainy days that they aren't enjoying today's sunshine." - William Feather
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
-
You either left out a period (one of my missing '.'s generated over 1000 error messages) or maybe a blank card between the source code and the link instructions (done that too - CDC 3150 mainframe) :rolleyes:
Steve _________________ I C(++) therefore I am
Yup, it was a CDC, though I don't recall the exact model, as I wasn't a member of the priestly caste, and was never admitted to the holy sanctum. Circa 1975 - 1977 would be about right for that model, I think.
Will Rogers never met me.
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
I am still actively coding COBOL.
-
Chris Meech's post[^] piqued my interest because I've been talking to a few guys lately, on the quiet so as not to bust their cover, who do COBOL. So it got me wondering: who's doing COBOL directly, or at the least, interfacing with COBOL modules or back end systems?
cheers, Chris Maunder The Code Project | Co-founder Microsoft C++ MVP
No, I decided to go down the disclosure route - I made mention of my COBOL heritage in my profile. Sad reality is that if I ever get another commercial development gig it will be COBOL.
Ger
-
Pah! I was developing software on the System 36 and 38 when the AS/400 was still project Silverlake!! Dinosaurs? Proto-bloody-zoa mate!
MVVM# - See how I did MVVM my way ___________________________________________ Man, you're a god. - walterhevedeich 26/05/2011 .\\axxx (That's an 'M')
-
Well if the vasectomy broke your heart, I'd strongly urge you to seek alternate medical services. I'm no doctor, but I'm pretty sure that's not how it's supposed to work.
¡El diablo está en mis pantalones! ¡Mire, mire! SELECT * FROM User WHERE Clue > 0 0 rows returned Save an Orange - Use the VCF! Personal 3D projects Just Say No to Web 2 Point Blow
Jim Crafton wrote:
Well if the vasectomy broke your heart
Hardly
Jim Crafton wrote:
I'd strongly urge you to seek alternate medical services.
Too late, jobs done
Jim Crafton wrote:
I'm no doctor, but I'm pretty sure that's not how it's supposed to work.
Wasn't the most pleasent of everprience whilst being awake during the op.
Software Kinetics Wear a hard hat it's under construction
Metro RSS -
Same here... I think our AS/400 accounting system is COBOL, but I reach it through HTTP/XML queries... But back in the 90s, I did spend part of a summer teaching an old COBOL programmer transition to VB...
Proud to have finally moved to the A-Ark. Which one are you in?
Author of the Guardians Saga (Sci-Fi/Fantasy novels)It could be worse, I had to port an RPG program to C once, now that was painful.