Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
Delip

New User

Joined: 13 Sep 2007
Posts: 46
Location: Bangalore

 Posted: Fri Nov 30, 2007 12:01 am    Post subject: How to find reminder of division in Easytrieve I want to check if year is a leap year or not. I want to know if the remainder of year/4 is zero or not.Is there any function in easy trieve? Thanks In advance

Craq Giegerich

Senior Member

Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

Posted: Fri Nov 30, 2007 12:44 am    Post subject: Re: How to find reminder of division in Easytrieve

 Delip wrote: I want to check if year is a leap year or not. I want to know if the remainder of year/4 is zero or not.Is there any function in easy trieve? Thanks In advance

You need to check for years ending in 00 by dividing by 400 also.
Delip

New User

Joined: 13 Sep 2007
Posts: 46
Location: Bangalore

 Posted: Fri Nov 30, 2007 1:39 am    Post subject: Thank you.But any idea how we can check
dick scherrer

Site Director

Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

 Posted: Fri Nov 30, 2007 1:45 am    Post subject: Hello, One way is to multiply the answer by 4 and compare against the original value. If they are equal, the number is divisible by 4. As Craig mentioned, there are additional considerations to determine leap year.
Delip

New User

Joined: 13 Sep 2007
Posts: 46
Location: Bangalore

 Posted: Sat Dec 01, 2007 1:39 am    Post subject: Thank you.It is working now.
dick scherrer

Site Director

Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

 Posted: Sat Dec 01, 2007 2:12 am    Post subject: Reply to: How to find reminder of division in Easytrieve You're welcome Thank you for letting us know it is working. d
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics Extend the decimal values in DIVISION Balaryan DFSORT/ICETOOL 3 Thu Oct 05, 2017 4:05 pm Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm find RACF group for access to spooled... jzhardy JCL & VSAM 1 Mon May 08, 2017 11:46 am READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us