! LIBEDATE
def &d$ &ret$
set &d$ = rstr(`/`,` `,#d$);
set &ret$ = word(&d$,2),`/`,word(&d$,1),`/`,subs(word(&d$,3), -2, 2)
Ответ 1
Что такое CAD? Почти все древние САПР имеют свои собственные (обычно странные и плохо разработанные) языки сценариев. Может ли это быть одним из продуктов Tribon?