Page 1 of 1

Insync to File aid conversion

Posted: Tue Aug 12, 2014 5:49 pm
by YDeepu
Hi Team,
I am glad to be part of this Forum. Can you please help me in the below issue ?

I have requirement to provide an exact copy of Insync file mapping to File aid.
Details are as below :

//STEP1 EXEC PGM = INSYNC , PARM =MVS
//#INDD DD DSN = input file (length = 6140 , type= VB),DISP=SHR

//#OUTDD1 DD DSN = output file ,
// DISP= (NEW,PASS),
// UNIT=SYSDA ,SPACE =(CYL,(20,20),RLSE)
//#LOG DD SYSOUT= *

//#PARM DD *
FUNCTION =EXTRACT
MULTICASE =YES
INDD= #INDD
RDW = OFF
WORKAREA= 7000
MOVE= (W+100,6140,C,1,6140,C)
WRITE = (#OUTDD1,W+100,6140)
/*


can you please help me what are the similar conditions in File aid. Here can you explain me in detail what is the significance of W+100 and how to symbolize the same in File aid.

Thank you.
Deepu

Posted: Tue Aug 12, 2014 11:55 pm
by gaurav_sharma16
YDeepu wrote:Hi Team,
I am glad to be part of this Forum. Can you please help me in the below issue ?

I have requirement to provide an exact copy of Insync file mapping to File aid.
Details are as below :

//STEP1 EXEC PGM = INSYNC , PARM =MVS
//#INDD DD DSN = input file (length = 6140 , type= VB),DISP=SHR

//#OUTDD1 DD DSN = output file ,
// DISP= (NEW,PASS),
// UNIT=SYSDA ,SPACE =(CYL,(20,20),RLSE)
//#LOG DD SYSOUT= *

//#PARM DD *
FUNCTION =EXTRACT
MULTICASE =YES
INDD= #INDD
RDW = OFF
WORKAREA= 7000
MOVE= (W+100,6140,C,1,6140,C)
WRITE = (#OUTDD1,W+100,6140)
/*


can you please help me what are the similar conditions in File aid. Here can you explain me in detail what is the significance of W+100 and how to symbolize the same in File aid.

Thank you.
Deepu
Hi all I had the same concern to I just want to know the logic behind using workarea here as W+100 is doing what ? here.I m puzzled as if it is a temporary storage the it shldnt effect the input file.