PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
18081 | 02/08/30 17:56:22 | RE(2):日付について By t.w |
18077 | 02/08/30 14:59:51 | RE(1):日付について By isii |
18065 | 02/08/29 16:06:12 | 日付について By t.w |
カテゴリ:スクリプトの記述
日付:2002年08月30日 17:56 発信者:t.w
題名:RE(2):日付について
isiiさん、こんにちは。
ありがとうございます。
無事に解決しました。
>t.wさん、こんにちは。
>
>>皆さん、こんにちは。
>>Power Builder8.0を使っています。
>>
>>検索引数で取ってきた日付に1足したいのですが、
>>どうすればいいのですか?
>
>年、月、日のいずれに1を足したいのでしょうか?
>それぞれのスクリプト例を以下に記述します。
>ただし、エラーチェック等は省いています。
>
>●年の場合のスクリプト例
>Date( Year( date ) + 1, Month( date ), Day( date ) )
>
>●月の場合のスクリプト例
>integer year, month, day, month_day
>year = Year( date )
>month = Month( date ) + 1
>day = Day( date )
>if month > 12 then
> month = month - 12
> year = year + 1
>end if
>choose case month
>case 1, 3, 5, 7, 8, 10, 12
> month_day = 31
>case 2
> if Mod( year, 4 ) = 0 and Mod( year, 100 ) <> 0 or Mod( year, 400 ) = 0 then
> month_day = 29
> else
> month_day = 28
> end if
>case 4, 6, 9, 11
> month_day = 30
>end choose
>if day > month_day then day = month_day
>Date( year, month, day )
>
>●日の場合のスクリプト例
>RelativeDate( date, 1 )
>
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows 2000
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.