[NEWSboard IBMi Forum]

Hybrid View

  1. #1
    Registriert seit
    Mar 2002
    Beiträge
    5.389
    @Baldur:

    aber im Ernst:

    select char(' ', 145), kunde.*
    from kunde ...

    geht auch

    mfg

    Dieter


    Zitat Zitat von Fuerchau
    @Dieter
    Jaja, und die 269 Leerzeichen muss ich genau abzählen
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  2. #2
    Registriert seit
    Sep 2004
    Beiträge
    5
    der select vom sql sieht so aus:

    SELECTdistinct rpad(NAME,30) ||''||

    rpad
    (VORNAME,31) ||''||

    rpad
    (to_char(FALLEINDATUM,'DD.MM.YYYY'),10) ||''||

    rpad
    (to_char(FALLAUSDATUM,'DD.MM.YYYY'),10) ||''||

    lpad
    (VERWEILDAUER_I_TAGEN,4) ||''||

    rpad
    (to_char(GEBDATUM,'DD.MM.YYYY'),10) ||''||

    lpad
    (ALTER_I_JAHREN,3,'000') ||''||

    lpad
    ('000',3,'000') ||''||

    lpad
    (geschlecht,1) ||''||

    lpad
    (' ',2,' ') ||''||

    lpad
    ('0000',4,'0000') ||''||

    lpad
    (' ',1,' ') ||''||

    lpad
    (aus_1,1,' ') ||''||

    lpad
    (wo_2,1,' ') ||''||

    lpad
    (nach_3,1,' ') ||''||

    lpad
    ('A',1,'A') ||''||

    rpad
    (substr(ICD1,1,5),5,' ') ||''||

    rpad
    (substr(ICD2,1,5),5,' ') ||''||

    rpad
    (substr(ICD3,1,5),5,' ') ||''||

    rpad
    (substr(ICD4,1,5),5,' ') ||''||

    rpad
    (substr(ICD5,1,5),5,' ') ||''||

    rpad
    (substr(ICD6,1,5),5,' ') ||''||

    rpad
    (substr(ICD7,1,5),5,' ') ||''||

    rpad
    (substr(ICD8,1,5),5,' ') ||''||

    rpad
    (substr(ICD9,1,5),5,' ') ||''||

    rpad
    (substr(ICD10,1,5),5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    rpad
    (CHOP1,4,' ') ||' '||

    rpad
    (CHOP2,4,' ') ||' '||

    rpad
    (CHOP3,4,' ') ||' '||

    rpad
    (CHOP4,4,' ') ||' '||

    rpad
    (CHOP5,4,' ') ||' '||

    rpad
    (CHOP6,4,' ') ||' '||

    rpad
    (CHOP7,4,' ') ||' '||

    rpad
    (CHOP8,4,' ') ||' '||

    rpad
    (CHOP9,4,' ') ||' '||

    rpad
    (CHOP10,4,' ')"Name"

    FROM chop_1

    aber der output stimmt nicht... die leerzeichen hats irgendwie nicht reinkopiert.. wenn da steht rpad(CHOP10,4,' '), dann sieht das im original schon so aus rpad(CHOP10,4,'....') (. durch leerzeichen ersetzen). Aber irgendwie stimmt der output nicht, wenn es jetzt z.b icd1 und icd2 bei xy gibt, dann verschiebt sich das ganze am ende, wenn es jedoch 10 gibt, dann stimmt alles aber nur wenige haben 10 icd.

    hoffe einer von euch hat etwas gecheckt was ich geschrieben habe

  3. #3
    Registriert seit
    Aug 2001
    Beiträge
    2.942
    Hallo,

    ... und dann gibt es noch die SQL Scalare Funktion SPACE(NumerWert), mit der die angegebene Anzahl and Blanks geschrieben werden kann!

    Beispiel:
    SELECT space(5), space(10) concat MyField
    FROM MySchema.MyFile

    Birgitta
    Birgitta Hauser

    Anwendungsmodernisierung, Beratung, Schulungen, Programmierung im Bereich RPG, SQL und Datenbank
    IBM Champion seit 2020 - 5. Jahr in Folge
    Birgitta Hauser - Modernization - Education - Consulting on IBM i

  4. #4
    Registriert seit
    Sep 2004
    Beiträge
    5
    oracle 9.x ehm ich muss ein outputfile erstellen, dass dann gelesen werden kann automatisch..

  5. #5
    Registriert seit
    Mar 2002
    Beiträge
    5.389
    Hallo,

    falsche Baustelle: ich empfehle eine ORACLE Newsgroup oder Forum

    Dieter Bender

    Zitat Zitat von Psicopatico
    oracle 9.x ehm ich muss ein outputfile erstellen, dass dann gelesen werden kann automatisch..
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  6. #6
    Registriert seit
    Mar 2002
    Beiträge
    5.389
    Hallo,

    ich wusste schon warum ich mit mehreren Reihen Fragezeichen reagiert habe!!!

    rpad? lpad? um was für eine Datenbank handelt es sich? welches Frontend benutzen Sie? Was wollen Sie eigentlich mit Ihrem SQL erreichen?

    mfg

    Dieter Bender


    Zitat Zitat von Psicopatico
    der select vom sql sieht so aus:

    SELECTdistinct rpad(NAME,30) ||''||

    rpad
    (VORNAME,31) ||''||

    rpad
    (to_char(FALLEINDATUM,'DD.MM.YYYY'),10) ||''||

    rpad
    (to_char(FALLAUSDATUM,'DD.MM.YYYY'),10) ||''||

    lpad
    (VERWEILDAUER_I_TAGEN,4) ||''||

    rpad
    (to_char(GEBDATUM,'DD.MM.YYYY'),10) ||''||

    lpad
    (ALTER_I_JAHREN,3,'000') ||''||

    lpad
    ('000',3,'000') ||''||

    lpad
    (geschlecht,1) ||''||

    lpad
    (' ',2,' ') ||''||

    lpad
    ('0000',4,'0000') ||''||

    lpad
    (' ',1,' ') ||''||

    lpad
    (aus_1,1,' ') ||''||

    lpad
    (wo_2,1,' ') ||''||

    lpad
    (nach_3,1,' ') ||''||

    lpad
    ('A',1,'A') ||''||

    rpad
    (substr(ICD1,1,5),5,' ') ||''||

    rpad
    (substr(ICD2,1,5),5,' ') ||''||

    rpad
    (substr(ICD3,1,5),5,' ') ||''||

    rpad
    (substr(ICD4,1,5),5,' ') ||''||

    rpad
    (substr(ICD5,1,5),5,' ') ||''||

    rpad
    (substr(ICD6,1,5),5,' ') ||''||

    rpad
    (substr(ICD7,1,5),5,' ') ||''||

    rpad
    (substr(ICD8,1,5),5,' ') ||''||

    rpad
    (substr(ICD9,1,5),5,' ') ||''||

    rpad
    (substr(ICD10,1,5),5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    lpad
    (' ',5,' ') ||''||

    rpad
    (CHOP1,4,' ') ||' '||

    rpad
    (CHOP2,4,' ') ||' '||

    rpad
    (CHOP3,4,' ') ||' '||

    rpad
    (CHOP4,4,' ') ||' '||

    rpad
    (CHOP5,4,' ') ||' '||

    rpad
    (CHOP6,4,' ') ||' '||

    rpad
    (CHOP7,4,' ') ||' '||

    rpad
    (CHOP8,4,' ') ||' '||

    rpad
    (CHOP9,4,' ') ||' '||

    rpad
    (CHOP10,4,' ')"Name"

    FROM chop_1

    aber der output stimmt nicht... die leerzeichen hats irgendwie nicht reinkopiert.. wenn da steht rpad(CHOP10,4,' '), dann sieht das im original schon so aus rpad(CHOP10,4,'....') (. durch leerzeichen ersetzen). Aber irgendwie stimmt der output nicht, wenn es jetzt z.b icd1 und icd2 bei xy gibt, dann verschiebt sich das ganze am ende, wenn es jedoch 10 gibt, dann stimmt alles aber nur wenige haben 10 icd.

    hoffe einer von euch hat etwas gecheckt was ich geschrieben habe
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

Similar Threads

  1. RPGLE - SQL
    By christian_lettner in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 16-11-06, 11:15
  2. SQL - Cursor vernichten ?!?
    By FNeurieser in forum NEWSboard Programmierung
    Antworten: 3
    Letzter Beitrag: 11-10-06, 15:53
  3. SQL und OBJLCK
    By malzusrex in forum IBM i Hauptforum
    Antworten: 8
    Letzter Beitrag: 19-09-06, 12:04
  4. SQL - Fehler
    By Kaufmann in forum IBM i Hauptforum
    Antworten: 11
    Letzter Beitrag: 28-06-06, 15:11
  5. SQL .. for update of (RPG embedded SQL)
    By loeweadolf in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 01-06-06, 10:43

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •