[prev in list] [next in list] [prev in thread] [next in thread] 

List:       mumps-l
Subject:    Re: Boolean operations
From:       "W.Gerum" <wg () winner ! de>
Date:       1999-03-31 14:24:45
[Download RAW message or body]


>

Hi,
  what about
  SET %M=%D#12+1,%Y=%M=1+$P(%D,"/",3)
taking %D#12 does in implicit $PIECE(%D,...,1)
While this may be much shorter than the original, it might be a little
harder to read.

> > Hi everybody, I wrote a function to do some calculation with dates and I
> > have the line of code bellow:
> >
> > S %M=$P(%D,"/",1),%Y=$P(%D,"/",3),%M=%M+1,%Y=%Y+(%M>12) S:%M>12 %M=1
> >
> > %D = date as external (MM/DD/YYYY)

[prev in list] [next in list] [prev in thread] [next in thread]