Wandlungsfehler wegen PGMINFO

[svit]

Hier ist der Quellcode nur auf Parameter reduziert.

h nomain
// Activationgroup: Definitionen
h* dftactgrp(*NO)
h* actgrp(*new)


h option(*nodebugio:*srcstmt:*nounref)
**
** erstellt PCML-Dokument und speichert PCML in *MODULE
**
h pgminfo(*pcml:*MODULE)


************************************************** **********
** Datei definition
************************************************** **********
F**ORDER00P IF A E DISK RENAME(ORDER00PR:ORDER0PR) USROPN
************************************************** **********
** DS Definition
************************************************** **********
d tmplHead DS qualified template
d CompanyId 2S 0
d StoreId 2S 0
d User 128A varying
d Password 128A varying
d OrderIdExternal...
d 9s 0
d OrderIdShop 10A
d OrderDate D
d OrderTotal 9s 2
d Currency 3A
d PricesInclVat 1A
d ShippingTotal 9S 2
d**CashOnDeliverySurcharge...
d** 9S 2
d Salutation 10A
d FirstName 20A
d LastName 30A
d Company 105A
d CustomerIdShop...
d 20A
d DateOfBirth D
d CustomerType 10A
d Email 60A
d Phone 20A
d Street 35A
d HouseNumber 35A
d StreetAdditional...
d 60A
d City 35A
d PostCode 10A
d CountryCode 3A
d MethodIdentifier...
d 10A
d TransactionAmount...
d 9S 2
d TransactionCurrency...
d 3A
d**TransactionIdInternal...
d** 32A
d**TransactionIdExternal...
d** 32A
d CreditCardType...
d 20A
d Code 256A
d Description 1A
d Reason 4S 0
d Value 9S 2
d DiscountApplied...
d 9S 2
d DiscountType 20A
d AppliedToShipping...
d 1A
d FreeShipping 1A
d ItemNo 13A
d Name 513A
d ShippingAgentCode...
d 10A
d ShippingServiceType...
d 30A
d PriceCharged 9S 2
d PriceRegular 9S 2
d Qty 9S 2
d QtyUom 3A
d ServiceCharge 9S 2
d**AdditionalServiceType...
d** 30A
d**RequestedDeliveryDate...
d** D
**
**
**
d tmplResponse DS qualified template
d Head likeds(tmplHead) dim(500)
** -----------------------
** Variablen definition
** -----------------------
D $Z s 3 0
d*Response DS likeds(tmplResponse)
************************************************** **********
** Prototyp-definition
************************************************** **********
d get_order PR
D out_Response likeds(tmplResponse)
************************************************** ******************
** Start Procedur
************************************************** ******************
**
P get_ORDER B export
D PI
D out_Response likeds(tmplResponse)
**
**-------------------------------------------------------------------
**
C TIME #dat
/free




*inlr = *on;


/end-free
**------------------------------------------------------------------
**
P E
**

[Fuerchau]

Und was schreibt der Compiler so dazu?

[svit]

Nachricht . . . : Umwandlung fehlgeschlagen. Modul WEB_ORDE_S in Bibliothek
IWMSEGMOBJ nicht erstellt.

Ursache . . . . : Die Umwandlung schlägt normalerweise fehl, wenn die
Bewertungsstufe der ausgegebenen Nachrichten den Wert überschreitet, der für
den Parameter GENLVL im Befehl CRTRPGMOD angegeben wurde. Die
Umwandlungsprogrammliste oder das Jobprotokoll auf Fehlernachrichten prüfen.
Fehlerbeseitigung: Die Fehler korrigieren oder den für den Parameter GENLVL
angegebenen Wert ändern. Wiederholen Sie die Umwandlung.

[svit]

und das ist die einzige Fehler.

[svit]

Problem dabei ist das ich diese PCML-Datei bei der Installation von Webservice benötige.

[svit]

Im Wandlungsprotokoll steht nur

*RNF0320 30 Fehler beim Generieren der Programminformationen gefunden,
die in das Modul gestellt werden sollen.

[Fuerchau]

Die einzige Idee dazu ist:
Du schreibst "viele Parameter".
Versuche mal mit weniger und schrittweiser Erhöhung bis zum Fehler, ggf. gibt es hier eine Grenze für die Anzahl.

[svit]

Ich glaube ich habe den Fehler gefunden.
die PCML-Datei kann nur bestimmte Anzahl Felder(oder Speicherplatz) in den verschachtelten Datenstrukturen abbilden.
Der Hinweis mit 7 Parametern war gar nicht mal so schlecht.
Bei mir sind 50 Parameter.
aber ganaues habe ich bis jetzt nicht gefunden.

[Fuerchau]

Mach doch einfach eine SQL-Prozedur mit IN/INOUT/OUT-Parametern.
Dann kannst du das ganze per SQL aufrufen (PHP, Java, ...).
Ist viel einfacher und stabiler.
Die Anzahl der Parameter ist auf 255 beschränkt.

[B.Hauser]

Die Anzahl der Parameter ist auf 255 beschränkt.

Seit Release V5R4 auf 1024!

Birgitta

[Fuerchau]

Was nützt mir das, wenn z.B. ILE-Programme nicht mehr als 400 können?
Im SQL-Modus noch Zusatzvariablen für NULL-Anzeiger und SQL-spezifische gibt's weitere Reduzierung.
Und zu guter Letzt: wer behält die Übersicht?
Hast du mal mit Native-SQL mehr als 200 probiert?

[BenderD]

nochmal: Finger weg von dem PCML Müll, da gibt es Restriktionen beim generieren von dem Quatsch und bei der Verwendung bei den Dollschachtel Calls. Der ServiceProgrammCall taugt dabei noch weniger als der ProgrammCall, da er intern das QZRUCLSP verwendet. Je nach OS/400 Release kann der PCML Müll kein Date, Tim, Timestamp und Buggy ist das auch noch. Zudem werden diese ganzen Datenstrukturen als binary data übergeben... (mir wird schon wieder schlecht).

D*B

Ich glaube ich habe den Fehler gefunden.
die PCML-Datei kann nur bestimmte Anzahl Felder(oder Speicherplatz) in den verschachtelten Datenstrukturen abbilden.
Der Hinweis mit 7 Parametern war gar nicht mal so schlecht.
Bei mir sind 50 Parameter.
aber ganaues habe ich bis jetzt nicht gefunden.