Re: How to copy code from the publications of Xephon

2011-01-04 Thread Fran Hernandez
Hello,

After several test the only that work in my environment is Foxit Reader. I
never used it and made the work as appear on the magazine code.

Kind Regards everybody

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-04 Thread Farley, Peter x23353
 -Original Message-
 From: IBM Mainframe Discussion List
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Fran Hernandez
 Sent: Tuesday, January 04, 2011 3:21 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: How to copy code from the publications of Xephon

 Hello,

 After several test the only that work in my environment is
 Foxit Reader. I never used it and made the work as appear
 on the magazine code.

One tool I did not see mentioned is Xpdf, an open-source tool
available here:

http://www.foolabs.com/xpdf/

Quoting from their website:

Xpdf is an open source viewer for Portable Document Format (PDF) files. (These 
are also sometimes also called 'Acrobat' files, from the name of Adobe's PDF 
software.) The Xpdf project also includes a PDF text extractor, 
PDF-to-PostScript converter, and various other utilities.

Xpdf runs under the X Window System on UNIX, VMS, and OS/2. The non-X 
components (pdftops, pdftotext, etc.) also run on Win32 systems and should run 
on pretty much any system with a decent C++ compiler.

Caveat: I have not used their pdftotext commandline tool on Xephon PDF's, so I 
don't know how it would work on them, but I have used it on other PDF's under 
WinXP to extract text with good success, including some formatting (though not 
all).  YMMV.

HTH

Peter

--
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-04 Thread Paul Gilmartin
On Mon, 3 Jan 2011 01:45:21 -0600, Fran Hernandez wrote:

I will like copied code Xepphon publications found on
http://www.cbttape.org/xephon/.

I tried using both the Notepad and Word and OpenOfffice but the code I
get the copy from the PDF is not correct, is always shifted to the left.

Anybody can comment and make such copy the code in positions that
correspond?

No solution, but by way of explanation: many PostScript-generating
applications don't separate words with spaces.  Rather, they issue
a moveto operator before each word to justify the text (silly
practice when using a monospaced font).  If the PDF document was
distilled from such a PostScript program, it will likewise lack
spaces, causing the misbehavior you observe.  Of course, it's
possible for a filter to interpret the movetos to infer the amount
of linear and vertical white space to reconstruct the desired text.
But SMOP.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Elardus Engelbrecht
Fran Hernandez wrote:

I tried using both the Notepad and Word and OpenOfffice but the code I
get the copy from the PDF is not correct, is always shifted to the left.

What do you mean 'always shifted to left'? All lines or some indented lines? 
Are 
you losing all column 1 characters?

Use the latest Acrobat Reader Version. I'm using version 9. I seldom 
experienced problems by using copy/paste from PDF to other editor(s). Some 
formatting may be lost of course.

How did you select your code? And how did you do the copy action?

Or at least tell us WHAT book and WHAT text are you trying to copying? 
Perhaps copying is inhibited in that book?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Lizette Koehler
 Fran Wrote:
 I will like copied code Xepphon publications found on
http://www.cbttape.org/xephon/.
 
 I tried using both the Notepad and Word and OpenOfffice but the code I
get the
 copy from the PDF is not correct, is always shifted to the left.
 
 Anybody can comment and make such copy the code in positions that
correspond?
 
 Thank you very much.
 

Fran I  have Adobe Reader R10 (X) and it does just fine.  

Depending on how you are accessing this file, I would SAVE the PDF to your
PC.  Then open it with Adobe on your PC.  Then SAVE AS the file as a TEXT
FILE.  Then Search for the code.  It will hopefully look more normal.  This
is not pretty in format.  But it may do what you want.

Also, you might not be able copy the entire code at one time.  You need to
do it one page at a time and do not copy the header and footer.  It will
have a tendency to make the paste different.



Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Fran Hernandez
Hello, 
I use the version of Adobe Acrobat Reader version 9.4.1 Windows 7. 
I use the selection tool (an arrow) and copied it in the emulator 3270 
with control v. 
the code is always shifted left with the implications if code Assembler. 

For example, I selected the code in Assembler mvs001 PDF document (page 
31), with the arrow to select and copy the code in the 3270 emulator displays 
the following (moved to the left)

I post the file for a example.

Kind Regards.

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
PREPATCH EQU *
LA R4,SUBTECB Point to the subtask's ECB
XC SUBTECB,SUBTECB
ATTACH EPLOC=(3),PARAM=((2)),ECB=(4),VL=1
ST R1,TASKTCB Preserve the task's TCB address
WAIT ECB=SUBTECB Wait for subtask to complete
LA R1,TASKTCB Load the subtask's TCB address
DETACH (1) DETACH the subtask
XR R15,R15
ICM R15,7,SUBTECB+1 Pick up subtask's return code
LTR R15,R15 Zeros?
BZ SUCCESS Yes, terminate normally
CODEANAL L R2,SUBTECB Pick up the ECB contents
SRA R2,12 Move 12 bytes to the right
CLM R2,1,=X'37' Did we have an X37 type abend?
BNE PERCOLAT No, go percolate the abend
OI X37FLAG,Yes Yes, set flag
B RETRY Go switch to tape


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Fran Hernandez
Hello, 

