HP3000-L Archives

July 2010, Week 2

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:
Re: variable within cobol.
From:
"Walter J. Murray" <[log in to unmask]>
Reply To:
Walter J. Murray
Date:
Sun, 11 Jul 2010 10:20:02 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (44 lines) 
Kim and the group,

I believe in using the standard COBOL language features, unless there's
a compelling reason to do something MPE-specific.

Therefore, I endorse the solution that Francois posted:

     ACCEPT ... FROM DAY-OF-WEEK

That's assuming you want the current day of the week.  If you want to
know the day of the week for a specified date (YYYYMMDD format), you
would use the INTEGER-OF-DATE function in COBOL to convert to integer
date form, then divide by 7 and use the remainder:  0 = Sunday, 1 =
Monday, ... , 6 = Saturday.

Walter  

Walter J. Murray

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Kim Borgman
Sent: Friday, July 09, 2010 7:37 AM
To: [log in to unmask]
Subject: [HP3000-L] variable within cobol.

I'm looking for one that give me the day of week.  Preferably a number.
But I can live with a string that says 'wednesday' or 'wed' or similar.

I'm thinking similar to 'current-date' which returns mmddyycc.

I know there are a bunch of HP variables in mpe.  Hpday being the best.

TIA....

Mr Kim Borgman
IT mgr, NWS Inc.

* 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