* Как конвертировать запись даты в строковой переменной в формат даты. * (Ответ) Автор: Raynald Levesque, 16.04.2004. DATA LIST FIXED /str1 1-8(A). BEGIN DATA 04Apri03 01May 02 12Sept02 31Octo02 END DATA. STRING str2(A8). COMPUTE str2=str1. DO REPEAT m='Janu' 'Febr' 'Marc' 'Apri' 'May' 'June' 'July' 'Augu' 'Sept' 'Octo' 'Nove' 'Dece' /nb=1 TO 12. COMPUTE pos=INDEX(str2,m). IF pos>0 SUBSTR(str2,pos,4)=CONCAT("-",STRING(nb,N2),"-"). END REPEAT PRINT. COMPUTE date1=NUMBER(str2,EDATE8). FORMATS date1(ADATE10). VARIABLE WIDTH date1(11). EXECUTE.