× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Hi list!

This is the first time I have an error with this API after we installed 
V5R3.

0038.00 /*                                                             */  
 
0039.00 /***************************************************************/  
 
0040.00  START:      PGM        PARM(&TASK &SUBTASK)  
0041.00  
0042.00              DCL        VAR(&TASK) TYPE(*CHAR) LEN(10)  
0043.00              DCL        VAR(&SUBTASK) TYPE(*CHAR) LEN(10)  
0044.00  
0045.00              DCL        VAR(&LOWER) TYPE(*CHAR) LEN(50)  
0046.00              DCL        VAR(&UPPER) TYPE(*CHAR) LEN(50)  
0047.00              DCL        VAR(&REQUEST) TYPE(*CHAR) LEN(22) +  
0048.00 VALUE(X'00000001000000000000000000000000000+ 
0049.00                           000000000') /* Uppercase based on job +  
 
0050.00                           default CCSID */  
0051.00              DCL        VAR(&LENGTH) TYPE(*DEC) LEN(4) VALUE(50)   
 
0052.00              DCL        VAR(&ERRCODE) TYPE(*DEC) LEN(4) VALUE(0)   
 
0053.00  
0054.00 /* Change task to be uppercase */  
0055.00              CHGVAR     VAR(&LOWER) VALUE(&TASK)  
0056.00              CALL       PGM(QLGCNVCS) PARM(&REQUEST &LOWER &UPPER 
+ 
0057.00                           &LENGTH &ERRCODE)  

Line 56 is blowing up:
==================
Scalar operand contains a value that is not valid. 
Dump output directed to spooled file 1, job 653686/PVIDAL/NPITPV1 created 
  on system PAC400 on 05/17/05 11:05:57. 
Complete thread information not available. 
Function check. MCH5003 unmonitored by QLEAWI at statement 0000000013, 
  instruction X'0000'. 
MCH5003 received by procedure MAPSECTSK. (C D I R) 
MCH5003 received by procedure MAPSECTSK. (C D I R) 

What have changed?  I checked the archives and there are just 10 hits 
about this topic. 

I do not find too much help on the IBM's website:
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/ic2924/info/apis/QLGCNVCS.htm

TIA,

Peter Vidal 
PALL Corporation / SR Programmer Analyst, IT Development Group
10540 Ridge Rd., Ste 203, New Port Richey, FL 34654-5111
http://www.pall.com

"Courage is the strength or choice to begin a change. Determination is the 
persistence to continue in that change." 
-- Anonymous --

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.