I made the choice to save the file as type txt but the problem continues the 
code is moved to the left, it seems that does not respect the blanks between 
characters. 

Any other ideas?

I send a copy of the code in the txt file to view the effect.

Kind Regards.

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
SARSTCUX TITLE 'SARSTCUX - SARSTC USER EXIT' 
* 
*** 
* * 
* * I M P O R T A N T I N F O R M A T I O N * * 
* * 
* WHEN SAR REJECTS A JOB FROM THE ARCHIVE, THE JOB IS REQUEUED * 
* FOR OUTPUT UNDER THE NAME OF THE SAR STARTED TASK. THIS MEANS * 
* THAT ALL REJECTED OUTPUT HAS THE SAME NAME AS THE SAR STARTED * 
* TASK, AND HAS LOST ITS ORIGINAL JOB NAME. TAKE HEED. * 
* * 
*** 
SARSTCUX CSECT


 EBCMODE , SETS MODE TO 31/ANY BY DEFAULT 
*** 


* SARSTCUX -* 
* SAR ARCHIVAL STARTED TASK USER EXIT. THE EXIT IS INVOKED * 
* WHEN A SYSOUT DATASET IS SELECTED FOR ARCHIVAL, BEFORE * 
* EACH SYSOUT RECORD IS ARCHIVED, AND AFTER ALL SYSOUT HAS * 
* BEEN PROCESSED FOR THE DATASET. THE EXIT MAY BE USED * 
* TO ALTER ATTRIBUTES IN THE GCR FOR THE DATASET AND TO * 
* IDENTIFY EXCEPTIONAL CONDITIONS. * 
* * 
* INPUTS -* 
* REG Ø - Ø, NEW SYSOUT DATASET SELECTED. * 
* 4, SYSOUT RECORD PASSED TO EXIT FOR EXCEPTIONAL * 
* CONDITION ANALYSIS. * 
* 8, NO MORE RECORDS FOR DATASET. * 
© 2000. Reproduction prohibited. Please inform Xephon of any infringement.


* REG 1 - ADDRESS OF PARAMETER LIST (MAPPED BY SARSPL). * 
* REG13 - ADDRESS OF REGISTER SAVE AREA * 
* REG14 - RETURN ADDRESS * 
* REG15 - ENTRY POINT ADDRESS. * 
* * 


* OUTPUTS (WHEN REG Ø = Ø ON INPUT) -* 
* REG Ø - CONTENTS ARE IGNORED. * 
* REG 1 - CONTENTS ARE IGNORED. * 
* REG15 - CONTENTS ARE IGNORED. * 
* * 
* NOTES -* 
* 1. THE GCR FIELDS MAY BE CHANGED AS DESIRED. * 
* * 
* OUTPUTS (WHEN REG Ø = 4 ON INPUT) -* 
* REG Ø - ADDRESS OF WTO MESSAGE TO ISSUE. * 
* REG 1 - LENGTH OF WTO MESAGE TO ISSUE OR ZERO IF NO * 
* MESSAGE IS TO BE ISSUED. * 
* REG15 - Ø, DO NOT CHANGE THE PRINT STATUS OF THE SYSOUT * 
* GROUP. * 
* 4, THE SYSOUT GROUP IS TO BE PRINTED PROVIDED * 
* INITIALIZATION OPTION XPRINT=YES IS IN EFFECT. * 
* * 
* NOTES -* 
* 1. GCRXCODE MAY BE CHANGED TO CONTAIN A SHORT * 
* EXCEPTION MESSAGE. * 
* 2. GCRUSER MAY BE CHANGED IF DESIRED. * 
* 3. THE CONTENTS OF THE SYSOUT RECORD MAY BE CHANGED, * 
* AND ITS LENGTH CHANGED AS DESIRED. THE MAXIMUM * 
* LENGTH FOR THE RECORD IS 2Ø6 BYTES. SETTING THE * 
* RECORD LENGTH TO ZERO WILL CAUSE SAR TO DISCARD * 
* THE RECORD. * 
* * 
* OUTPUTS (WHEN REG Ø = 8 ON INPUT) -* 
* REG Ø - CONTENTS ARE IGNORED. * 
* REG 1 - CONTENTS ARE IGNORED. * 
* REG15 - CONTENTS ARE IGNORED. * 
* * 
* NOTES -* 
* 1. GCRXCODE MAY BE CHANGED TO CONTAIN A SHORT * 
* EXCEPTION MESSAGE. * 
* 2. GCRUSER MAY BE CHANGED IF DESIRED. * 
* * 
* MODIFICATION NOTES: -* 
* SPECIAL EXIT TO PRINT AND NOT ARCHIVE SYSOUTS THAT ARE * 
* MORE THAN A CERTAIN AMOUNT OF LINES. THE FOLLOWING * 
* MODIFICATIONS ARE NECESSARY TO IMPLEMENT THIS EXIT: * 
* * 
* THIS MODIFICATION IS FOR USE UNDER JES2 ONLY. * 
* * 
* 1. INDICATE THE MAXIMUM AMOUNT OF LINES THAT ARE TO BE * 
* ARCHIVED IN THE SETA STATEMENT FOR MAXLNES (5 * 
* IS USED AS AN EXAMPLE). * 
* 2. INDICATE THE PRINT CLASS FOR SYSOUTS GREATER THAN * 
© 2000. Xephon UK telephone 01635 33848, fax 01635 38345. USA telephone (940) 
455 7050, fax (940) 455 2492. 


