IBM Mainframe Forum

[kandrepavan]

Hi all,

Sample code :

Select all

DISP:PROCEDURE    OPTIONS(MAIN);
  DCL B FIXED DECIMAL(7);       
  GET LIST(B);                   
  PUT LIST(B);                   
END DISP;         

I am giving input as

Select all

//SYSIN DD *               
                   1234567 
/*

I am getting output as

Select all

********************************* TOP OF DATA **********************************
   1234567                                                                     
******************************** BOTTOM OF DATA ********************************

Though i ma giving input either in col 1 of sysin dd * or any column of sysin dd *
i am getting output starting from col 4 of spool
why like so?
can we give input from any column of sysin dd * in pl/i , if we give the same in cobol we will get data truncation?

thanx and regards
pavan

[NicC]

Have you read up about stream I/O in bothe the language reference and the programming guide?