/* Create the 8 bytes, ebcdic VM segment name from an ascii name.  */
static void dcss_mkname(char *name, char *dcss_name)
/* Create the 8 bytes, ebcdic VM segment name from an ascii name.  */
static void dcss_mkname(char *name, char *dcss_name)
{
	int i;
	for (i = 0; i < 8; i++) {
		if (name[i] == '\0')
			break;
		dcss_name[i] = toupper(name[i]);
	};
	for (; i < 8; i++)
		dcss_name[i] = ' ';
	ASCEBC(dcss_name, 8);
}