here, as this
is
merely an example of what might be done.
If
you use system accounting services, see the publication
VM
/
SP
System Programmers Guide for information
on
user
accounting requirements.
The
HST
ACC
routine could even check the filename and
file type against a table of
CMS file ids which the installation
does not want copied to the local
CMS environment.
If
read
access to the file was to be restricted, a
bad
return code
could be returned to the caller
of
the FSREAD routine in
VMPCSERV, to prevent the copying of this particular data.
See the next section for further information.
Setting
Up an HST ACC Routine: The HSTACC routine will
get control whenever the first record of a Host file
is
read at
the request
of
the local
VM/PC
system. This routine
is
in
the main stream of
VMPCSERV and must observe certain
rules.
VMPCSERV
is
a module run in the users' area at X'20000'
which already restricts the use
of
many system as well
as
other CMS functions and programs. The HST
ACC
routine
must preserve the user environments and return them to their
original state.
If
the environment
is
altered in the routine, it
must
be
restored upon exit. When VMPCSERV terminates
after PF3
is
pressed, the original user environment
is
restored as it was before the VMPCSERV
EXEC
was run.
If
there
is
a secondary entry point
(HSTACCFE-
accounting final exit) defined in the primary exit routine, it
will be given control during
VMPCSERV termination. The
user can then cleanup and close spool files and undo
whatever the accounting exit did. The
HST
ACCFE
entry
point will be given control at register 15. The exit must
return
on
register 14. Register 5 will contain the actual
return code
of
the termination
of
VMPCSERV. Code 3E8
means that the normal exit was taken via
PF
3 key being
pressed. Code 3E9 means that
VMPCSERV is being
terminated because
of
an
110
error. No terminal
or
disk
1/0
should be performed. The original user environment will not
be restored with this error (3E9). All other registers have no
Chapter 6. Remote Services
6-19
To Next Page
Loading...
Need help?
General
