[Info-vax] DEC3000->DECServer90TL->CMM comunication problem
emilwp at gmail.com
emilwp at gmail.com
Mon Apr 22 14:50:30 EDT 2013
Hi All,
thank you very much for all you comments. Sorry for answering so late but I had to work over the weekend (evening students) - I really do appreciate your help.
my direct contact info:
emilwp at gmail.com, or wplowucha at ath.eu
Laboratory of Metrology, University of Bielsko-Biala
About the blinking on the printer: it's bliking all the time the same - no reaction on the issued commands. And as far as I remember to be able to print the diode was to be lit.
The answers to Christof comments follow below:
> In article <a3e52044-60ae-4ca9-be07-55d8838895b8 at googlegroups.com>, emilwp at gmail.com writes:
>
>
>
> >The machine is operated by the software called Quindos.
>
>
>
> Where does this Quindos run on? On the DEC computer under VMS?
>
yes, it runs on the DEC3000 under VMS
>
>
[...]
>
> >- I tried to print something but without success.
>
> Here is the important part. How do the VMS system and the DECserver
>
> communicate? I assume this is via LAT. Could you post your
>
> sys$manager:lat$systartup.com
>
> ?
Yes it's LAT - at least the ports' configuration says that it's default protocol.
Here is the lat&systartup.com (I was thinking about removing commented lines but was not sure if it's site-specific or VMS-standard - sorry for long post):
$! Copyright (c) 1990 Digital Equipment Corporation. All rights reserved.
$!
$! LAT$SYSTARTUP.COM -- LAT Startup Commands Specific to Site
$!
$! Use this command procedure to customize the LAT characteristics for
$! the local node. These commands, which should serve as examples,
$! will set up a LAT service name SYS$NODE and default identification
$! SYS$ANNOUNCE. The LAT service name and identification will default
$! to SYS$NODE and SYS$ANNOUNCE unless you specify a service name and
$! identification as arguments to the command line that invokes
$! LAT$STARTUP.COM:
$! $ @SYS$STARTUP:LAT$STARTUP
$!
$! You can specify other node and service characteristics (such as group
$! codes) as arguments to this command line, as shown below.
$!
$! Argument Function
$! --------- --------
$!
$! P1 Name of the service to be created. If not supplied, a
$! service will be created with the same name as the node.
$!
$! P2,P3,P4 Parameters and qualifiers to the SET NODE command.
$!
$! P5 Parameters and qualifiers to the SET SERVICE command.
$! P5 is only used if P1 is specified. More than one
$! argument may be supplied by enclosing the string in
$! quotes.
$!
$! Example: $ @SYS$STARTUP:LAT$STARTUP HAWK "/IDENTIFICATION=" -
$! """""Development node"""""
$!
$! Please review and edit this file for possible additions and deletions
$! that you wish to make. Future software updates will not overwrite the
$! changes made to this file.
$!
$ required_privileges = "OPER"
$ prev_privs = f$setprv(required_privileges)
$ if .not. f$privilege(required_privileges) then goto no_privileges
$ lcp := $latcp
$!
$! --------------------- Modify Node Characteristics ------------------------
$!
$ lcp set node 'p2' 'p3' 'p4'
$!
$! Some examples:
$!
$! ** Allow incoming connections only
$!
$! lcp set node /connections=incoming /groups=(enable=(12,40,43,73),disable=0)
$! lcp set node /connections=incoming /groups=enable=(0-255)
$!
$! ** Allow outgoing connections only
$!
$! lcp set node /connections=outgoing /user_groups=enable=(24,121-127)
$! lcp set node /connections=outgoing /user_groups=(enable=0-255) /node_limit=50
$!
$! ** Enable incoming and outgoing connections
$!
$! lcp set node /connections=both /group=enable=(43,73) /user=enable=(44,56)
$! lcp set node /connections=both /group=enable=(0-255) /user=enable=(0-255)
$!
$!
$! -------------------- Modify Service Characteristics ----------------------
$!
$ if p1 .eqs. ""
$ then
$ lcp create service
$ else
$ lcp create service 'p1' 'p5'
$ endif
$! ------------------------- Start LAT Protocol -----------------------------
$!
$ lcp set node /state=on
$!
$!
$! ------------------------- Create and Map Ports ---------------------------
$!
$! Some examples:
$!
$! lcp create port lta101: /dedicated
$! lcp create port lta102: /application
$! lcp create port lta103: /application
$! lcp create port /nolog/logical=(name=ln03$mgmt, table=system, mode=executive)
$!
$! lcp set port lta101: /dedicated /service=graphics
$! lcp set port lta102: /node=server_1 /port=port_1
$! lcp set port lta103: /node=server_2 /service=laser
$! lcp set port ln03$mgmt: /node=server_3 /service=ln03_printers
$!
$exit:
$ prev_privs = f$setprv(prev_privs)
$ exit
$!
$no_privileges:
$ write sys$output "Insufficient privileges to execute LATCP commands."
$ write sys$output "Requires ",required_privileges," privileges."
$ goto exit
-----end of file
>
>
>
> >- I checked for the QUEUEs and there is one set: BATCH$LEITZ but it says
>
> > it's "autostared but stoped" - I do not know about "queues" so do not
>
> > know what that means, and I have no idea what could be wrong.
>
>
>
> I assume the queu should be "idle". But I don't think it is relevant for the
>
> connection problem. Please post the output of
>
> SHOW QUEUE/FULL/ALL
>
>
the answer is:
Batch queue BATCH$LEITZ, stoped, autostart inactive, on LEITZ::
/AUTOSTART_ON=(LEITZ::) /BASE_PRIORITY=4 /JOB_LIMIT=8 /OWNER=[SYSTEM]
/PROTECTION=(S:M,O:D,G:R,W:S)
and below are 2 entries with stopped print jobs (my trials from a few days back), both having STATUS: "Pending (queue stoped)"
I found file SYS$MANAGER:SYSTARTUP_VMS.COM in which there is something about the queues. The line "start/queue/manager" was added a few year back when we also had some problems - unfortunatelly the guy who did it is retired.
$!
$! SYS$MANAGER:SYSTARTUP_VMS.COM
$!
$! This is the template for the site-specific startup command procedure.
$!
$ WRITE SYS$OUTPUT ""
$ WRITE SYS$OUTPUT "The OpenVMS system is now executing the site-specific startup commands."
$ WRITE SYS$OUTPUT ""
$!
$! You may add commands to this procedure or change the commands within this
$! procedure as needed for your system. This command procedure is saved when
$! you upgrade or update to a new version of VMS. Other startup command
$! procedures are replaced with each release of VMS. Place symbol definitions
$! from startup procedures that will be replaced when you upgrade to a new
$! release of VMS in this command procedure. In this way, you can save symbol
$! definitions from one VMS release to the next.
$!
$! NOTE: Many command line are commented out. This allows you to to decide
$! what and how some commands are to be executed. Also note that these lines
$! begin with the "$!$" character sequence. Remove the first two characters "$!"
$! if you wish to have one of these commands executed. Pay close attention to
$! whether any of these commands are continuation type lines (hyphen at end of
$! line). If so you will be required to remove the "$!" characters from the
$! start of additional lines. Continuation lines do not start with a "$".
$!
$! OPCOM is started by default on all VMS systems. However, by default, operators
$! will not be able to satisfy user mount requests. To allow operators to
$! satisfy user mount requests, edit the SYS$MANAGER:SYLOGIN command procedure
$! by removing the command line that equates MOUNT to MOUNT/NOASSIST.
$!
$! The following commands install the secondary page file, if it exists.
$! (Note that the secondary swap file is installed by the command procedure
$! SYS$SYSTEM:STARTUP.COM if it exists.)
$!
$ IF F$SEARCH("SYS$SYSROOT:<SYSEXE>PAGEFILE1.SYS") .NES. ""
$ THEN SYSGEN = "$SYSGEN"
$ SYSGEN INSTALL SYS$SYSROOT:<SYSEXE>PAGEFILE1.SYS /PAGEFILE /NOCHECK
$ ENDIF
$!
$! Set up virtual terminals
$!
$ SYSMANIO = "$SYSMAN IO"
$!$ SYSMANIO CONNECT VTA0/NOADAPTER/DRIVER=SYS$LOADABLE_IMAGES:SYS$TTDRIVER.EXE
$!
$! This command defines a system-wide login command procedure for all users.
$!
$ DEFINE /SYSTEM /EXEC SYS$SYLOGIN SYS$MANAGER:SYLOGIN
$!
$! This command defines a message to be displayed before each user logs in.
$!
$ DEFINE /SYSTEM SYS$ANNOUNCE "@SYS$MANAGER:ANNOUNCE.TXT"
$!
$! This command defines a message or file to be displayed after each user logs in.
$!
$!$ DEFINE /SYSTEM SYS$WELCOME "@SYS$MANAGER:WELCOME.TXT"
$!
$!
$! Set up a print queue.
$!
$! Choose the device you will use for printing. Define the logical name
$! $PRINTER to name the device you will use for printing; either remove the
$! comment delimiter ($!) from one of the following commands or add a command
$! in the following format.
$!
$!$ DEFINE /SYSTEM $PRINTER $TERMINAL0 ! if a hard copy terminal is the printer
$!$ DEFINE /SYSTEM $PRINTER _LPA0: ! if using a line printer
$
$!
$! If you will use a line printer, set the printer characteristics.
$! Delete the comment characters from the following line.
$!
$!$ SET PRINTER /NOWRAP /NOTRUNCATE /CR $PRINTER
$
$!
$! If you will use a hard copy terminal as the print device, set the terminal
$! characteristics. The following terminal characteristics vary from one
$! hard copy terminal to another: speed, width, length, and device type.
$! If your terminal is an LA100, remove the comment characters from the
$! following command lines. If your terminal is not an LA100, add a command in
$! the following format.
$!
$!$ SET TERMINAL $PRINTER /PERMANENT /NOBROADCAST /NOTYPEAHEAD /NOWRAP -
$! /SPEED=(1200) /WIDTH=(132) /PAGE=(66) /DEVICE_TYPE=(LA100)
$
$!
$! To set your printing device as spooled to the queue SYS$PRINT,
$! remove the comment characters in the following command line.
$!
$!$ SET DEVICE /SPOOLED=(SYS$PRINT, SYS$SYSDEVICE:) $PRINTER
$!
$! The following command will enable autostart queues to start on this
$! node. To enable autostart during startup, remove the comment
$! delimiter (!) from the following command line.
$!
$! Make sure resources required by all autostart queues are available,
$! such as disks and printing devices.
$!
$! *****************************************************************
$! ************************ wstawiono linie ponizej - 22.01.2007
$!
$ start/queue/manager
$!
$!
$ ENABLE AUTOSTART /QUEUES
$!
$! If your SYS$PRINT queue is not an autostart queue, then remove the comment
$! character from the following command to start the queue.
$!
$!$ START /QUEUE SYS$PRINT
$
$!
$! To start a batch queue, remove the comment character from the
$! following command line.
$!
$! START /QUEUE SYS$BATCH
$
$!
$! To use asynchronous DECnet, set the terminal line characteristics.
$! Change the following SET TERMINAL command to specify the terminal line
$! you will use. Remove the comment delimiter ($!) from the SET TERMINAL
$! command line. (Reminder: To set the terminal line characteristics for the
$! other side of the asynchronous connection, enter a SET TERMINAL command
$! on the routing node to which you are connecting.)
$!
$!$ SET TERMINAL $TERMINAL1 /PERMANENT /NOAUTOBAUD /SPEED=9600 /PROTOCOL=DDCMP
$!
$! Following are the commands that start up the DECnet network, if you
$! installed the DECnet software. Note that only one of these commands is
$! needed to start the network, the other should be commented out. Configure
$! the network and define the other node names before starting up DECnet;
$! otherwise you will get error messages stating that the database is not
$! initialized.
$!
$! If you have batch queues set up on your system, insert a comment delimiter
$! ($!) before the dollar sign in the first command line below. Remove the
$! comment delimiter from the second and third command lines below. This
$! allows the system to startup more quickly, and decreases the amount of
$! time you must wait to log in.
$!
$!
$ IF F$SEARCH("SYS$SYSTEM:NETACP.EXE") .NES. "" THEN @SYS$MANAGER:STARTNET
$!$ IF F$SEARCH("SYS$SYSTEM:NETACP.EXE") .NES. "" - !This is faster, if you
$! THEN SUBMIT SYS$MANAGER:STARTNET.COM !have batch queues set up.
$!
$! Once you have removed the comment delimiter from one of the above commands,
$! insert a comment delimiter ($!) before the dollar sign in the command line
$! below. The logical is only required if the DECnet network has not been started.
$!
$ DEFINE DECW$IGNORE_DECNET TRUE
$!
$! The following command should be used only if you do not wish the DECwindows
$! startup file to be run. The DECwindows startup file should be run on all
$! types of machines, even if they are not using a DECwindows display. If
$! you wish to run the DECwindows startup file at a later time during system
$! startup remove the comment from the line below.
$!
$!$ DEFINE DECW$IGNORE_DECWINDOWS TRUE
$!
$!
$ DEFINE/SYSTEM/EXEC DECW$LOGINLOGO SYS$MANAGER:LEITZ_QUINDOS_LOGO.COM
$!
$!This definition is necessary for DECserver software
$ DEFINE/SYSTEM/EXEC/NAME_ATTRIBUTE=NO_ALIAS/NOLOG -
MOM$LOAD MOM$SYSTEM, SYS$SYSROOT:[DECSERVER], -
SYS$SYSDEVICE:[VXT$LIBRARY]
$!
$! mount disk dka200: and dka500: if found
$ IF (F$GETDVI("DKA200:", "EXISTS")) THEN MOUNT/SYS/NOASSI DKA200: USERDISK
$
$ IF (F$GETDVI("DKA500:", "EXISTS"))
$ THEN DEFINE/SYS/EXE QDS_BDISK DKA500:
$ SET SECURITY/CLASS=DEVICE/PROT=W:RWLP QDS_BDISK
$ ENDIF
$
$! start LAT
$ @SYS$STARTUP:LAT$STARTUP.COM
$
$! start VXT support
$ @SYS$STARTUP:VXT$STARTUP.COM
$ @SYS$MANAGER:QDS_DEFINE_FONTS.COM
$!
$! analyze and repair system disk
$ ANALYZE/DISK/REPA SYS$SYSDEVICE:
$
$ EXIT
-----end of file
I tried before:
START/QUEUE BATCH$LEITZ
but there was an error message - do not remember now exactely what it said, I'll check tommorow.
regards
Wojtek
More information about the Info-vax
mailing list