1 INFO-VAX	Wed, 22 Mar 2006	Volume 2006 : Issue 162       Contents: Re: F$FAO (!%D) 2 FREE Webinar: Introduction to System Dump Analyzer( How to convert FB file to VBS32760 file?, Re: How to convert FB file to VBS32760 file?/ Re: Is VMS Security being dumbed-down for Java? / Re: Is VMS Security being dumbed-down for Java?  OT: Strange favor request  Re: OT: Strange favor request  Re: OT: Strange favor request  Re: OT: Strange favor request   F ----------------------------------------------------------------------    Date: 22 Mar 2006 00:21:51 -0800+ From: "Dr. Dweeb" <comp.os.vms@hotmail.com>  Subject: Re: F$FAO (!%D)B Message-ID: <1143015711.237025.73360@z34g2000cwc.googlegroups.com>   That was informative :-)   ------------------------------    Date: 22 Mar 2006 09:18:28 -0800% From: "Laura" <lmcgaughey@parsec.com> ; Subject: FREE Webinar: Introduction to System Dump Analyzer C Message-ID: <1143047908.935471.184980@g10g2000cwb.googlegroups.com>   
 Greetings,  E I'd like to invite you to sign up for our FREE Webinar, "Introduction D to System Dump Analyzer (SDA)," to be held on April 19, 2006 at noon MDT.  D The System Dump Analyzer (SDA) allows you to inspect the contents ofA memory as saved in the dump taken at crash time or as exists in a F running system. In this one-hour Webinar, we will teach you how to use( SDA to perform the following operations:   - Assign a value to a symbol, - Read global symbols from any object module1 - Read global symbols from System loadable images  - Display symbols  - Examine memory of any process  - Display tables of data( - Format instructions and blocks of data  - Display device data structures+ - Display memory management data structures 2 - Display a summary of all processes on the system - Copy the system dump file ! - Send output to a file or device ! - Search memory for a given value   < If time permits, we will also discuss using SDA to help withC performance problems, either system-wide or for a specific process.   E Register for "Introduction to System Dump Analyzer (SDA)" by visiting 5 http://www.parsec.com/general/promotion.php?p=63T51U.   
 Thank you!   Laura McGaughey  PARSEC Group Direct: 720-962-9583 Toll Free: 888-472-7732  Fax: 303-763-9909  lmcgaughey@parsec.com  www.parsec.com  ; Check out our partner site for news, jobs, and resources at  www.openvmsplanet.org!   ------------------------------    Date: 22 Mar 2006 00:20:12 -0800 From: onelxii@yahoo.com 1 Subject: How to convert FB file to VBS32760 file? B Message-ID: <1143015612.803404.18530@t31g2000cwb.googlegroups.com>  = Hi everyone.. I've been working as cobol programmer on OS/390 G environment for sometime but this is the first time that I will have to F create a variable block output file with record length 32760 from a FBG file.  The main reason for converting it to VBS32760 is that our system @ only handles the transmission of VBS32760 files.  Anyway, I haveE successfully created the VBS32760 following some of the guidelines in G the earlier group topics but the problem arose when I submitted the job D to transmit the file.  Although the jobrun was successful, the block@ count transmitted showed that only 1 block was read as input andG subsequently sent out.  This was confirmed by the recepient of the file G as they reported that the file was empty.  Do you guys have any idea on G the proper way to variably block a fixed block to 32760?  I've attached @ below the program declaration and routines inside the conversion program. Thanks a lot..   
 FILE SECTION.  FD  CDF-MERGED-FILE.* 01  CDFMRG-REC               PIC X(10000). FD  CDF-MERGED-FILE-VB     BLOCK CONTAINS 0 RECORDS     RECORDING MODE IS S. 01  CDFMRGVB-REC. 1     05 CDFMRGVB-REC-X    PIC X OCCURS 32756 TIMES 4                                DEPENDING ON CDF-LEN.& 01  CDFMRGVB-REC-MAX     PIC X(32756). WORKING-STORAGE SECTION. 01 OTHER-VARIABLES. (    05 CDF-LEN            PIC  9(8) COMP.0    05 WS-CDFMRGVB-STATUS PIC  9(2) VALUE ZEROES.0    05 WS-CDFMRG-STATUS   PIC  9(2) VALUE ZEROES.0    05 EOF-CDF            PIC  9(1) VALUE ZEROES.   000-MAIN-RTN SECTION. 
  000-MAIN.  MOVE 32756           TO CDF-LEN.. READ CDF-MERGED-FILE AT END MOVE 1 TO EOF-CDF.1 PERFORM 100-PROCESS-CDFMRG-RTN UNTIL EOF-CDF = 1. 	 000-STOP.     STOP RUN.   100-PROCESS-CDFMRG-RTN SECTION.   100-PROCESS-CDFMRG.+      MOVE CDFMRG-REC       TO CDFMRGVB-REC.       WRITE CDFMRGVB-REC.      DISPLAY CDFMRGVB-REC.3      READ CDF-MERGED-FILE AT END MOVE 1 TO EOF-CDF. 
  100-EXIT.	     EXIT.    ------------------------------  % Date: Wed, 22 Mar 2006 04:41:30 -0500 - From: JF Mezei <jfmezei.spamnot@teksavvy.com> 5 Subject: Re: How to convert FB file to VBS32760 file? , Message-ID: <44211BA0.AA8ABB3A@teksavvy.com>   onelxii@yahoo.com wrote:I > environment for sometime but this is the first time that I will have to H > create a variable block output file with record length 32760 from a FB > file.   $ You posted this on a VMS newsgroup.   E In a past life, I also had to deal with Cobol on MVS having to create > variable length record files so that it could be read by a VMSB application accessing that dataset through the DECNET/SNA gateway.   The example I gave them was:  
 FILE SECTION. 
 FD outfile 	record varying from 200 to 500  	depending on out-length.  01	outrec pic x(500).    WORKING-STORAGE SECTION.( 05 out-length pic 999 comp value zeroes.    H The number of bytes for the out-length varies from platform to platform,@ and you should inquire about the native number of bytes for MVS.    F > to transmit the file.  Although the jobrun was successful, the blockB > count transmitted showed that only 1 block was read as input and > subsequently sent out.    G When you create the file on MVS, i assume you have JCL that has some DD H statements to properly define the dataset's attributes ? Perhaps this is where you have a problem ?  G And you need to provide more information on how you are transfering the B file to the other system, what software is used and what the other
 system is.  E If it is VMS, then you should ask the user on VMS to do a DIR/FULL of G the received file. In particular, the record format should be variable, H and look ate the space used and allocated.  You can also use DUMP/RECORDA of the file to see exactly what was sent and if the data that was  transmitted is at least OK.    ------------------------------  % Date: Wed, 22 Mar 2006 12:20:16 -0500 ' From: Dave Froble <davef@tsoft-inc.com> 8 Subject: Re: Is VMS Security being dumbed-down for Java?/ Message-ID: <886dnR3hyoooG7zZRVn-qQ@libcom.com>    Richard Maher wrote: > Hi Steve,  > G > (Thanks for the reply and sorry for taking a while to get back. I was  > unavoidably distracted.) >  > Hoff wrote: -  > G >>   This installation requirement is the intended behaviour of OpenVMS  >>system security. >  > E > Yippee! Any doc reference? (Not necessary, but still nice to have.)  >  > 8 >>   Calling LIB$ from inner-mode code is not supported, >  > B > Why not? Is that written anywhere? If you do an analyze/image ofK > TCPIP$CFS_SHR (for example) it looks like it calls LIBRTL, and LIBOTS, to M > me. Is that not correct? Is it not a UWSS? I'm not trying to be clever, I'm N > not trying to catch anyone out, I just want the facts! (The documentation isH > *very* out of date and sadly lacking in the first place.) RDB$COSIP isK > another example. It (like many, many others I'd wager) calls DECC$SHR and N > without even looking it up, I'm sure that image in turn calls LIBRTL. So areK > these products (Rdb and TCP/IP) unsupportable? I've spoken with you about K > other cases before, they seem to be all over VMS. What people tell me are M > the rules seem to be diametrically opposed to my perception of the reality.   I Ok, I don't know, but I'd guess that TCPIP$CFS_SHR and the others you've  C mentioned are not of the catagory SYSTEM SERVICE.  Plenty of stuff  ? that's installed and shared is still basically user mode stuff.   F After 3 years in the Microsoft world I'm not an authority or anything @ else concerning VMS.  If you think I'm wrong, forgo the lengthy 4 rebuttal, the last sentence has already said it all.   --  4 David Froble                       Tel: 724-529-04504 Dave Froble Enterprises, Inc.      Fax: 724-529-0596> DFE Ultralights, Inc.              E-Mail: davef@tsoft-inc.com 170 Grimplin Road  Vanderbilt, PA  15486    ------------------------------  % Date: Wed, 22 Mar 2006 17:17:17 +0000 0 From: Chris Sharman <chris.sharman@sorry.nospam>8 Subject: Re: Is VMS Security being dumbed-down for Java?4 Message-ID: <dvs0qt$p3h$1$8300dec7@news.demon.co.uk>   Ian Miller wrote: E > "PS. Is it just me or has there been nothing but fruitful, on-topic  > technical B > discussion in COV for over two weeks? Is there nothing sacred? " > % > - parhaps someones on Holiday ? :-)  > 2 > For more on Richards question from another placeN > http://forums1.itrc.hp.com/service/forums/questionanswer.do?threadId=1007568  9 This appears to be a UWSS (using lib$get_ef from librtl), I being called by a user cobol application which also uses lib$get_ef from   librtl. I The UWSS (correctly) ignores outer mode logicals, and requires librtl be  
 installed.G The unpriv cobol image (correctly) doesn't - so if you have a user (or  G supervisor) logical redefining librtl there's a conflict - I think the  8 image activator requires images to be uniquely named ...   Chris    ------------------------------   Date: 22 Mar 2006 15:46:27 GMT( From: bill@cs.uofs.edu (Bill Gunshannon)" Subject: OT: Strange favor request+ Message-ID: <48d9qjFjoo3tU1@individual.net>   @ This isn't really related to VMS in any way, but I figure people@ running high-end systems like VMS are more likely to have one of, these printers than your average datacenter.  J Is there anyone here with a XEROX Color Laser Printer who might be willingI to print out a dozen or so sheets and mail them to me?  I will gladly pay J the cost of materials and mailing.  I am interested in the hidden TrackingK ID printed by these printers and would very much like to have some examples C for use in the classroom. (Once I find and decode them, of course.)    Any volunteers?    bill   --  J Bill Gunshannon          |  de-moc-ra-cy (di mok' ra see) n.  Three wolvesD bill@cs.scranton.edu     |  and a sheep voting on what's for dinner. University of Scranton   |A Scranton, Pennsylvania   |         #include <std.disclaimer.h>       ------------------------------  % Date: Wed, 22 Mar 2006 08:18:45 -0800 ' From: David Mathog <mathog@caltech.edu> & Subject: Re: OT: Strange favor request+ Message-ID: <dvrtce$814$1@naig.caltech.edu>    Bill Gunshannon wrote:  L > Is there anyone here with a XEROX Color Laser Printer who might be willing8 > to print out a dozen or so sheets and mail them to me?  H Try calling around to the local copy shops and you'll probably find one.G I definitely recall seeing Xerox printers at Kinko's, but don't know if  these were B/W or color.   ------------------------------  % Date: Wed, 22 Mar 2006 18:39:53 +0100 3 From: Michael Unger <spam.to.unger@spamgourmet.com> & Subject: Re: OT: Strange favor request+ Message-ID: <48dh26Fjnfs1U1@individual.net>   - On 2006-03-22 16:46, "Bill Gunshannon" wrote:    > [...]  > L > Is there anyone here with a XEROX Color Laser Printer who might be willingK > to print out a dozen or so sheets and mail them to me?  I will gladly pay L > the cost of materials and mailing.  I am interested in the hidden TrackingM > ID printed by these printers and would very much like to have some examples E > for use in the classroom. (Once I find and decode them, of course.) D                              ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^  @ Have a look at <http://www.eff.org/Privacy/printers/docucolor/>.  E (It is mentioned in "Risks Digest 24.08" of 26-Oct-2005, available at - <http://catless.ncl.ac.uk/Risks/24.08.html>.)    > [...]    Michael    --  ; Real names enhance the probability of getting real answers. 5 My e-mail account at DECUS Munich is no longer valid.    ------------------------------   Date: 22 Mar 2006 18:06:14 GMT( From: bill@cs.uofs.edu (Bill Gunshannon)& Subject: Re: OT: Strange favor request+ Message-ID: <48di0mFjn7v5U1@individual.net>   + In article <48dh26Fjnfs1U1@individual.net>, 6 	Michael Unger <spam.to.unger@spamgourmet.com> writes:/ > On 2006-03-22 16:46, "Bill Gunshannon" wrote:  >  >> [...] >>  M >> Is there anyone here with a XEROX Color Laser Printer who might be willing L >> to print out a dozen or so sheets and mail them to me?  I will gladly payM >> the cost of materials and mailing.  I am interested in the hidden Tracking N >> ID printed by these printers and would very much like to have some examplesF >> for use in the classroom. (Once I find and decode them, of course.)F >                              ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ > B > Have a look at <http://www.eff.org/Privacy/printers/docucolor/>. > G > (It is mentioned in "Risks Digest 24.08" of 26-Oct-2005, available at / > <http://catless.ncl.ac.uk/Risks/24.08.html>.)  >   H Yeah, I have all that.  Now I need samples so I can create some training aids for use in the classroom.   bill   --  J Bill Gunshannon          |  de-moc-ra-cy (di mok' ra see) n.  Three wolvesD bill@cs.scranton.edu     |  and a sheep voting on what's for dinner. University of Scranton   |A Scranton, Pennsylvania   |         #include <std.disclaimer.h>       ------------------------------   End of INFO-VAX 2006.162 ************************                                                                                                                                                                                            ode; use PORT (198,151,12,104,19,103)  <<< CWD /freewarev70/drain: >>> 250 Connected to /disk$misc/decus/freewarev70/drain.
 <<< LIST >>> 150 List started.I >>> 226 Transfer completed.
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,104)P  <<< CWD /freewarev70/drain/src> >>> 250 Connected to /disk$misc/decus/freewarev70/drain/src.
 <<< LIST >>> 150 List started.  >>> 226 Transfer completed. 
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,105)  <<< CWD /freewarev70/dsrplus< >>> 250 Connected to /disk$misc/decus/freewarev70/dsrplus.
 <<< LIST >>> 150 List started.> >>> 226 Transfer completed. 
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,106)8 <<< CWD /freewarev70/emacs: >>> 250 Connected to /disk$misc/decus/freewarev70/emacs.
 <<< LIST >>> 150 List started.I >>> 226 Transfer completed.
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,107)P <<< CWD /freewarev70/find 9 >>> 250 Connected to /disk$misc/decus/freewarev70/find.k
 <<< LIST >>> 150 List started.< >>> 226 Transfer completed.>
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,108)u <<< CWD /freewarev70/flist: >>> 250 Connected to /disk$misc/decus/freewarev70/flist.
 <<< LIST >>> 150 List started.< >>> 226 Transfer completed.I
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,109)u& <<< CWD /freewarev70/flist/bin-alphaD >>> 250 Connected to /disk$misc/decus/freewarev70/flist/bin-alpha.
 <<< LIST >>> 150 List started.i >>> 226 Transfer completed.r
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,110),% <<< CWD /freewarev70/flist/bin-ia64iC >>> 250 Connected to /disk$misc/decus/freewarev70/flist/bin-ia64. 
 <<< LIST >>> 150 List started.  >>> 226 Transfer completed. 
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,111) $ <<< CWD /freewarev70/flist/bin-vaxB >>> 250 Connected to /disk$misc/decus/freewarev70/flist/bin-vax.
 <<< LIST >>> 150 List started. >>> 226 Transfer completed.
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,112)# <<< CWD /freewarev70/flist/source A >>> 250 Connected to /disk$misc/decus/freewarev70/flist/source. 
 <<< LIST >>> 150 List started.  >>> 226 Transfer completed. 
 <<< PASVA >>> 227 Entering passive mode; use PORT (198,151,12,104,19,113) " <<< CWD /freewarev70/freetype2_z@ 