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

DFSORT/ICETOOL :: RE: Unwrap the data based on delimiter X'25'

$
0
0
Author: Arun Raj
Posted: Fri Dec 09, 2016 4:14 pm (GMT 5.5)

So those were infact blanks, and what happened to them? And on a quick dirty read, your output does not seem to be consistent with the input. The output seems to have 4 'segments' not 3. And I could not locate the ST in the below piece. What about Bill's question on the max or min length.?
Quote:
ISA*00* *00* *01*078769021 *16*054481205CPIC *16
9*U*00301*000000061*0*P*~ GS*PS*078769021*054481205*161111*0229*61*X*003
30*610001 BFR*00**161110*DL*A*170201*170301*161110 N1*MI*Toyota Tsusho A
Inc.*92*311


Quote:
ISA*00**00**01*078769021*16*054481205CPIC*161111*0229*U*00301*000000061*
GS*PS*078769021*054481205*161111*0229*61*X*003010
ST*830*610001
N1*MI*ToyotaTsushoAmerica,Inc.*92*311
Your original input has content that does not appear in the expected output and vice-versa.

Quote:
Hi all,I want to achieve this through SORT.So I can't use the cobol program for this
What you want to do, does not matter. What matters is whether the problem needs it or not.
_________________
Arun
----------------------------------------------------------------------------------------------------
Love is like an hourglass, with the heart filling up as the brain empties. -Jules Renard


Viewing all articles
Browse latest Browse all 9405