Verified Answers


If an answer to your question is correct, click on "Verify Answer" under the "More" button. The answer will now appear with a checkmark. Please be sure to always mark answers that resolve your issue as verified. Your fellow Community members will appreciate it!  Learn more

  • State Not Answered
  • Replies replies
    6
  • Subscribers subscribers
    14
  • Views views
    442
  • Users 0 members are here
  • Locked Locked
Related
Options
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

win$printer

MikeDybacz

Is there any way of getting the tray names from the printer properties so they can be displayed as the driver states not what is in the general table provided in the winprint.def library

User does not know what to select when running via AcuGT runtime compared to other applications as tray selection is different

  • 0

    WINPRINT-GET-PRINTER-MEDIA  - www.microfocus.com/.../BKPPPPLIBRS307.html

    CALL "WIN$PRINTER"
    USING WINPRINT-GET-PRINTER-MEDIA, WINPRINT-MEDIA
    GIVING RESULT

    SW Engineering(QA)  

    Although I am an OpenText employee, I am speaking for myself and not for OpenText.
    If you found this post useful, give it a “Like” or click on "Verify Answer" under the "More" button

  • 0 in reply to 

    I think that only returns the tray numbers available for the printer not the descriptions of the trays

  • 0 in reply to 

    Have you tried the prndemox.cbl example program? I only have a simple printer, but the program does show the tray names.

    SW Engineering(QA)  

    Although I am an OpenText employee, I am speaking for myself and not for OpenText.
    If you found this post useful, give it a “Like” or click on "Verify Answer" under the "More" button

  • 0 in reply to 

    Yes but the names that show are those stored in the table within WINPRINT.DEF which is hard coded and does relate in part to the tray types (see tables below). However, they are not necessarily the names used within the printer driver when displayed via the windows API in other apps.

    03 WINPRINT-CURR-TRAY SIGNED-SHORT.
    88 WPRT-UPPER-TRAY VALUE 1.
    88 WPRT-LOWER-TRAY VALUE 2.
    88 WPRT-MIDDLE-TRAY VALUE 3.
    88 WPRT-MANUAL-TRAY VALUE 4.
    88 WPRT-ENVELOPE-TRAY VALUE 5.
    88 WPRT-ENVMANUAL-TRAY VALUE 6.
    88 WPRT-AUTO-TRAY VALUE 7.
    88 WPRT-TRACTOR-TRAY VALUE 8.
    88 WPRT-SMALLFMT-TRAY VALUE 9.
    88 WPRT-LARGEFMT-TRAY VALUE 10.
    88 WPRT-LARGECAPACITY-TRAY VALUE 11.
    88 WPRT-CASSETTE-TRAY VALUE 14.
    88 WPRT-FORMSOURCE-TRAY VALUE 15.

    03 PAPER-TRAYS.
    05 FILLER PIC X(34) VALUE "Upper tray".
    05 FILLER PIC X(34) VALUE "Lower tray".
    05 FILLER PIC X(34) VALUE "Middle tray".
    05 FILLER PIC X(34) VALUE "Manual".
    05 FILLER PIC X(34) VALUE "Envelope tray".
    05 FILLER PIC X(34) VALUE "Manual envelope".
    05 FILLER PIC X(34) VALUE "Auto".
    05 FILLER PIC X(34) VALUE "Tractor feeder".
    05 FILLER PIC X(34) VALUE "Small format tray".
    05 FILLER PIC X(34) VALUE "Large format tray".
    05 FILLER PIC X(34) VALUE "Large capacity tray".
    05 FILLER PIC X(34) VALUE "Cassette tray".
    05 FILLER PIC X(34) VALUE "Form source tray".
    03 PAPER-TRAY-TABLE REDEFINES PAPER-TRAYS PIC X(34)
    OCCURS MAX-PAPER-TRAYS.

  • 0  

    This is not currently supported by WIN$PRINTER, but could be. You need to raise an enhancement request for this.

  • 0

    Hi,

    please have a look at this ticket: https://community.microfocus.com/cobol/acucobol/f/forumid-20/346129/win-print-and-undefined-tray-number-values

    This discussion is quite old but perhaps it gives you a push in the right direction.

Resources

Support
Documentation
Learning Services
Partner Programs
Privacy
Compliance
Help
Company
Privacy Policy
Terms of Use
Cookies Preferences
Accessibility
Anti-Slavery Statement
Support
Contact Us
Careers
Code of Business Conduct and Ethics
The opinions expressed above are the personal opinions of the authors, not of OpenText. By using this site, you accept the Terms of Use. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.), Hewlett Packard Enterprise Company, or Micro Focus. As of January 31, 2023, the Material is now offered by OpenText, a separately owned and operated company. Any reference to the HP, Hewlett Packard Enterprise/HPE, and Micro Focus marks is historical in nature and the HP, Hewlett Packard Enterprise/HPE, and Micro Focus marks are the property of their respective owners.