Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 8500

CICS :: RE: DFHWS2LS return value

$
0
0
Author: divated
Subject: Reply to: DFHWS2LS return value
Posted: Thu Nov 24, 2016 5:18 pm (GMT 5.5)

Posting with detailed clarification.

source system (wsdl) layout

salary decimal 14
rate decimal 14
fees decimal 14

data returned output 1 in application

salary 1234567.123
rate 1234.123456
fees 1234567.123

data returned output 2 in application

salary 1234567.123
rate 1234.123
fees 1234567.123

Cobol layout generated from DFHWS2LS JCL.

ws-salary pic 9(15)v999.
ws-rate pic 9(15)v999.
ws-fees pic 9(15)v999.

Result: My invoke webservice is failing in test case 1 as ws-rate field is expected to be defined as pic 9(12)v9(6).

Note: Cobol Layout is generated from DFHWS2LS JCL.I tried with DEFAULT-FRACTION-DIGITS=6 but then the ws-salary and ws-fees is also generated with pic 9(12)v9(6) (I don't want to change the ws-salary and ws-fees).

Any help to change the para parameters so that my jcl will generate the copybook with correct ws-rate field.

Error: DFHPI1009 XML to data transformation failed. A conversion error (FRACTION_TOO_LONG) occurred
when converting field ws-rate for WEBSERVICE feeLookup.

JCL:

Code:
/*JOBPARM SYSAFF=*                                                 
// JCLLIB ORDER=TRCICSX.R520.R1.SDFHINST                           
//WS2LS     EXEC DFHWS2LS,USSDIR='cicsts52',                       
// JAVADIR='java/J7.1_64',                                         
// PATHPREF=''                                                     
//INPUT.SYSUT1 DD *                                                 
LOGFILE=/u/cyd4/fxmgoxml.log                                       
MAPPING-LEVEL=4.0                                                   
MINIMUM-RUNTIME-LEVEL=4.0                                           
PDSLIB=//TRISDXX.SHARED.LIBRARY                                     
REQMEM=FXMGI                                                       
RESPMEM=FXMGO                                                       
LANG=COBOL                                                         
OPERATIONS=feeLookup                                               
DATA-TRUNCATION=ENABLED                                             
WSBIND=/cics/cicsts52/ws_bind/dev1/forxsreq/fxmgoxml.wsbind   
WSDL=/cics/cicsts52/ws_bind/dev1/forxsreq/*                   
agent.wsdl                       
DEFAULT-FRACTION-DIGITS=3           
*/

Coded
_________________
Thanks,
Dilip Divate


Viewing all articles
Browse latest Browse all 8500

Trending Articles