Smartforms output difference
Problem with Smartforms: in a certain form for two differently configured printers, there seem to be a difference in the output of characters per inch (the distance between characters which gives a layout problem - text in two lines instead of one.

It happens when the two printers having different Printer Controls' if you go to SPAD Menu (Spool Administrator Menu) you can see the difference in the Printer Control and if you make the Printer control setting for both the printers as same. then it will be ok. and also u have to check what is the device type used for both the output devices.

SmartForms Output to PDF
There is a way to download smartform in PDF format.
Please do the following:
1. Print the smartform to the spool.
2. Note the spool number.
3. Download a PDF file (Acrobat Reader) version of the spool by running Program RSTXPDFT4 and entering the
noted spool number.

SmartForm Doublesided printing question
Your customer wants your PO SmartForm to be able to print "Terms and Conditinos" on the back side of each page. They don't want to purchase pre-printed forms with the company's logo on the front and terms & conditions on the back. Now this presents an interesting problem.
Has anyone else ever had a request like this? If for example there was a 3 page PO to be printed, they want 3 pieces of paper, the front side of each to containe the PO information (page 1, 2, and 3) and the back side of each piece of paper to containg the static "Terms & Conditions" information.
Anyone have a clue how to force this out?

Easy - page FRONT lists page CONTACTS as next page and CONTACTS lists FRONT as next page. Since CONTACTS does not contain a MAIN window, it will print the contacts info and then continue on to FRONT for the rest of the main items. Additionally, set print mode on FRONT to D (duplex) and set CONTACTS to 'blank' (for both resource name and print mode - this is the only way to get to the back of the page).

Transport Smart Forms
How does one transport SMARTFORM? SE01?
How do you make sure that both, the SMARTFORM & it's function module gets transported? Or does the FM with same name gets generated automatically in the transported client?

A smartform is transported no differently than any other object. if it is assigned to a development class that is atteched to a transport layer, it will be transported.
The definition is transported, and when called, the function module is regenerated.
This leads to an interetsing situation. On the new machine, it is very likely the function module name will be different than the name on the source system. Make sure, before you call the function module, you resolve the external name to the internal name using the 'SSF_FUNCTION_MODULE_NAME' function module.
Typically, generate the SF, then use the pattern to being in the interface. Then change the call function to use the name you get back from the above function module.

Smartforms: protect lines in main window.
How to protect lines in the main window from splitting between pages?

It was easy with SAPscript, but how to do it with SF's. For 4.7 version if you are using tables, there are two options for protection against line break:
- You can protect a line type against page break.
- You can protect several table lines against page break for output in the main area.

Protection against page break for line types
- Double-click on your table node and choose the Table tab page.
- Switch to the detail view by choosing the Details pushbutton.
- Set the Protection against page break checkbox in the table for the relevant line type. Table lines that use this line type are output on one page.

Protection against page break for several table lines
- Expand the main area of your table node in the navigation tree.
- Insert a file node for the table lines to be protected in the main area.
- If you have already created table lines in the main area, you can put the lines that you want to protect again page break under the file using Drag&Drop. Otherwise, create the table lines as subnodes of the file.
- Choose the Output Options tab page of the file node and set the Page Protection option. All table lines that are in the file with the Page Protection option set are output on one page.

In 4.6, Alternatively in a paragraph format use the Page protection attribute to determine whether or not to display a paragraph completely on one page. Mark it if you want to avoid that a paragraph is split up by a page break. If on the current page (only in the main window) there is not enough space left for the paragraph, the entire paragraph appears on the next page.

There's a DDIC Table called "Ugyfel" containing 5 rows. I'd like simply to display all the rows on a SF's Main window.

Please follow this process to display the value from your table "Ugyfel"

1. Go with a transaction code : smartforms
2. Enter the form name like : ysmart_forms1
3. Create
4. Enter the Description for the form
5. From the left side window there will be a form interface to provide table .....
6. Go for tables option
7. ugyfel like ugyfel(ref.type)
8. Pages and window---> page1---> main window
9. Go to the form painter adjust the main window.
10. Select main window and right click --> go for create loop
11. Name: loop1, desc: display loop.
12. Internal table ktab into ktab.
13. select loop right click -> create a text
14. name : text1, desc: display text.
15. Go to change editor.
16. Write the mater what ever you want and if you want to display data from the table write the table fields as follows:

&ktab-& &ktab-&

save & activate then execute ,, scripts will generate a function module like : '/ibcdw/sf0000031' copy this function module and call in executable program...

For that
1. go with abap editor se38.
2. table: ugyfel.
3. parameters: test like ugyfel-.
4. data itab like ugyfel occurs 0 with header line.
5. select * from ugyfel into table itab where field1 = test1.
6. call function '/ibcdw/sf0000031'
7. tables
ktab = itab.

Save and activate the program ( ^f 3).

Now run the program ( f 8)

ALL THE BEST.

Here is a sample program in which used two internal tables:

REPORT YPRINTPRG_SMARTFORM1 .
DATA : ITKNA1 LIKE KNA1,
ITVBAK LIKE VBAK OCCURS 0 WITH HEADER LINE.
PARAMETERS : PKUNNR LIKE KNA1-KUNNR.

SELECT * FROM KNA1 INTO ITKNA1
WHERE KUNNR = PKUNNR.
ENDSELECT.

SELECT * FROM VBAK
INTO TABLE ITVBAK
WHERE KUNNR = PKUNNR.

CALL FUNCTION '/1BCDWB/SF00000011' “THIS FUNCTION MODULE CALLS THE
SMART FORM WE WILL GET THIS AT MENU ENVIRONEMENT ”
EXPORTING
ITKNA1 = ITKNA1
TABLES
ITVBAK = ITVBAK.

IN SMART FORM
FORM INERFACE---------IMPORT (TAB)
Parameter name Type assignment Reference type Default value
ITKNA1 LIKE KNA1

FORM INERFACE---------TABLES (TAB)
ITVBAK LIKE VBAK

PAGES & WINDOWS----- MAIN WINDOW-----LOOP 1----DATA(TAB)
ITVBAK INTO ITVBAK

PAGES & WINDOWS-------MAIN WINDOW------LOOP 1-----TEXT 3(EDITOR)
&ITVBAK-VBELN& &ITVBAK-ERDAT& &ITVBAK-ERNAM& &ITVBAK-NETWR&

PAGES & WINDOWS-------HEADER WINDOW-----TEXT 2(EDITOR)
Customer No. &itkna1-kunnr& CustomerName :&itkna1-name1&

1. Can we print bar codes in SAP only from ZEBRA printers ?

2. I had read that bar code printing is enabled in SAP and only needs to configure device/printer for that. Does this mean that we can use our existing HP 2300 or like printers to print bar codes without any ZEBRA like printers and the printed bar codes are readable through any reader ?

3. Are there any specific steps to print bar codes from SAP (from within Smartforms) including data fetch and printer configurations.

4. What is the process or method for reading data in bar code form into sap ( as far as I think that we can upload the txt file created from reader and upload it to SAP ). Can we do this without uploading TXT file i.e. directly reading from bar code reader into SAP. In other means what are the normal ways to read bar codes data into SAP.

Furthermore, we have taken a zebra Z4M plus printer from one of vendor on trial basis but even after following the recommended steps as mentioned in the config. manual we are unable to print any thing on bar code printer from within SAP.

I do agree that we can print bar codes from excel or from outside SAP but we wanted to print it out from within SAP and we think SMARTFORM is an easier way as compare to SAPSCRIPT (although we don't have any idea of printing bar codes from SAPSCRIPTs).

About reading from bar code reader .... yes we know that we have to read the bar codes into a ASCII or text file but in that case we need to write a ABAP program to upload that information into SAP to do MIGO (in our case) and for that we also need to fill in certain other information into that text file after reading bar codes ....?? is there any other simpler way of doing this ???

We are able to print barcodes from smartforms. Doing this way, we print barcodes on laser printers.

We are also printing from sap to zebra printers using two ways:
1. Download the data to an excel sheet, then creating a macro that opens the printer port and sending the commands to the printer through this "file". All this is done via vb script provided with excel)..
2. The second way is creating a vbscript (an ascii file from sap) with the printer commands and then runing it using ws_execute.

You need a barcode reader to read the barcodes, and this scanner acts like a keyboard, it sends the data scanned to the active field on screen. (which might be a notepad, word, excel or an input field or ... ).

Back to your problem:

1. We're using Zebra 2746-e (Eltron) to print labels that have some barcodes in their design. There are several approaches to solve this problem. We've decided to work with the programming language of the printer (EPL-2), because we use the zebra printers from SAP or from other windows applications.

Our solution was to develope function module that creates an ascii file (a vbscript file) and then use the ws_execute to run wscript with this file. The vbscript just opens the port for output and sends a sequence of writeline, each of them with a command to the printer. After all the commands were sent to the printer, we close the port . Just note that the port acts the same as a file.

This is an EXAMPLE of the visual basic script code;

Set fs=CreateObject("Scripting.FileSystemObject")
Rem send the output to COM1 port.
Set a = fs.CreateTextFile("COM1:",True)
Comilla = Chr(34)
a.writeline "O"
a.writeline "ZB"
a.writeline ""
a.writeline ""
a.writeline ""
a.writeline "N"
a.writeline ""
a.writeline ""
a.writeline "q800"
a.writeline "Q635,24+0"
a.writeline "R32,24"
a.writeline "S3"
a.writeline "D8"
a.writeline "ZT"
a.writeline ""
rem this is an example of barcode ean128-ucc
a.writeline "B126,429,0,1E,3,3,61,B,""011234567890123410051215"""
rem this is an example of barcode 3 of 9 rotated
a.writeline "B10,495,3,1,3,3,49,B,""01234567"""
a.writeline ""
a.writeline ""
a.writeline "P1"
a.writeline ""
a.Close

We've send this code to an ascii file or as part of a macro to be run within an excel sheet. We have succeed in both cases.
The zebra printer is created as local to the computer running the vbscript. We haven't been able to share the zebra printer so other people in the network can use it. And the zebra printer isn't installed as a SAP printer (we aren't using sap spooler to send jobs to the zebra). Another Note: zebra 2746 comes with a software bar-one (or something like that) that allows you to design the barcode label in a wysiwyg way

If my memory isn't failing, I think that I've read something about controlling zebra printers from smartforms in service.sap.com, but I haven't explored this possibility.

2. From 4.6c on, you can use smartforms to print barcodes without buying any barcode.dll software nor hardware extention like Bardimm on any laser/inkjet printer (Please Note that I haven't mentioned Zebra printers here!). To do this, you have to create a smartstyle -> character format with the desired barcode font (defined within sap). Then in the smartform, create a window, put the field and associate it the character format. That's all (I mean, that's all we do at least :-). I think, you have to consider the barcode specifications before sending the barcode value to the smartform (Just an example, if you're using 3 of 9, the code should start and end with an asterisk - '*' -) We're printing an interleaved 2 out of 5 barcode in our invoices due to a legal requirement, and we did it this way.

3. If you have a barcode scanner, then you should not need reading the barcode into an ascii file to get the data read in an standard or custom screen field. You can read it directly to the field you want. (unless... you have complex data coded in the barcode - for example if you're using an ean-ucc 128 compliant code and you're sending several fields in a single code ... In this case, an interface is almost mandatory because you must interpret the data fields according to the ucc standard, split the code into several fields .... and .... pure programming logic ).
To put it clear: if you have to read, for example, a barcode that holds the legal number of an invoice using a barcode scanner and this number should be sent to migo-> bktxt then you don't need an interface. The scanner itself acts like a fast operator entering the characters using a keyboard and filling in the field.
We're reading barcodes in several places (when we finish each pallet, when we receive an invoice, and so on. Each case is a different screen. We arent using an ascii file to read these barcodes. Furthermore, we read the invoice legal number into migo bktxt field (Head Text).

DESCRIBE 语句一共有三类用法，先简述一下 DESCRIBE FIELD的用法：
Field Properties 1. DESCRIBE FIELD ...
Properties of an Internal Table 2. DESCRIBE TABLE ...
Distance Between Two Fields 3. DESCRIBE DISTANCE ...

• Field Properties
  作用：对一个Elementary data的属性进行描述，就是说可以通过这条语句知道某一个data的类型、长度、小数点、输出长度等信息。语法如下。
  DESCRIBE FIELD dobj
  [TYPE typ [COMPONENTS com]]
  [LENGTH ilen IN { BYTE | CHARACTER } MODE]
  [DECIMALS dec]
  [OUTPUT-LENGTH olen]
  [HELP-ID hlp]
  [EDIT MASK mask].
  1. ... TYPE typ [COMPONENTS com]
  DESCRIBE FIELD data1 TYPE typ1 COMPONENTS com1.
  运行结果是data1的类型被存储在typ1变量里，com1则存放了data1里面有几个子元素。
  2. ... LENGTH ilen IN { BYTE | CHARACTER } MODE
  DESCRIBE FIELD data1 LENGTH ilen IN BYTE CHARACTER MODE.
  运行的结果是data1定义的长度存在了ilen里。
  3. ... DECIMALS dec
  DESCRIBE FIELD data1 DECIMALS dec.
  运行的结果是如果data1是小数，dec则存放了小数点后的位数。
  4. ... OUTPUT-LENGTH olen
  DESCRIBE FIELD data1 OUTPUT-LENGTH olen.
  运行的结果是data1的输出长度存在了olen里。
  5. ... HELP-ID hlp
  DESCRIBE FIELD carrid HELP-ID hlp.
  如果data1是由ABAP Dictionary 里的data element决定，data1的数据类型就会被存放在 hlp里。
  6. ... EDIT MASK mask
  DATA: time TYPE s_fltime,
  seconds TYPE i,
  msk TYPE string.
  DESCRIBE FIELD time EDIT MASK msk.
  seconds = 333.
  WRITE seconds USING EDIT MASK msk.

SKIP

SKIP { [n]
| {TO LINE line} }.

其实这些都是Online help，或者在ABAP环境中按F1呼出就可以查得到，但若不是仔细看，还真不知道有这么多细节，读者如果觉得有疑问，请参考源英文文档。

作用

将list cursor（可以理解为光标）位置下移一行或多行，或直接移直指定行数位置。

SKIP [n].

作用

该语句的作用是将list cursor移动n行，新起行的位置决定于变量n，n的data object是I。有如下情况：
n<=0 该语句被忽略
n未赋值 则按照 SKIP 1 执行

cursor位置的确定如下:

• 如果当前list cursor是由一条输出语句( WRITE, ULINE)确定，执行SKIP n 语句的效果为以该行为基准，list cursor的位置向下移动n行的开头。
• 如果当前list cursor是由一条定位语句( BACK, NEW-LINE, NEW-PAGE, SKIP)确定，执行SKIP n 语句的效果为以该行为基准，list cursor的位置向下移动n-1行的开头。

注意下列情况:

• 如果list cursor无法被放置在当前页，将新建一页，新建的页与当前页有相同的page footers。list cursor将被放置在page footers下第一行的开头。
• The statement is only executed at the start of the page if this page is the first in a list level, or it was generated using the statement NEW-PAGE. （暂不理解，未翻译）

注：

SKIP语句看上去是创建了n个空行，但这些空行是没有内容的，因此不能被Format语句格式化，只有Write语句结合SET BLANK LINES 才能产生可格式化的空行。

SKIP TO LINE line.

作用

令list cursor跳至当前页的某一行开头，由 line 值决定。line也是I类型，有下列情况：
line<=0 或 line >页长度 或遇到 NEW-PAGE SKIP后的TO LINE语句被忽略。SKIP执行，效果同SKIP.

注：

如果list cursor的位置在第一行使用SKIP TO LINE，而且这个list还有Standard page header，输出的结果是第一行会被standard header覆盖。If, however,the cursor is positioned using SKIP TO LINE in the lines of page headers and page footers that are defined for TOP-OF-PAGE and END-OF-PAGE, the page headers or footers are overwritten. （没看太明白，不翻译了）

原文：

SKIP

Syntax

SKIP { [n]
| {TO LINE line} }.

Variants:

1. SKIP [n].

2. SKIP TO LINE line.

Effect

Positions the list cursor under the current line or in any other line.

Variant 1

SKIP [n].

Effect

This statement positions the list cursor in relation to the current line. The new line is determined by the value of n. For n, a data object of type i is expected. If the value of n is smaller than or equal to 0, the statement is ignored. If n is not specified, the statement is executed as if n contains the value 1.

The cursor is positioned as follows:

• If the line of the current list cursor was set using an output statement ( WRITE, ULINE), the list cursor is set the first position of the line that is n lines under the current line.
  
• If the lines of the current list cursor was set using a positioning statement ( BACK, NEW-LINE, NEW-PAGE, SKIP), the list cursor is set in the current position in the line that is n minus 1 lines under the current line.
  

Note the following special conditions:

• If the list cursor cannot be positioned on the current page, a new page is created, which includes any page footers that the current page may have. The list cursor is positioned in the first position of the first line under the page header of the new page.
  
• The statement is only executed at the start of the page if this page is the first in a list level, or it was generated using the statement NEW-PAGE.
  
  
  

Note

In most application cases, this variant of the statement SKIP works as if it creates n blank lines. You need to ensure, however, that these blank lines have no content that can be formatted by the FORMAT statement. Formattable blank lines can only be generated by the WRITE statement in combination with SET BLANK LINES ON.

Variant 2

SKIP TO LINE line.

Effect

This statement positions the list cursor in the first position of the line on the current page whose number is determined by the value in line. For line, a data object of type i is expected. If the value of line is smaller than or equal to 0, or larger than the page length defined in sy-linct using the addition LINE-COUNT of the program-starting statement, or NEW-PAGE, the addition TO LINE is ignored and the statement SKIP without additions is executed instead.

Note

If the list cursor is positioned in the first list line using SKIP TO LINE, and the list has a standard page header, the output in the first line is overwritten by the standard header. If, however,the cursor is positioned using SKIP TO LINE in the lines of page headers and page footers that are defined for TOP-OF-PAGE and END-OF-PAGE, the page headers or footers are overwritten.

Example

The first SKIP statement generates a blank line for the event TOP-OF-PAGE. The second SKIP statement positions the list cursor in this line.

REPORT demo_skip NO STANDARD PAGE HEADING.

DATA sum TYPE i.

TOP-OF-PAGE.
SKIP.
ULINE.

START-OF-SELECTION.
DO 10 TIMES.
WRITE / sy-index.
sum = sum + sy-index.
ENDDO.

SKIP TO LINE 1.
WRITE: 'Numbers with sum' COLOR COL_HEADING,
sum COLOR COL_TOTAL.

如下一段程序：

SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 1.
PARAMETER P_FLEX RADIOBUTTON GROUP ways TYPE c.
SELECTION-SCREEN COMMENT 3(20) text-s30 for field P_FLEX.
SELECTION-SCREEN COMMENT 25(10) text-s31 for field P_PAYM_B.
SELECTION-SCREEN POSITION 38.
PARAMETER P_PAYM_B LIKE PA0015-PABRP MODIF ID wty.
parameters P_PAYY_B LIKE PA0015-pabrj MODIF ID wty.
SELECTION-SCREEN POSITION 57.
SELECTION-SCREEN COMMENT 57(5) text-s32 for field P_PAYM_E.
parameters P_PAYM_E LIKE PA0015-pabrp MODIF ID wty.
parameters P_PAYY_E LIKE PA0015-pabrj MODIF ID wty.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 25.
SELECTION-SCREEN COMMENT 25(9) text-s18 for field S_LGART.
SELECT-OPTIONS S_LGART FOR p0014-LGART MODIF ID wty.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 1.

本程序中涉及到几个SELECTION-SCREEN的用法：

1 SELECTION-SCREEN BEGIN OF LINE. ....END OF LINE.

这条语句的作用是让Begin of line 与End of line之间的部分位于同一行。

2 SELECTION-SCREEN POSITION XX.

这条语句的作用是将该语句后面的第一个Screen element定位在这一行的XX位置，最大值为79。值得注意的是，如果同一行中多个Position语句因为空间不够或Element所占空间重叠， 将导致Screen创建时的错误，无法激活。此时并无具体的提示。只能仔细观察代码。

3 SELECTION-SCREEN COMMENT XX(Y) TEXT-XXX FOR FIELD XXX.

这条语句的作用是在当前行的指定列位置处输出一段文本，For field则表示文本与某个element 关联，当此语句使用时，可以不必设定屏幕的Text element，系统会自动关联。XX表示位置，Y表示长度，注意，如果长度不足，超常的文字将被截掉。此处似乎还有一个小BUG，当Y小于5时，输出的 文字字体会变大一号。不知道为什么。

4 SELECTION-SCREEN SKIP 1.

跳过一行。类似于用WRITE写Report时的SKIP 1.也可以跳过多行。

这两天做了一个这样的需求，其中要求根据用户输入的工资项（T512W-LGART）查找数据，并输出到ALV，要求是输出跟着输入变。由于工资项的配置信息可能会变，因此用于存储要显示的数据的内表就不能预先知道，因此不得不寻求动态内表的构建方法。

其实网上的例子也有不少，但是都缺少说明，折腾了一上午才弄明白一些，写出来与大家分享。

REPORT Z_DT2.

type-pools : abap.

*以t512w为例，构建一个动态内表

tables: t512w.

*field-symbols是一个标志，你可以理解为一个指针，将来创建的内表就要通过它们来访问

field-symbols: type standard table,

,

.

* 这里定义了一个 dy_table 和一个 dy_line 类型是引用，但 to data 未能理解是什么意思，我觉得应该是说指向为空的意思

data: dy_table type ref to data,

dy_line type ref to data,

*用于存储即将构建的动态内表结构

ifc type lvc_t_fcat,

xfc type lvc_s_fcat.

data: begin of t_lgart occurs 0,

LGART like t512w-lgart,

end of t_lgart.

select-options: S_LGART FOR t512w-lgart.

start-of-selection.

*首先从数据库中把符合用户输入的LGART填入内表，将来构建的动态内表每一列就是LGART中的每一行。

select lgart into t_lgart-lgart from t512w where lgart in s_lgart and MOLGA = '28'.

append t_lgart.

endselect.

*循环读取内表t_lgart，对于每行构建内表

loop at t_lgart.

*这里偷了个懒，因为工资项中会有/103这样的数据，而/是不能用左列明的，大家可以自己写一个替换逻辑，把/替换成_之类的字符。

check t_lgart-lgart+0(1) <> '/'.

*列名就用lgart值

xfc-fieldname = t_lgart-lgart.

xfc-datatype = 'C'.

xfc-inttype = 'C'.

xfc-intlen = 6.

xfc-decimals = 0.

append xfc to ifc.

endloop.

*此处调用一个方法，这个方法用于构建动态内表，输入的就是要构建的结构，输出的就是一个dy_table，之前定义过，但是并不能直接访问。

call method cl_alv_table_create=>create_dynamic_table

EXPORTING

it_fieldcatalog = ifc

IMPORTING

ep_table = dy_table.

*设定指向 dy_table

assign dy_table->* to .

*下面这句建立了一个类型的工作区Work area

create data dy_line like line of .

*同理设定指针

assign dy_line->* to .

于是便动态的建立了一个内表和一个工作区，由于此方法建立的内表没有header line，所以需要一个工作区。

下面是取数或者赋值的方法：

*此行中的xxxx1就是列名

ASSIGN COMPONENT xxxx1 OF STRUCTURE TO .

*此行的作用就是给中的该列一个值

= xxxx2.

*用Append就可以把该行添加到表中了

APPEND TO .

如上所述，即可以动态构建内表，这种方法主要用于表结构无法确定有几列，几有哪些列，尤其与信息配置有关的时候，就只能用这种方法，否则配置一变，程序就不能用了。

SPLIT_FILENAME

输入一个文件路径，如：D:\Dir1\Dir2\F1.txt

输出两个值：PURE_FILENAME 和PURE_EXTENSION，前者的值是：F1，后者的值是TXT

PC_SPLIT_COMPLETE_FILENAME

输入一个文件路径 COMPLETE_FILENAME如：D:\Dir1\Dir2\F1.txt，还有一CHECK_DOS_FORMAT可以不输

输出：

DRIVE驱动器： D
EXTENSION扩展名： TXT
NAME文件名： F1
NAME_WITH_EXT带扩展名的文件名： F1.TXT
PATH路径： \DIR1\DIR2\