Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved


Chapter 3 Tools : PRT_VSCR

PRT_VSCR
Prints the screen fields of a defined screen in a page format, with or without a mask. (C)
Invocation
CALL PRT_VSCR(vscr, page_length, page_width, page_start, media, mask)
 
The page number that is on the first printed page. It is also the start number. If a value of '' or N is entered, NEW PAGE prints across the top, rather than a page number.
Y – Print the default mask values, that is, AAAAs for alphabetic fields and 9999s for numeric fields.
Usage Notes
The full screen is printed.
Example
In this example, PRT_VSCR is called into the PRINT_EMP rule.

 
PRINT_EMP;
_
     _ ------------------------------------------------------------+--------
_ ------------------------------------------------------------+--------
_ CALL PRT_VSCR('NEW_EMPLOYEE', 60, 80, '', 'PRT', 'Y'); | 1
_ CALL SCREENMSG('NEW_EMPLOYEE', 'EMPLOYEE SCREEN PRINTED'); | 2
_ ---------------------------------------------------------------------

 
FCNKEYS Table
The PRINT_SCREEN rule is defined to PF13 in the FCNKEYS(EMPLOYEE_EXP) table:

 
EDITING TABLE : FCNKEYS(NEW_EMPLOYEE)
COMMAND ==>
PF_KEY NAME COMMAND ROUTINE
----- ---------------- ---------------- ----------------
_ PF3 SAVE SAVE_EMP
_ PF12 EXIT EXIT_DISPLAY
_ PF13 PRINT PRINT_EMP

 

Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved