/* convert numeric to character */ char_year=put(year,4.0); /* convert character to numeric */ char1='1234.56'; num1=input(char,7.);
/* convert numeric to character */ char_year=put(year,4.0); /* convert character to numeric */ char1='1234.56'; num1=input(char,7.);