jjmt + 1 Tag als jjmt im SQL

[Robi]

Hi *all
ich brech mir grade die Finger um ein Feld das JJJJMMTT enhällt mit SQL um einen tag zu erhöhen und wieder als JJJJMMTT zur verfügung zu stellen.
z.tz habe ich dieses (funktionierende) Monster

SELECT 20000000 + cast(                                   
                       substring(char(                    
                              date(                       
       substring(digits(medbis), 1, 4) concat '-' concat  
       substring(digits(medbis), 5, 2) concat '-' concat  
       substring(digits(medbis), 7, 2)                    
                                  )-1 days), 7, 2) concat 
                      substring(char(                     
                             date(                        
       substring(digits(medbis), 1, 4) concat '-' concat  
       substring(digits(medbis), 5, 2) concat '-' concat  
       substring(digits(medbis), 7, 2)                    
                                 )-1 days), 4, 2) concat  
                      substring(char(                     
                             date(                        
       substring(digits(medbis), 1, 4) concat '-' concat  
       substring(digits(medbis), 5, 2) concat '-' concat  
       substring(digits(medbis), 7, 2)                            
                                  )-1 days), 1, 2) as decimal(8)) 
 FROM Datei WHERE MEDLS = 'WERT' 

gehts auch einfacher?
V7R1
Robi

[TheDevil]

Hi,

UPDATE lib/file
SET field =
DEC(VARCHAR_FORMAT(TIMESTAMP(DIGITS(field) CONCAT '000000') + 1
DAY, 'YYYYMMDD'), 8, 0);

Wobei mein Feld direkt 8,0 decimal war. Evtl. musst dudas in dem digits() noch anpassen.
Ansonsten funzt das wunderbar.

Das habe ich mal von Brigitta bekommen

Gruß,
Ralf

[Fuerchau]

Müsste so funktionieren:
dec(replace(char(date(char(jjjjmmttfeld * 1000000) + 1 days, iso), '-', ''), 8, 0)

Wozu die 20000000?
Enthält dein Datum kein vollständiges Jahr?

[Robi]

Klasse, Danke!
funktioniert
Wenn wir unsre Birgitta nicht hätten ...

Danke!

[Robi]

@Baldur

Wozu die 20000000?
Enthält dein Datum kein vollständiges Jahr?

doch.
aber Date gibt mir tt.mm.jj zurück (Datumsformat *DMY) beim Kunden

Robi

[TheDevil]

By the way ... ich bin immer wieder von der schnelligkeit und der Qualität der Antworten hier in der Community erstaunt / begeistert ....

[Fuerchau]

Date() gibt immer den Typ Date zurück.
Einzig bei der Funktion CHAR(DATE()) wird das Jobformat berücksichtigt und kann ggf. zum Fehhler führen (< 1.1.40 oder > 31.12.39).
Dies kann man aber mit CHAR(DATE(), ISO) umgehen.

[Robi]

Thx,
wieder was gelernt
(stimmt natürlich, ich verwende Char(date(...)
Robi

[B.Hauser]

Unter 7.1 sollte es auch so funktionieren:

Select ...
Int(VarChar_Format(Timestamp_Format(Digits(Datum), 'YYYYMMDD') + 1 Day, 'YYYYMMDD'))
From ...

Ab 7.2:
Kann man's dann etwas vereinfachen:

Select ...
Int(Date(Timestamp_Format(Digits(NumDatum), 'YYYYMMDD') + 1 Day))
From ...

Birgitta

[Fuerchau]

Schön, wer V7ff hat, wenn man noch auf V5R2 bis V6R1 arbeitet.

[B.Hauser]

Glaubst Du ich kann auf 7.xx arbeiten?
Das hindert mich dennoch nicht zu wissen, was alles möglich ist und mich ggf. darüber aufzuregen, dass ich es nicht nutzen darf.
Ich muss auch noch alles auf die V5-Versionen umwandeln ... und manchmal darf ich dann auch Programme in doppelter Ausführung erstellen! Gerade erst gestern musste ich 2 Varianten für ein (SQL-)Programm schreiben, damit die Kunden, die Release 7.xx haben nicht unter denen leiden müssen, die sich keinen Upgrade gönnen.

Release V5R4 ist inzwischen über 10 Jahre alt!
Wer hat noch PCs bzw. die entsprechende Software die genauso alt oder älter sind am laufen???
Nur an dieser Stelle rumzujammern nutzt nix! Diejenigen, die sich nicht bewegen lesen auch keine aktuellen Artikel oder Blogs oder Foren.

Birgitta

[camouflage]

Gerade erst gestern musste ich 2 Varianten für ein (SQL-)Programm schreiben, damit die Kunden, die Release 7.xx haben nicht unter denen leiden müssen, die sich keinen Upgrade gönnen.

OT ... und ich liebe das neue "Free" Format TR7, auch wenn ich anfangs sehr skeptisch war. /OT