Join The Works program to have access to the most current content, and to be able to ask questions and get answers from Revelation staff and the Revelation community

At 05 MAY 2020 06:23:38PM Richard Hunt wrote:

I created a test program to explain basically what I am doing. The problem is that it will not repeat the rectangle on each page. Four pages display, although the rectangle appears on page 1 and not on pages 2, 3 and 4. A little help would be appreciated.

Windows 7, OI ver 9.4, Vsprinter2

SUBROUTINE TEST_OIPI(RESULT)

* Declare statements. DECLARE FUNCTION GET_PRINTER, SET_PRINTER *

* Set program variables.

HEADER_FONT = 'Lucida Console':@FM:10
TEXT_FONT = 'Lucida Console':@FM:10
BARCODE_FONT = 'Barcode39':@FM:48
FORMNAME_FONT = 'Lucida Console':@FM:48
FORMNAME_FONT<8> = 228 + (228 * 256) + (228 * 256 * 256)

*

* Initialize printer. FILENAME = FILENAME<3> = 6 TITLE = 'Creating PDF.' TITLE<2> = 'Preview PDF.' TITLE<3> = '&Cancel' TITLE<4> = 'On printer %s located at %s' TITLE<5> = 'Creating page %d' PAGEINFO = PAGEINFO<1> = 0 PAGEINFO<2> = 0 PAGEINFO<3> = 0 PAGEINFO<4> = 0 PAGEINFO<7> = 1 PAGEINFO<8> = 1 PAGESETUP = PAGESETUP<1> = 0 PAGESETUP<2> = 5 PRINTSETUP = 4 PRINT_DEVICE = RESULT = SET_PRINTER('INIT',FILENAME,TITLE,PAGEINFO,PAGESETUP,PRINTSETUP,PRINT_DEVICE) IF RESULT LT 0 THEN RETURN END *

* Set up rectangle.

STYLE = 0:@FM:1
RESULT = SET_PRINTER('LINESTYLE',STYLE)
LEFT = 100
TOP = 100
WIDTH = 300
HEIGHT = 50
POSITION = LEFT
POSITION := @FM:TOP
POSITION := @FM:LEFT + WIDTH
POSITION := @FM:TOP + HEIGHT
RESULT = SET_PRINTER('RECT',POSITION,1)

*

* Add pages. RESULT = SET_PRINTER('TEXTXY','PAGE 1',100:@FM:100,TEXT_FONT,1) RESULT = SET_PRINTER('PAGEBREAK') RESULT = SET_PRINTER('TEXTXY','PAGE 2',200:@FM:200,TEXT_FONT,1) RESULT = SET_PRINTER('PAGEBREAK') RESULT = SET_PRINTER('TEXTXY','PAGE 3',300:@FM:300,TEXT_FONT,1) RESULT = SET_PRINTER('PAGEBREAK') RESULT = SET_PRINTER('TEXTXY','PAGE 4',400:@FM:400,TEXT_FONT,1) *

* Terminate printer.

RESULT = SET_PRINTER('TERM',1)
RETURN

At 06 MAY 2020 12:28PM Richard Hunt wrote:

Crap!!!! When I change the SYSENV > CFG_OIPI record to VSPRINTER it then works correctly. The repeat of the rectangle works.

Is this a known issue and is there a workaround?


At 06 MAY 2020 01:04PM bshumsky wrote:

Crap!!!! When I change the SYSENV > CFG_OIPI record to VSPRINTER it then works correctly. The repeat of the rectangle works.

Is this a known issue and is there a workaround?

Hi, Richard. Yes, it's often our advice to try both "traditional" OIPI (VSPRINTER) and OIPI.Net (VSPRINTER2), because there is different code behind each one.

No, this is not a known issue (at least as far as I know about), but I will test it here and see if it's something that can be easily resolved.

Were you planning to use OIPI.Net for a particular reason? If not, perhaps OIPI "classic" would work just as well for you in this instance as a "workaround".

Hope that helps,

- Bryan Shumsky

Revelation Software, Inc.


At 06 MAY 2020 03:32PM bshumsky wrote:

Hi, Richard. I just tried your sample program on a "clean" 9.4 which had been patched using the most recent "roll up" patch (in the Works downloads, you can see it as OpenInsight 9.4 "Roll Up" Patch v5.1 from December 2018), and it seems to work properly? I'm getting the box on each page, and the textxy output as expected (first one on first page, first one and second one on second page, first three on third page, and all four on fourth page). Do you know if you've applied all the patches to your 9.4 system?

Thanks,

- Bryan Shumsky

Revelation Software, Inc.


At 06 MAY 2020 09:11PM Richard Hunt wrote:

Thank you Brian. I will look to see if I updated using all the patches as you suggested. Your help is always appreciated.

View this thread on the Works forum...

  • third_party_content/community/commentary/forums_works/71b6cd063b06cd4ea183481a70c8c93d.txt
  • Last modified: 2023/12/30 11:57
  • by 127.0.0.1