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

COBOL Programming :: RE: Alphanumeric to Numeric move on UNIX

$
0
0
Author: Rohit Umarjikar
Posted: Thu Aug 04, 2016 1:15 am (GMT 5.5)

Same as what you tried. I tried with variable and hardcoded space movements.
Code:
NOADATA                 
NOADV                   
  APOST                 
  ARCH(10)               
  ARITH(COMPAT)         
NOAWO                   
BLOCK0                   
  BUFSIZE(4096)         
NOCICS                   
  CODEPAGE(1140)         
NOCOMPILE(S)             
NOCURRENCY               
  DATA(31)               
NODBCS                   
NODECK                   
NODIAGTRUNC             
NODLL           
NODUMP         
NODYNAM         
NOEXIT         
NOEXPORTALL     
NOFASTSRT       
  FLAG(I,W)     
NOFLAGSTD       
  INTDATE(ANSI)
  LANGUAGE(EN) 
  LINECOUNT(60)
  LIST         
  MAP           
NOMDECK         
NONAME         
  NSYMBOL(DBCS)
NONUMBER         
  NUMPROC(NOPFD)
  OBJECT         
NOOFFSET         
  OPTIMIZE(2)   
  STGOPT         
  OUTDD(SYSOUT) 
  PGMNAME(COMPAT)
  RENT           
  RMODE(AUTO)   
NOSEQUENCE       
  SIZE(5000000) 
  SOURCE         
  SPACE(1)       
NOSQL           
  SQLCCSID       
 NOSSRANGE             
 NOTERM                 
   TEST(NOEJPD,SOURCE) 
 NOTHREAD               
   TRUNC(OPT)           
 NOVBREF               
 NOWORD                 
   XMLPARSE(COMPAT)     
   XREF(FULL)           
   ZWB                 
SQL("APOSTSQL,DEC(31)")

_________________
Regards,
Rohit Umarjikar
"Some things Man was never meant to know. For everything else, there's Google"


Viewing all articles
Browse latest Browse all 8500

Trending Articles