How to print Superscript / Subscript from RPG400

How to print Superscript / Subscript from RPG400..

Answer / javeed

How to print subscript / superscript through RPGLE into spool file. This gets converted to pdf at the end.

How to print "1st" as 1<st> (superscript) using RPGLE.
The printer field type is character length 15.

External printer file.
Printer device type . . . . . . . . . : *AFPDS

coded as @Symbo = '1' x'09 'st' x'03
it prints "1 st ", with special characters in place of hex x'09 & x'03 but not as 1<st> (superscript).

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More RPG400 Interview Questions

difference between 1:%found and %equal built function in detail with example .

6 Answers   Polaris,

If the last record of a file has been read, and the next operation on that file is a READ operation, what will be the values of the input fields for that file? A. They will be blank and/or zero. B. They will be null. C. They will equal the values of the first record in the file. D. They will equal the values of the last record read.

3 Answers  

can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id

0 Answers  

how to change the length of the field in a physicalfile?

12 Answers  

Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On

0 Answers   IBM,

What would be the result on writing a data record to a PF file using the "WRITE" opcode after the SETON *ON *INLR statment?

10 Answers  

Can more than one subfile record be displayed on one line?

6 Answers  

there is any limit to display the members in rpg400?

3 Answers  

how many variables can we declare in cl pgm?

13 Answers  

1.Write code to read the records from a file and load an array of size 99? Make sure that you take care of all the error conditions?

2 Answers   HSBC,

Hi guys, anybody know How RPG/400 code can be converted to RPG IV code with a single command?

1 Answers  

wat is the difference between dataarea and data queue?

5 Answers   Airtel, Four soft, Shahi Exports,