+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (15c) add number of month to a DD,MMYYY (/thread-22385.html)
(15c) add number of month to a DD,MMYYY - Arcorange - 09-23-2024 05:36 PM
Hello,
Does anyone know of a program for HP-15C that adds a number of months to a date?
DD,MMYYYY
ENTER
MM (0 to 99)
-->DD,MM1,YYYY1
Thanks :-)
RE: (15c) add number of month to a DD,MMYYY - Thomas Klemm - 09-24-2024 06:54 PM
Something like this?
Code:
001 { 34 } X<=>Y
002 { 43 44 } g INT
003 { 34 } X<=>Y
004 { 43 36 } g LSTx
005 { 42 44 } f FRAC
006 { 26 } EEX
007 { 2 } 2
008 { 20 } *
009 { 40 } +
010 { 1 } 1
011 { 30 } -
012 { 44 25 } STO I
013 { 1 } 1
014 { 2 } 2
015 { 10 } /
016 { 43 44 } g INT
017 { 42 4 25 } f x<-> I
018 { 1 } 1
019 { 40 } +
020 { 45 25 } RCL I
021 { 1 } 1
022 { 2 } 2
023 { 20 } *
024 { 30 } -
025 { 45 25 } RCL I
026 { 26 } EEX
027 { 4 } 4
028 { 10 } /
029 { 40 } +
030 { 26 } EEX
031 { 2 } 2
032 { 10 } /
033 { 40 } +RE: (15c) add number of month to a DD,MMYYY - Matt Agajanian - 09-24-2024 07:35 PM
(09-24-2024 06:54 PM)Thomas Klemm Wrote: Something like this?
Code:
001 { 34 } X<=>Y
002 { 43 44 } g INT
003 { 34 } X<=>Y
004 { 43 36 } g LSTx
005 { 42 44 } f FRAC
006 { 26 } EEX
007 { 2 } 2
008 { 20 } *
009 { 40 } +
010 { 1 } 1
011 { 30 } -
012 { 44 25 } STO I
013 { 1 } 1
014 { 2 } 2
015 { 10 } /
016 { 43 44 } g INT
017 { 42 4 25 } f x<-> I
018 { 1 } 1
019 { 40 } +
020 { 45 25 } RCL I
021 { 1 } 1
022 { 2 } 2
023 { 20 } *
024 { 30 } -
025 { 45 25 } RCL I
026 { 26 } EEX
027 { 4 } 4
028 { 10 } /
029 { 40 } +
030 { 26 } EEX
031 { 2 } 2
032 { 10 } /
033 { 40 } +
Tried this on RPN-67. Excellent program. It works for a future amount of N months, but not -N months for a past date.
RE: (15c) add number of month to a DD,MMYYY - Arcorange - 09-24-2024 08:04 PM
Yes, thank you Thomas. It work fine.
I often need to calculate a target date in my work as a project manager. Great. THANKS