Dates

[Darren Reely]

Anthony,

Here is a quick hack that works.  If you want to work with week
periods then it gets complicated when spanning years.

define d_subtracter num = 45
define in_ccyymm char*6 = '200001'
define d_in_date date = nconvert(in_ccyymm + '01')
define d_out_date date = date(days(d_in_date) - d_subtracter)
define out_ccyymm char*6 = ascii(d_out_date)
report all


Darren


Arnone, Anthony wrote:
> 
> Good Afternoon,
> 
>         I am using 8.19 on an HP3000. I have a date field which is YYYYMM. I
> need to run a QTP procedure to update this field every morning. It needs to
> be 2 months less than the current date. The problem Im having is when the
> year 2000 comes around. Thank you for your help in advance.
> 
>                                         R/S
>                                         Anthony
> 
> = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
> Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
> powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
> This list is closed, thus to post to the list, you must be a subscriber.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.