Submit Eform Request for Transfer of code to Laser Printers:

 

Once the code has been loaded into the PDS, then a batch job can be submitted to transfer the code from the Enterprise Server to the Xerox 4090 laser printers. Below are examples of the JCL code that is used for the transfer process. Data Control will take care of the setting up JCL for the source of Elixir forms and will also run the final transfer job. HOWEVER, if you need to transfer an Object file(.FRM, .JDL) or an image file (.IMG) , please go to Prepare Object-type files for transferring first to make sure that your object code members are properly setup for transferring.

Click here when you are ready to submit an eform request to have Data Control transfer the Elixir-generated code from the Enterprise Server down to the Xerox laser printers.

  

SOURCE-type code is considered 'Card-Image' (80 characters per record).

Data Control will use the following JCL (coded in red) to wrap around the laser source code:

 

//xxxJxxxP JOB (9999999,999,???,'TRANSFER LASER SOURCE'),
//  'n.nnnnnnn 9-9999',MSGCLASS=Q,PRTY=8,REGION=640K,TIME=5,CLASS=Q   
//STEP010     EXEC PGM=IEBGENER                                      
//SYSPRINT    DD DUMMY                                               
//SYSUT2      DD SYSOUT=Q                                            
//SYSIN       DD DUMMY                                               
//SYSUT1      DD *                                                   
$$DJDE FILE=(),END;    
         ****  insert source laser code starting here   ****    
FORM UVATS1;                                                 
PAPER USLETTER;                                              
LANDSCAPE;                                                   
GRID DOTS ORIGIN 0 0;                                        
COMMENT  THIS FORM CREATED BY ELIXIR TECHNOLOGIES SOFTWARE;  
FONTS HE07BL HE08BL HE11BL UN308X;                           
AT 0342 HOR LINE 0153 TO 3152 SOLID 1;                       
AT 0445 HOR LINE 0153 TO 3152 SOLID 1;                       
AT 0228 VER LINE 0344 TO 2147 SOLID 1;                       …
HOR TEXT ALI LEFT FONT 1 AT 2462 0588 't Pay Period';                    
HOR TEXT ALI LEFT FONT 1 AT 2462 1184 '5 - Warning:   Employee has 100 h 
ours or less remaining';                                                 
END;         
                ****  inserted laser source code ends here  ****                                                                                                      
$$DJDE FILE=(END,,C),END;

 

  OBJECT-type code members with suffixes: .FRM, .FNT, .JDL, .IMG are considered 'LPS-tape labeled type'.

The data within this type of file is coded in binary and will not be readable as normal text. Make sure the following DJDE statement (noted in red) is at the top of the laser code member AND that all records, following the first label-record, within the member have an '*' in column 129 (IF NOT, the User requesting the transfer must go to the step: Prepare Object-type files for transferring and fix the code or the transfer will fail).

Example:

 

$$DJDE FILE=(),END;
Ë c | Î            èëñ+ë   ñ(å
ñ>È ÊøÊ ËË ì Ê?Ì     ñ_ ã?Ê_/È      µ W  Þ
                      ø          +   
{
                  {                     0
0                                        g     8              "\
-   \     8    \                                      {
\           0                                 G{
0 8          \         "  \  {            \   0   @     10               8

 

 

  Then Data Control will use the following jcl to download it to the laser printer:

 

//xxxJxxxT JOB (3178110,101,999,'TRANSFER LASER SOURCE'),
//  'x.xxxxxxx  9-9999', 
//   ',MSGCLASS=Q,PRTY=8,REGION=640K,TIME=5,CLASS=Q 
//STEP010     EXEC PGM=IEBGENER                                    
//SYSPRINT    DD DUMMY                                             
//SYSIN       DD DUMMY                                             
//SYSUT2      DD SYSOUT=Q                                          
//SYSUT1      DD DSN=transfer.dataset.name?(memname?),DISP=SHR

 

 

 

 

 

 

 

 

 

 

 

 

 

© 2008 by the Rector and Visitors of the University of Virginia.

The information contained on the University of Virginia’s Department of Information Technology and Communication (ITC) website is provided as a public service with the understanding that ITC makes no representations or warranties, either expressed or implied, concerning the accuracy, completeness, reliability or suitability of the information, including warrantees of title, non-infringement of copyright or patent rights of others. These pages are expected to represent the University of Virginia community and the State of Virginia in a professional manner in accordance with the University of Virginia’s Computing Policies.