ОТПРАВИТЬ РАБОТУ В TSO ОШИБКА
Сейчас я изучаю программирование мэйнфреймов. Я получил идентификатор пользователя с Дежи, и я использую эмулятор терминала PASSPORT.Мой пользователь - CATIA81
Я загрузил несколько заданий и программу cobol для тестирования. Я пытался отправить работу через ISPF COMMAND SHELL:
SUBMIT CATIA81.KSDCRTJ1.JCL
И я получаю следующую ошибку:
SUBMIT cancelled, JOBNAME must start with CATIA81
Это то, что у меня есть
//CATIA81KDEL1 JOB CSBL81,CLASS=1,MSGCLASS=0,NOTIFY=CSIP1
//* *******************************************************************
//* This program is provided by: SimoTime Enterprises *
//* (C) Copyright 1987-2012 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//* Subject: JCL to delete a VSAM Data Set using the IDCAMS Utility *
//* Author: SimoTime Enterprises *
//* Date: January 1, 1998 *
//*-------------------------------------------------------------------*
//* The following example is more than what is usually required to *
//* delete a VSAM Data Set. However, the purpose is to illustrate the *
//* functions of the IDCAMS utility. *
//*********************************************************************
//*
// EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE CATIA81.DATA.VKSD0080 -
FILE (VKSD0080) -
PURGE -
ERASE -
CLUSTER
SET MAXCC = 0
/*
//
Первоначально JOBNAME был KSDDELJ1, который я изменил на CATIA81KDEL1. В чем были (были) мои ошибки?
1 ответ
Имена заданий не могут быть длиннее 8 символов, измените имя задания с CATIA81KDEL1 на CATIA81K
Кроме того, имя задания не может быть длиннее 8 символов, вы также хотите заключить имя набора данных в кавычки, если вы не хотите, чтобы оно было явно полностью определено. В противном случае TSO добавляет ваш префикс пользователя в начале имени.
Префикс обычно соответствует идентификатору пользователя, но может быть установлен по-другому с помощью команды TSO PROFILE. Чтобы увидеть, что определено в вашей среде, вы можете запустить этот маленький REXX-скрипт:
/* REXX */
say 'sysvar(syspref):' sysvar(syspref)
say 'sysvar(sysuid): ' sysvar(sysuid)