HP3000-L Archives

June 2001, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
EricKundl <[log in to unmask]>
Reply To:
EricKundl <[log in to unmask]>
Date:
Tue, 26 Jun 2001 10:36:44 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (59 lines)
well...i started using mixed case on programs some years ago when i noticed that my Delphi code was much more readable than my COBOL code...and COBOL doesn't really care if its upper or lower case. since then i've even lost interest in the caps lock button on the keyboard...hehheh.

ie: i prefer code that looks like this... i only fully uppercase called modules, like intrinsics or subprograms.

SubtractOneMonthFromBillMonth.
    move BillMonth to TempDate(1:6)
    move "01" to TempDate(7:2)
    call "NYBU0002" using TempDate
                          Subtract-Month
                          Chgby-1
    end-call
    move TempDate(1:6) to BillMonth.




thanks,
Eric Kundl
Colorado Springs, CO
http://members.home.net/ekundl1/
  ----- Original Message ----- 
  From: Gary Sielaff 
  To: [log in to unmask] 
  Sent: Tuesday, June 26, 2001 10:29 AM
  Subject: Re: MPUT with FTP to HP3000


  lower case is good
  gary
  ----- Original Message -----
  From: "Donna Garverick" <[log in to unmask]>
  To: <[log in to unmask]>
  Sent: Tuesday, June 26, 2001 9:19 AM
  Subject: Re: [HP3000-L] MPUT with FTP to HP3000


  > EricKundl wrote:
  >
  > > ok, thanks everyone...
  > > never did see my question come up on the list, but saw all the replies.
  >
  > (and did you notice....he typed everything in lower case??
  hehe)      - d
  >
  > --
  > Donna Garverick     Sr. System Programmer
  > 925-210-6631        [log in to unmask]
  >
  > >>>MY opinions, not Longs Drug Stores'<<<
  >
  > * To join/leave the list, search archives, change list settings, *
  > * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

  * To join/leave the list, search archives, change list settings, *
  * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2