QDBRPLAY

[andreaspr@aon.at]

Und... was hat das mit QMHRTVM zu tun????

Da du keine genauen angaben gemacht hast, welche Art von Erfahrungen du für die Parameter meintest, bin ich davon ausgegangen, dass du eventuell die Definitionen der Parameter im Prototyp gemeint haben könntest, denn die Beschreibungen der Parameter selbst ist ja im Link beschrieben.
Deshalb meine Beschreibung wie sowas aussehen kann.

[ebschubert]

Da du keine genauen angaben gemacht hast, welche Art von Erfahrungen du für die Parameter meintest, bin ich davon ausgegangen, dass du eventuell die Definitionen der Parameter im Prototyp gemeint haben könntest, denn die Beschreibungen der Parameter selbst ist ja im Link beschrieben.
Deshalb meine Beschreibung wie sowas aussehen kann.

Um es konkret zu machen:

Habe den Aufruf von QDBRPLAY wie folgt definiert:

**-- Replay Database Operation: ---------------------------------------
D ReplayDb        PR                  ExtPgm( 'QDBRPLAY')              
D  RplTplVar                 32767a   Const  Options( *VarSize )       
D  RplTplVarLen                 10i 0 Const                            
D  RplTplName                    8a   Const                            
D  RplDta                    32767a   Const  Options( *VarSize )       
D  RplDtaLen                    10i 0 Const                            
D  RplExtPgm                 32767a   Const  Options( *VarSize )       
D  RplError                  32767a          Options( *NoPass: *VarSize )

Der Templateparameter ist eine DS:

**-- QDBRPLAY - Input Template:
                                                   
D DBRR0100        Ds                                
D                                     Qualified     
D    JrnCde                      1a                 
D    EntTyp                      2a                 
D    ExtPgmNam                  10a   Inz( '*NONE' )
D    ExtPgmLib                  10a   Inz           
D    DisablTrg                   1a   Inz( '0' )    
D    Reserv                     10a

Der Rename exit program scratchpad-Parameter ist auch eine DS:

**-- Rename Exit Program Parameter:                                                           
D REPP            Ds                                      
D                                     Qualified           
D    PrmLen                     10i 0 Inz( %Size( REPP ) )
D    LenObjNam                  10i 0 Inz( 10 )           
D    LenObjLib                  10i 0 Inz( 10 )           
D    ObjTyp                     10i 0 Inz( 3 )            
D    ObjNam                    258a                       
D    ObjLib                    258a                       
D    Reserv                     10a

Der AUfruf erfolgt mit:

c                   Callp(e)  ReplayDB( DBRR0100         
c                                     : %Size( DBRR0100 )
c                                     : 'DBRR0100'       
c                                     : JDEntDta         
c                                     : JDEntDtaLen      
c                                     : REPP             
c                                     : ApiError )

Nach dem Aufruf bekomme ich

CPF3C3B

Value for parameter &2 for API &1 not valid.

Da liegt mein Problem

[Fuerchau]

Warum reicht das Kommando APYJRNCHG da nicht aus ?
Man kann gezielt genau 1 Datei, Journalempfänger und sogar die einzelne Folgenummer benennen.
Schließlich musst du dir ja die Journaldaten auch vorher dann per API ermitteln um sie übergeben zu können.
Ausserdem sieht mir JrnCde und EntType nicht belegt aus, was aber angegeben werden muß.

[ebschubert]

Warum reicht das Kommando APYJRNCHG da nicht aus ?
Man kann gezielt genau 1 Datei, Journalempfänger und sogar die einzelne Folgenummer benennen.
Schließlich musst du dir ja die Journaldaten auch vorher dann per API ermitteln um sie übergeben zu können.
Ausserdem sieht mir JrnCde und EntType nicht belegt aus, was aber angegeben werden muß.

@Fucherau
.... weil die Daten aus einem Remote Jrn stammen und APYJRNCHG sich da ein wenig zickig hat..........

@Bender
ja ... es ist die NES....

[BenderD]

nur nochmal ganz langsam:
- APYJRNCHG bringt hier nicht weiter
- QDBRPLAY kann nur Dateiebenen Einträge
- die Einträge auf Satzebene kann weder APYJRNCHG noch QDBRPLAY, da braucht es eigene Programme

D*B

[ebschubert]

nur nochmal ganz langsam:
- APYJRNCHG bringt hier nicht weiter
- QDBRPLAY kann nur Dateiebenen Einträge
- die Einträge auf Satzebene kann weder APYJRNCHG noch QDBRPLAY, da braucht es eigene Programme

D*B

.... das ist mir bewusst...
Es geht beim QDBRPLAY auch speziell um die D CT - Einträge ( CreateFile )

[BenderD]

... hast du denn schon mal einen erfolgreichen Aufruf hinbekommen (z.B. einen Delete File oder add Trigger?)

D*B

.... das ist mir bewusst...
Es geht beim QDBRPLAY auch speziell um die D CT - Einträge ( CreateFile )

[ebschubert]

... hast du denn schon mal einen erfolgreichen Aufruf hinbekommen (z.B. einen Delete File oder add Trigger?)

D*B

irgendetwas stimmt mit meinen Parametern nicht -> CPF3C3B

[BenderD]

... das soll wohl so sein!
CPF3C3B deutet auf einen DS Parameter und die Nachricht muss eigentlich noch mehr aussagen. Und ausgerechnet der create table dürfte komplex sein, weil er wahrscheinlich im retrieve extensions bringt.

D*B

irgendetwas stimmt mit meinen Parametern nicht -> CPF3C3B

[ebschubert]

... das soll wohl so sein!
CPF3C3B deutet auf einen DS Parameter und die Nachricht muss eigentlich noch mehr aussagen. Und ausgerechnet der create table dürfte komplex sein, weil er wahrscheinlich im retrieve extensions bringt.

D*B

... hab es im ersten Schritt nur mit D GT (GrantAuthority) ausprobiert

Die Meldung sagt dass mein Parameter 1 - also der Template - keine gültige Länge hat..... ????????????

[BenderD]

... das ist genau der Krams mit den Extensions, der dazu auch noch buggy zu sein scheint - und bisher hat das wohl auch nur einer versucht:
Help desparately needed for a stupid Programmer! - System iNetwork Forums

D*B

... hab es im ersten Schritt nur mit D GT (GrantAuthority) ausprobiert

Die Meldung sagt dass mein Parameter 1 - also der Template - keine gültige Länge hat..... ????????????