sql procedure code fails on V7R4

here is an SQL procedure that fails on V7R4. Works on V7R3

CREATE or replace PROCEDURE test0002p(
INseqn CHAR(7) DEFAULT ' '
)
LANGUAGE SQL
SPECIFIC TEST0002P
BEGIN

declare vcount int default 0 ;
declare vCmds char(80) default ' ' ;

select count(*)
into vCount
from qrpglesrc a
where ( inSeqn = ' '
or inSeqn <> a.srcseq ) ;

set vCmds = 'SNDMSG MSG(''count:' || char(vCount) ||
''') TOUSR(*SYSOPR) ' ;
call qcmdexc ( vCmds, 80 ) ;

end

STRSQL
call test0002p
Conversion error on variable or parameter TEST0002P.INSEQN.
call test0002p ( '15.00')
CALL statement complete.