Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

DFHWS2LS return value

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
divated

New User


Joined: 30 Sep 2016
Posts: 5
Location: south africa

PostPosted: Mon Nov 07, 2016 5:44 pm    Post subject: DFHWS2LS return value
Reply with quote

Hello,

My DFHWS2LS jcl is returning output copybook with numeric field layout as 9(15)v9(3) comp-3. As DEFAULT-FRACTION-DIGITS is 3.

But I am expecting 2 fields(validExchangeRate and estimatedExchangeRate ) in the output copybook field as 9(12)v9(6) comp-3.

Any ideas how to do it.
_________________
Thanks,
Dilip Divate
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1715
Location: UK

PostPosted: Tue Nov 08, 2016 4:05 am    Post subject:
Reply with quote

No idea what you are talking about. I somehow do not think that is related to JCL or VSAM. DFH.... maybe it is CICS; copybook ... maybe it is COBOL.
Quote:
Any idea how to do it.
this should probably have a question mark (?) at the end of it otherwise you have not asked a question. And the answer is "to code it correctly". As you have not explained your problem at all well tht is probably the only answer.
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1610
Location: NY,USA

PostPosted: Tue Nov 08, 2016 4:12 am    Post subject:
Reply with quote

Look at this PTF to see if that solves the problem.
http://www-01.ibm.com/support/docview.wss?uid=swg1PM91654
Back to top
View user's profile Send private message
divated

New User


Joined: 30 Sep 2016
Posts: 5
Location: south africa

PostPosted: Thu Nov 24, 2016 5:18 pm    Post subject: Reply to: DFHWS2LS return value
Reply with quote

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
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1715
Location: UK

PostPosted: Fri Nov 25, 2016 3:14 am    Post subject:
Reply with quote

Please use the code tags when posting stuff from your screen.

Still do not know what you are talking about but it would appear not to JCL or VSAM. It may be COBOL, CICS or USS. Moving to CICS to start with.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts EZASOCKET Return code 32509 amitc23 All Other Mainframe Topics 4 Mon May 23, 2016 4:13 pm
No new posts DB2 SP - Return a returned resultset ... rakesh1155 DB2 3 Wed Oct 28, 2015 1:45 am
No new posts Assembler Code to check normal retur... amitc23 PL/I & Assembler 6 Mon Aug 17, 2015 3:52 pm
No new posts Set return code based on Input data cvijay784 SYNCSORT 3 Fri Aug 14, 2015 6:54 pm
No new posts Not able to set Return code to Zero vickey_dw JCL & VSAM 6 Fri Aug 07, 2015 11:23 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us