IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Back Page print direction (Duplex Print).


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
carymainframer

New User


Joined: 27 Apr 2021
Posts: 10
Location: usa

PostPosted: Fri Apr 30, 2021 8:13 pm
Reply with quote

This is my second post in this forum. I have a requirement to make sure both front and back pages to be printed in same direction. Right now with below syntax my back page is printed in opposite direction. Please advise if i need change anything in my current syntax.

Code:
//PPFA     EXEC PGM=AKQPPFA                           
//SYSPRINT DD   SYSOUT=*                             
//FORMLIB  DD   DSN=XXX.FDEFLIB,DISP=SHR     
//PAGELIB  DD   DSN=XXX.PDEFLIB,DISP=SHR     
//SYSIN    DD   *                                     
FORMDEF XXXX
  DUPLEX NORMAL                     
  REPLACE YES                       
  PRESENT PORTRAIT                 
  DIRECTION DOWN;                   
  OFFSET 0 0  ;     
OVERLAY XXXX;                     
SUBGROUP BOTH COPIES1 ;             
PAGEDEF XXXX                     
    REPLACE YES;                   
FONT GT12;                         
PAGEFORMAT P2XXXX               
    DIRECTION DOWN                 
    WIDTH 8.5 IN HEIGHT 11 IN;     
SETUNITS LINESP 6 LPI;             
PRINTLINE REPEAT 53 CHANNEL 1       
          FONT GT12             
          POSITION 0.00 1.90;   
PRINTLINE REPEAT 1 CHANNEL 3     
          FONT GT12             
          POSITION 0.00 0.30;   
/*
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 325
Location: Inside the SPEW (Cincinnati OH USA)

PostPosted: Sat May 01, 2021 12:51 am
Reply with quote

So rusty and from an old Xerox laser guy, try pagedef direction as ACROSS or BACK.

Mentioned in

stuff.mit.edu/afs/athena/astaff/project/ipm/doc/s5445284.pdf
Back to top
View user's profile Send private message
carymainframer

New User


Joined: 27 Apr 2021
Posts: 10
Location: usa

PostPosted: Mon May 03, 2021 11:03 pm
Reply with quote

dneufarth wrote:
So rusty and from an old Xerox laser guy, try pagedef direction as ACROSS or BACK.

Mentioned in

stuff.mit.edu/afs/athena/astaff/project/ipm/doc/s5445284.pdf


Thanks for the response. I tried with direction as across and back but unfortunately its not working.
Back to top
View user's profile Send private message
carymainframer

New User


Joined: 27 Apr 2021
Posts: 10
Location: usa

PostPosted: Tue May 04, 2021 2:22 am
Reply with quote

Tried with following Syntax. Now my second page prints in correct direction but the header alone prints in opposite direction.

Code:
//SYSIN    DD   *                                           
 FORMDEF LHHDLD                                             
   DUPLEX NORMAL                                           
   REPLACE YES                                             
   PRESENT PORTRAIT                                         
   OFFSET 0 0;                                             
 OVERLAY LHHDLD;                                           
 SUBGROUP BOTH COPIES 1 OVERLAY LHHDLD;                     
 PAGEDEF LHHDLD WIDTH 8.5 IN HEIGHT 11 IN                   
     REPLACE YES;                                           
 FONT GT12;                                                 
 SETUNITS LINESP 6 LPI;                                     
 PAGEFORMAT P2FRONT DIRECTION DOWN ;                       
 PRINTLINE CHANNEL 1 POSITION 0.00 1.90;                   
 CONDITION GOTOBACK START 1 LENGTH 1                       
 WHEN GE X'00' AFTER SUBPAGE NULL PAGEFORMAT P2BACK ;       
 PRINTLINE REPEAT 53 ;                                     
 PAGEFORMAT P2BACK DIRECTION UP ;                           
 PRINTLINE CHANNEL 1 POSITION 0.00 1.90;                   
 CONDITION GOTOFRNT START 1 LENGTH 1       
WHEN GE X'00' AFTER SUBPAGE NULL PAGEFORMAT P2FRONT ;         
PRINTLINE REPEAT 53 ;                                         
/*                 
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Print report for each record from mul... CA Products 1
No new posts Proc print in Mainframe All Other Mainframe Topics 4
No new posts Force a Return Code and print error m... SYNCSORT 30
No new posts Print next line strings when a condit... DFSORT/ICETOOL 9
No new posts SQL pretty print CLIST & REXX 7
Search our Forums:

Back to Top