Frage : SQL, zum der vorhergehenden Abteilung eines Angestellten zu finden

Ich habe eine Anforderung, in der ich die vorhergehende Abteilung eines Angestellten über dem Kurs der Daten erhalten muss. Ich angebracht ein Bild h, das zeigt, was ich genau versuche, zu erzielen. Ich angebracht auch sql für die blinden Daten im Bild. Mich auf, wie man bitte vorschlagen this.

Thanks im Voraus




erzielt
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
---SQL für blinde Daten im Bild

person_id, Papierlösekorotron, version_nbr, Abteilung, Palladium vorwählen
von
(
person_id, trunc (sysdate) - 30 Papierlösekorotron, 0 version_nbr vorwählen 2345, „Stunden“ Abteilung, Palladium „PD1“ von Doppel
Anschluss aller
person_id, trunc (sysdate) - 6.1 vorwählen 2345, „Finanzierung“, „PD2“ von Doppel
Anschluss aller
person_id, trunc (sysdate) - 3.2 vorwählen 2345, „Finanzierung“, „PD3“ von Doppel
Anschluss aller
person_id, das trunc (last_day (sysdate)), 3, „Verkäufe“, „PD3“ von Doppel vorwählen 2345
Anschluss aller

person_id, trunc (sysdate) - 30, 0 vorwählen 1264, Abteilung „globaler Stunde“, Palladium „PD1“ von Doppel
Anschluss aller
person_id, trunc (sysdate) - 6.1 vorwählen 1264, „globale Finanzierung“, „PD2“ von Doppel
Anschluss aller
person_id, trunc (sysdate) - 3.2 vorwählen 1264, „globale Finanzierung“, „PD3“ von Doppel
Anschluss aller
person_id, das trunc (last_day (sysdate)), 3, „globale Verkäufe“, „PD3“ von Doppel vorwählen 1264

) a

Auftrag durch 1.2
Attachments:
Required Prev Dept

Antwort : SQL, zum der vorhergehenden Abteilung eines Angestellten zu finden

Ich tun etwas wie:

    Tun während InStr (str, „") > 0
        str = ersetzen (str, „„,“ ")
    Schleife

Chris
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
objFSO = CreateObject („Scripting.FileSystemObject“) einstellen 
myFile = „c:\macros\aces\claim13.txt“ 
Gesetztes objFile = objFSO.OpenTextFile (myFile, 1) 
Bis objFile.AtEndOfStream tun 
  line=objFile.ReadLine 
  WScript.Echo trimspace (Linie)
Schleife 
Funktion trimspace (str als Schnur) als Schnur
    Tun während InStr (str, „  ") > 0
        str = ersetzen (str, „  „,“ ")
    Schleife
    trimspace = str
Enden-Funktion
Weitere Lösungen  
 
programming4us programming4us