|
I find my error! I make a bad mistake: I declare the fields MSGDLN and MSGn as 4B0, I have to declare it as 10I0. Now it works fine. Thanks a lot to all. Fabrizio Gurrieri - BARTOLINI SPA Via E.Mattei 42 - 40138 BOLOGNA (Italy) Tel:+39 051 6015593 - Fax:+39 051 530365 E-Mail: Fabrizio.Gurrieri@xxxxxxxxxxxx Internet: http://www.bartolini.it -----Messaggio originale----- Da: Gurrieri Fabrizio Inviato: lunedì 20 ottobre 2003 21.52 A: MIDRANGE-L@xxxxxxxxxxxx Oggetto: CPF24B6 with QMHSNDM... Hi all, the follow instruction return always the CPF24B6 error: C* C EVAL MSGFIL = 'MSGFGAI *LIBL' C CALL 'QMHSNDM' C PARM 'BAR0001' MSGID C PARM MSGFIL C PARM wMsgDft MSGDTA C PARM 120 MSGDLN C PARM '*INFO' MSGTYP C PARM '*SYSOPR' MSGQ C PARM 1 MSGQn C PARM *BLANKS RPYMQ C PARM MSGKEY C PARM QUSEC C* The message ID 'BAR0001' are coded like that: File messaggi . . . . . . . . . : MSGFGAI Libreria . . . . . . . . . . . : GAITRAOBJ ID messaggi: BAR0001 BAR0001 Messaggio . . . : &1 Causa . . . . . : Non ci sono ulteriori informazioni di aiuto in linea disponibili. Gravità . . . . . . . . . . . . . . . . . : SEV 40 Formati dei campi dati del messaggio . . . : FMT Lunghezza Tipo dati Lungh. Byte var. o Pos. dec. &1 *CHAR 512 Dati di cui eseguire il dump . . . . . . . : DMPLST *JOB Livello messaggio. . . . . . . . . . . . . : LVL 20/10/03 01 Livello di modifica . . . . . . . . . . : 20/10/03 03 Opzione di avviso . . . . . . . . . . . . : ALROPT *NO Registrazione problema . . . . . . . . . . : LOGPRB *NO ID serie di caratteri codificati . . . . . : CCSID 65535 But I receive in QUSEC always the CFP24B6!!! Any suggest? Thanks a lot in advance. Fabrizio Gurrieri - BARTOLINI SPA Via E.Mattei 42 - 40138 BOLOGNA (Italy) Tel:+39 051 6015593 - Fax:+39 051 530365 E-Mail: Fabrizio.Gurrieri@xxxxxxxxxxxx Internet: http://www.bartolini.it <http://www.bartolini.it/> _______________________________________________ This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/midrange-l or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.