PKGSCR
(void) sprintf(path, "%s/i.%s", PKGSCR, cl_nam(i));
(void) sprintf(path, "%s/%s", PKGSCR, DEF_NONE_SCR);
(void) sprintf(path, "%s/r.%s", PKGSCR, cl_nam(i));
if (mkpath(PKGSCR)) {
(void) fprintf(stdout, "ckdirs=%s\n", PKGSCR);
progerr(gettext(MSG_MKPKGDIR), PKGSCR);
PKGSCR, aclass);