* 
THE MAXIMUM LINES IN THE SETC STATEMENT FOR PRTCLS * 


* (CLASS P IS USED AS AN EXAMPLE), AND THE INITIAL-* 
* IZATION PARAMETERS PRTCLSL AND NARCCLSL MUST BE * 
* SET TO THE SAME CLASS. THE CLSL INITIALIZATION * 
* PARAMETER MUST NOT INCLUDE THIS SYSOUT CLASS, NOR * 
* MAY THE SYSTEM EXTENSIONS HAVE THIS CLASS IN THE * 
* SYSCLASS PARM. * 
* ATTRIBUTES -* 
* AUTHORIZED. * 
*** 
MACRO 


LABEL 
DATADEF NAME 
LCLA COUNT 


COUNT 
SETA K'NAME-2 
AIF (COUNT LE 8).CHK1 
MNOTE 8,'NAME GREATER THAN 8 CHARACTERS' 
MEXIT 


.CHK1 
AIF (COUNT NE Ø).GEN 


LABEL 
DC AL1(Ø) END OF TABLE INDICATOR 
AGO .DONE 


.GEN 
ANOP 


LABEL 
DC AL1(COUNT),CLCOUNT.NAME LENGTH, VALUE 


.DONE 
MEND 
LCLA MAXLNES 
LCLC PRTCLS 


PRTCLS 
SETC 'Y' PRINT CLASS 


MAXLNES SETA 1 
MAX ARCHIVAL LINES ( NONE FOR NOW )


 SAVE (14,12),,SARSTCUX-SYSDATE 
LR R12,R15 LOAD BASE REGISTER 
USING SARSTCUX,R12 
LR R4,R1 SAVE A(PARM LIST) 
USING SPL,R4 ADDRESSABILITY FOR PLIST 
LTR RØ,RØ VERIFY NEW DATASET SELECTED 
BNZ RETURN NO, THEN RETURN 
L R1Ø,SPLGCR LOAD ADDRESS OF GROUP CNTL RECORD 
USING GCR,R1Ø 
CLC =CL8'SYSLOG',GCRJNAM IS THIS JOB A SYSLOG 

Re: How to copy code from the publications of Xephon

2011-01-03 Thread John P Kalinich
You might try to copy the code using the Foxit Reader.

Regards,
John K



   
  From:   Fran Hernandez frcoh...@gmail.com   
   

   
  To: IBM-MAIN@bama.ua.edu  
   

   
  Date:   01/03/2011 07:29 AM   
   

   
  Subject:Re: How to copy code from the publications of Xephon  
   

   





Hello,

I made the choice to save the file as type txt but the problem continues
the
code is moved to the left, it seems that does not respect the blanks
between
characters.

Any other ideas?

I send a copy of the code in the txt file to view the effect.

Kind Regards.

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Sebastian Welton
This is happening because it is not preserving the formatting, happens to me
a lot when copying from PDF documents and so I just end up editing the
pasted version. Some versions of Acrobat and other PDF readers have an
option to copy with keeping the formatting, mine doesn't seem to but there
may well be an option you have to set in preferences for this.

Sebastian.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to copy code from the publications of Xephon

2011-01-03 Thread Rozeboom, Kay [DAS]
I have had this problem too.  What I found is that to solve this problem, you 
need special software that converts the text from PDF to some other format.  A 
coworker found a good freeware version at the link below.  I used the Some PDF 
to Word Converter option.  It doesn't handle all images well, but it converts 
COBOL code beautifully.

  http://www.somepdf.com/

My coworker said that you should beware of some of the other supposed freeware 
offers for this type of software.  Some contain viruses or spyware, and some 
will convert one or two pages of your document, then tell you that you have to 
pay to continue.  He also said that you should use the link above rather than 
googling the product name, because there are other products masquerading as 
this one.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Fran Hernandez
Sent: Monday, January 03, 2011 1:45 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to copy code from the publications of Xephon

Hi colleagues, 

I will like copied code Xepphon publications found on 
http://www.cbttape.org/xephon/.
 
I tried using both the Notepad and Word and OpenOfffice but the code I 
get the copy from the PDF is not correct, is always shifted to the left.
 
Anybody can comment and make such copy the code in positions that 
correspond? 

Thank you very much. 

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How to copy code from the publications of Xephon

2011-01-02 Thread Fran Hernandez
Hi colleagues, 

I will like copied code Xepphon publications found on 
http://www.cbttape.org/xephon/.
 
I tried using both the Notepad and Word and OpenOfffice but the code I 
get the copy from the PDF is not correct, is always shifted to the left.
 
Anybody can comment and make such copy the code in positions that 
correspond? 

Thank you very much. 

Fran

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html