+ + + + +
+ + + + + +
DEXIT CLEAR,RETCODE=(R2) PUSHA 0,=A(l)
MVI 0(15),X'80' PUSH 0,R2
LR 1,15 SVC 81 CDEXIT) POPN 0,2*4
PUSH FUNCTION PARAMETER SET 'LAST' PARAMETER BIT 01 PUSH POINTER TO RETCODE POINT Rl TO PARAMETER LIST
DEXIT CLEARALL,CANCEL=YES,RETCODE=CR2)
PUSHA 0,=A(-2147483646) PUSH FUNCTION PARAMETER MVI 0(15),X'80' SET 'LAST' PARAMETER BIT 01 PUSH 0,R2 PUSH POINTER TO RETCODE
LR 1,15 POINT Rl TO PARAMETER LIST
SVC 81 CDEXIT) POPN 0,2*4
~.
4.2.19 DFB - Describe Document File Block Wang VS Document Access Subroutines
These structures are utilized to pass parameters to and
+DFBA
Document library must always be provided.
[Reserved]
Volume name normally should be filled with spaces in which case the document library's default volume is automatically provided. (WPOPEN will provide that volume name upon return.) Any program-supplied value in this field overrides the document library's default volume value. indicates unqualified success.
Contains the primary status should be tested first. If it indicates a DMS error, the DFBFILESTATUSl must be examined for further information.
Unqualified success.
See VS Document Access
Subroutines Documentation for significance of other return codes.
* *
* *
*
* *
+DFBARCPAGELIMIT
+DFBARClSTFOOTERP
+DFBARCNOBUFFERS EQU 3028 +DFBARCSTRINGPARM EQU 4000 +DFBARCPARAMOVRLP EQU 4001
+DFBAFILESTATUSl DC X'OO' Significant only if a DMS error
+ is indicated above and can be
+ used to determine whether
+* subsequent information is
+* provided in either
+* DFBFILESTATUS2 or DFBFILECANCEL.
+DFBAFSlSUCCESS EQU C'O' Values as per UFBFSl.
+DFBAFSlATEND EQU C'l' +DFBAFSlINVKEY EQU C'2' +DFBAFSlIOERR EQU C'3' +DFBAFSlCANCEL EQU C'6' +DFBAFSlTIME EQU C'7' +DFBAFSlSHARE EQU C'S' +DFBAFSlOTHER EQU C'9'
+DFBAFILESTATUS2 DC X'OO' Significant only if a DMS error
+ indicated by DFBRETURNCODE and
+ DFBFILESTATUSl does not indicate
+* that a cancel code has been
+* stored in DFBFILECANCEL.
+* For values that indicate format
+* or conflict errors, check the
+* value DFBFILESTATUSX.
+DFBAFS2NOINFO EQU C'O' Values as per UFBFS2.
+DFBAFS2BYVIOL EQU C'4'
,-."\
+DFBAFS2ACC EQU C'S'+DFBAFS2RESERR EQU C'6' +DFBAFS2INVFUN EQU C'S' +DFBAFS2XFILE EQU X'80' +DFBAFS2XLIB EQU X'40' +DFBAFS2XVOL EQU X' 20' +DFBAFS2XSPACE EQU X' 10' +DFBAFS2XVTOC EQU X'08' +DFBAFS2XPOS EQU X'04' +DFBAFS2XPROT EQU X'02' +DFBAFS2XFORMAT EQU X'Ol'
+DFBAFILESTATUSX DC X'OO' Significant only if a DMS error
+ is indicated by DFBRETURNCODE
+ and DFBFILESTATUS2 indicates
+* a format or conflict error.
+DFBAFSXNOINFO EQU X'OO' Values as per UFBXCODE.
+DFBAFSXUSE EQU X'Ol'
+DFBAFSXDET EQU X'02'
+DFBAFSXVOLX EQU X'03' +DFBAFSXPOSS EQU X'04' +DFBAFSXAOPEN EQU X'07' +DFBAFSXAUSE EQU X'08' +DFBAFSXDNWP EQU X'l4'
+DFBASPARE04 DC XL3'00' [Reserved]
+DFBAFILECANCEL is indicated by DFB-RETURN-CODE and DFBFILESTATUSl indicates that a cancel code has been stored. (This normally
indicates an unusual condition for which an "Open Exit" cannot be used to intercept an error.
These fields are used to
conununicate certain parameters to and from WPOPEN. They must be filled in as indicated prior to calling WPOPEN (or WPCHMODE).
Subsequent program modifications are ignored by other functions. document access subroutines.
+DFBALOCATION
.These variables communicate the desired starting location for certain functions. Upon return from most functions, these fields are updated with the
"current" location.
"Page" number (-2 to 120)
"Element" within "Page"
"Character" number within
"Element" within "Page"
[Reserved]
These variables communicate data lengths to and from functions that have second arguments that are variable length text
strings)-Length of data submitted to or maximum data length to be received from function.
Indicates actual count of bytes WPDELETE or WPREWRITE operation may be requested.
Generic (general) search [Reserved]
[Reserved]
Swnmary I header information stored within the document's
"admin" block.
+*
Upon successful completion of WPOPEN, these fields contain either current information (existing document) or the established initial values for these fields if new document
(For "D" default output mode, some initial values, including the print defaults, are obtained from the library's prototype document).
Internal descriptive
identification of document:
Document Name
Statistics for new document:
(prior to first print request) Creation date (OmmddyyF)
Creation time (QhhmmF)
Creation work time (OhhhhmmF) Creation keystrokes
Statistics for document revision (after first print request)
Revision date (OmmddyyF) Revision time (QhhmmF)
Revision work time (OhhhhmmF) Revision keystrokes and WPWRITE upon successful completion of requests.
+DFBALINESPAGE
Last printing date (QmmddyyF) Last printing time (OhhmmF) Date I time stamp and archive ID from last, if any, archiving of document.
Last archiving date (QmmddyyF) Last archiving time (QhhmmF) document was previously verified as a glossary. the appropriate fields from DFBDOCUMEN'l;INFO and
DFBPRINTPARAMS when WPCLOSE is called.
Yes, update document information Inf ormat1on used both as
printing defaults for a document and as
WPPRINT entry to submit document print requests. Except where noted, these fields are updated by WPCLOSE as per value of DFBINFOUPDATE.
When calling WPPRINT, these parameters can be used individually as follows:
- Valid values provided therein
+DFBAPRINTRANGES
Variables giving range parameters (for pages) for
Variables specifying line count specifications.
First line on page for footers, if any.
Number of lines per physical form.
Variables specifying left margin print specifications.
Number of characters in left margin Number of characters in left margin for secondary document for
dual-column print requests Copy count. secondary document in
dual-column print requests.
[Reserved]
Print request scheduling parameters.
Print area (not stored as default in doctunent).
Print class.
[Reserved]
Type of print request (not stored as default in document).
Normal print request.
(single doctunent, single column) Merge print request,
Dual column print request (one or two doctunents).
After-print doctunent disposition Save document.
+DFBACONTINUOUS
Proportional spacing pitch.
Vertical pitch (not stored as
Draft (doubled spaced).
Justification specification.
Unjustified.
Justified.
With notes, unjustified.
Document summary print option specification. used as.a secondary document for a merge or dual-column
Document library must always be provided.
[Reserved]
Any program-supplied value in this field will override the document library's default volume value.
+DFBALIBRSTART DC H'l' Number of the first document to
+ be listed.
+DFBASPARE25 DC XL12'0' [Reserved] ~
+DFBALIBRENTRIES DS OXL240 Area defined for aggregate of
+ all 30 entries.
+DFBALIBRENTRY DS 30XL8 Individual entry aggregate.
+ ORG DFBALIBRENTRY
+DFBALIBRDOCUMENT DS CL4 Document in library.
+DFBASPARE26 DC XL4'0' [Reserved]
+ ORG
+ ORG
+* The following provides equates for the values of the +* formatting characters found in the text of the document
+DFBACENTER EQU X'Ol'
+DFBATAB EQU X'02'
+DFBARETURN EQU X'03'
+DFBAINDENT EQU
x
I 04 I +DFBADECIMALTAB EQU X'05' +DFBAFORMATLINE EQU X'06'+DFBASTOP EQU X'OB'
+DFBANOTE EQU X'OC'
+DFBAMERGE EQU X'OD'
+DFBASUPERSCRIPT EQU X'OE' +DFBASUBSCRIPT EQU X'OF' +DFBANEWPAGE EQU X'86'
+DFBASTOPX EQU X'8B'
+DFBANOTEX EQU X'8C'
+DFBAMERGEX EQU X'BD' +DFBASUPERSCRIPTX EQU X'BE' +DFBASUBSCRIPTX EQU X'8F'
+DFBAEND EQU
*
+DFBALENGTH EQU DFBAEND-DFBA
+BEGIN CODE
4.2.20 DISMOUNT - Dismount Disk or Tape Volume (SVC 41) Syntax
[label] DISMOUNT VOLUME={(register)},TYPE={DISK},
Function
{ 'string' } {TAPE}
{ address }
NODISPLAY={YES} [,NOWAIT={YES}][,VSID={(register)}
{NO } { NO} { 'string' } { address }
Requests the logical dismounting of a disk or tape volume. If the volume referenced is a tape volume, it is also rewound and unloaded. If the disk is the root disk of a multidisk volume set and its VTOC shows any open files, the disk can not be dismounted.
Parameter Definitions
VOLUME The name of the volume which is to be dismounted. It may be specified as a register in parentheses pointing to the volume name, as a character string in single quotes which is the volume name, or as an expression addressing a 6-byte field containing the volume name. This parameter is required.
TYPE Indicates whether the volume is a disk or a tape volume.
Valid values are DISK and TAPE. This parameter is optional.
The default is DISK.
NODISPLAY YES indicates that no messages are to be displayed on the user's workstation; the operator console messages must be used to coordinate physical dismounting. The default is NO.
NOWAIT YES indicates that the calling program will not wait for an answer back from the system task after issuing a dismount.
No messages are displayed on the workstation C implied' NODISPLAY) or on the operator screen. The default is NO.
VSID The volume set identification number for a volume which is part of a volume set. If no outstanding I/O exists on a non-root set member or on a root volumes, if no files are open on a single volume, the volume is dismounted.
Stack On InEut
I I
lo
12 3
O(SP)