Coding Horrors: You can gather all your technical debt into one easy framework!

The Something Awful Forums > Discussion > Serious Hardware/Software Crap > The Cavern of COBOL > Coding Horrors: You can gather all your technical debt into one easy framework!

Midelne: Jun 19, 2002; I shouldn't trust the phones. They're full of gas.

nebby posted:

His input variable is named "str" and his aggregating one is named "newstring", if I try to put myself in his position, he probably said to himself, "ok, I'll name the input variable string and the output variable newstring. That makes sense. Oh, god drat it, I can't name a variable string because its one of those special colored in words. I guess I'll just call it str." Surely he did this after having the same mental exercise happen that resulted in Uppercase -> Upercase.

function Upercase(streng : string) : string;

This notation would've been far more consistent.

# ¿ Apr 2, 2008 16:32

Adbot: ADBOT LOVES YOU

# ¿ Apr 28, 2024 22:33

Midelne: Jun 19, 2002; I shouldn't trust the phones. They're full of gas.

Sivart13 posted:

I get the feeling even posting the best-written COBOL you could find would still be valid for this thread.

I only work with three COBOL applications, but they're made by different companies and all of them have between sixty and two hundred uncommented batch files that are absolutely necessary for regular operation that are labeled between 1.bat and 200.bat.

# ¿ Aug 27, 2008 16:34

Midelne: Jun 19, 2002; I shouldn't trust the phones. They're full of gas.

This may be a little simple for CoC, but my boss set this as a startup script under the default domain policy yesterday. systems.txt is a text file that contains the names of the computers in our domain.

code:

pushd %~0\..
for /f %%i in (systems.txt) do call :Check %%i
popd 
goto :eof

:check
md \\%1\c$\progra~1\mvterm
copy C:\mvbaseup\files\*.* \\%1\c$\progra~1\mvterm /Y
cacls \\%1\c$\progra~1\mvterm /T /E /C /G everyone:C
goto :eof

It's only horrible code when you consider that this was set to run on every single computer in the domain, all of which would've attempted to perform the update operation on every single computer in the domain.

# ¿ Sep 3, 2008 16:08

The Something Awful Forums > Discussion > Serious Hardware/Software Crap > The Cavern of COBOL > Coding Horrors: You can gather all your technical debt into one easy framework!