API QCLSCAN: Fehler nach ändern der CCSID (CHGJOB)

[edv90020]

Hallo Forum,

folgendes Problem habe ich zu beklagen:

Mein Job/Benutzerprofi läuft mit folgenden Einstellungen:

LANGID DEU
CNTRYID DE
CCSID 273

Änder ich nun diese Einstellungen mit

CHGJOB LANGID(HUN) CNTRYID(HU) CCSID(870)

läuft nun der QCLSCAN auf Fehler

Weitere Nachrichteninformationen

Nachrichten-ID . . . . : CPF3CF1
Sendedatum . . . . . . : 09.07.09 Sendezeit . . . . . . : 14:22:52

Nachricht . . . : Fehlercodeparameter ungültig.

Ursache . . . . : Das Format des Fehlercodeparameters ist nicht korrekt.
Fehlerbeseitigung: Den Fehlercodeparameter korrigieren und die Anforderung
wiederholen. Das korrekte Format für den Fehlercodeparameter ist unter dem
Thema "APIs" im Information Center
(IBM System i and i5/OS Information Center) zu finden.


Der Witz an der Sache: Änder ich die CCSID am USRPRF und melde mich neu an, läuft der QCLSCAN ohne Probleme

Ich bin schon am verzweifeln. Kann mir jemand weiterhelfen?! Mit dem CPF-Fehler komme ich nicht weiter!

Vielen Dank im voraus.

Slawo

[Fuerchau]

Gib doch mal die Quelle als Beispiel.

[edv90020]

Gib doch mal die Quelle als Beispiel.

C     #ICF1         IFNE      *BLANKS                                                          
C                   Z-ADD     #IFRS         UFRS              5 0                              
C                   MOVE      *BLANKS       A256X1          256                                
C                   MOVE      *BLANKS       A256X2          256                                
C     LC:UC         XLATE     #ICF1         A256X2                         ALLES GRßBUCHST.    
C     LC:UC         XLATE     #ICF2         A256X1                         ZUM VERGLEICHEN     
C                   CALL      'QCLSCAN'                                                        
C                   PARM                    A256X1                         ZU SUCHEN IN ...    
C                   PARM      256           N3X1              3 0          LÄNGE               
C                   PARM      UFRS          N3X2              3 0          START               
C                   PARM                    A256X2                         ZU SUCHENDER STRING 
C                   PARM      256           N3X3              3 0          LÄNGE               
C                   PARM      '1'           A1X1              1            TRANSLATE=TRUE      
C                   PARM      '1'           A1X2              1            TRIM=TRUE           
C                   PARM      '?'           A1X3              1            WILD                
C                   PARM                    N3X4              3 0          ERGEBNIS            
C                   Z-ADD     N3X4          #OILN                                              
C                   END

Nicht wundern warum der die Parameter hin und her geschoben werden: wir verwenden ein Case-Tool zum generieren von RPG!

[Fuerchau]

Das sieht mir danach aus, dass QCLSCAN sich intern was merkt und mit diesem gemerkten nach CCSID-Wechsel nicht zurechtkommt.

Mach nach einem CHGJOB besser einen RCLRSC.
CCSID-Wechsel kann auch in anderen Programmen zu Problemen führen, wenn sie noch aktiv sind (*INLR=*OFF, ODP's usw.).

[edv90020]

Mach nach einem CHGJOB besser einen RCLRSC.

Gute Idee aber leider hat´s nicht geklappt...

[edv90020]

Noch eins ist mir aufgefallen:
Wir haben mehrere Systeme bzw. LPAR und auf zwei Systemen habe ich kein Problem und auf drei Systemen läuft das API auf fehler.

Gibt es evtl. mehrere Versionen vom API die über eine DTAARA oder ähnliches gesteuert wird ?
(Das hatte ich auch beim Befehl CPYTOIMPF: auf einigen Systemen lief der Befehl rund und einige nicht da eine ältere Version über die DTAARA angesprochen wurde)

[Fuerchau]

Unterschiedlicher PTF-Stand kann immer eine Ursache sein.

[edv90020]

Gibt es zum QCLSCAN API eine Alternatie ? In betracht auf ILE RPG stellt das API ein zu kleines Ergebnisfeld mit 3,0 zur Verfügung was uns früher oder später noch zu Problemen fürhen wird !!!

[Fuerchau]

Wenn man keine Wildcard benötigt, einfach %scan.
Mittels C-Funktionen lassen sich reguläre Ausdrücke verwenden (RegEx).

In meiner Toolbox findet sich auch ein ähnliches Werkzeug.

[edv90020]

Hallo Fuerchau,

erstmal vieln Dank für deine Informationen.

Bei gelegenheit werde ich bei der IBM nachfragen und das Ergebnis hier natürich veröffentlichen.