Column position of cursor

One of the nice features of Homesite is that you can in
addition to dsiplaying line numbers, you could click anywhere in
your code (or text file) and the lower left of the screen will tell
you the column position of your cursor. This is handy when parsing
text files and debugging javascript code that gives you both a line
number and column position of the error. I have line numbers turned
on in Dreamweaver but is there a way to determine the column
position of the cursor (how many characters into the line)?

No. But you can request that it be added -
http://www.macromedia.com/cfusion/mmform/index.cfm?name=wishform
Murray --- ICQ 71997575
Adobe Community Expert
(If you *MUST* email me, don't LAUGH when you do so!)
==================
http://www.dreamweavermx-templates.com
- Template Triage!
http://www.projectseven.com/go
- DW FAQs, Tutorials & Resources
http://www.dwfaq.com - DW FAQs,
Tutorials & Resources
http://www.macromedia.com/support/search/
- Macromedia (MM) Technotes
==================
"beyondpictures" <[email protected]> wrote
in message
news:e9rbei$e19$[email protected]..
> One of the nice features of Homesite is that you can in
addition to
> dsiplaying
> line numbers, you could click anywhere in your code (or
text file) and the
> lower left of the screen will tell you the column
position of your cursor.
> This is handy when parsing text files and debugging
javascript code that
> gives
> you both a line number and column position of the error.
I have line
> numbers
> turned on in Dreamweaver but is there a way to determine
the column
> position of
> the cursor (how many characters into the line)?
>

Similar Messages

Show cursor column position

Is there a way to have Dreamweaver 8 display the current
column position of the cursor? When I'm doing comment separators or
keeping track of line lengths I copy the line into TextPad to
determine the length of the line, and then pasting it back into
Dreamweaver 8. Am I missing something here?
Thanks!

I know this is bad netiquette, but did you ever get a reply
to your question? (presumably not here!
) - thanks in advance... GREG...

Identify columns after fetching cursor

Hi,
I have a scenario in which iam reading the columns into a cursor and during fetch I want to apply some condition against each column in the cursor.
Eg:
curcor c1 is Select col1,col2,col3 from test;
rec1 c1%rowtype;
begin
open c1;
loop
fetch c1 into rec1;
exit when c1%NOTFOUND;
if rec1.col1=1234
Here instead of using column name can I know that this is the first column in the cursor and apply multiple validations and similarly to next column and so on.
Regards
Satya

If you want to reference columns by position then you either need to be using a ref cursor via a 3rd party developement language like .NET etc. or you need to use the DBMS_SQL package within PL/SQL.
Example of using DBMS_SQL package (from my standard library of examples - in this case something that takes a query and outputs the data as CSV)...
As sys user:
CREATE OR REPLACE DIRECTORY TEST_DIR AS '\tmp\myfiles'
GRANT READ, WRITE ON DIRECTORY TEST_DIR TO myuser
/As myuser:
CREATE OR REPLACE PROCEDURE run_query(p_sql IN VARCHAR2
                                     ,p_dir IN VARCHAR2
                                     ,p_header_file IN VARCHAR2
                                     ,p_data_file IN VARCHAR2 := NULL) IS
v_finaltxt VARCHAR2(4000);
v_v_val     VARCHAR2(4000);
v_n_val     NUMBER;
v_d_val     DATE;
v_ret       NUMBER;
c           NUMBER;
d           NUMBER;
col_cnt     INTEGER;
f           BOOLEAN;
rec_tab     DBMS_SQL.DESC_TAB;
col_num     NUMBER;
v_fh        UTL_FILE.FILE_TYPE;
v_samefile BOOLEAN := (NVL(p_data_file,p_header_file) = p_header_file);
BEGIN
c := DBMS_SQL.OPEN_CURSOR;
DBMS_SQL.PARSE(c, p_sql, DBMS_SQL.NATIVE);
d := DBMS_SQL.EXECUTE(c);
DBMS_SQL.DESCRIBE_COLUMNS(c, col_cnt, rec_tab);
FOR j in 1..col_cnt
LOOP
    CASE rec_tab(j).col_type
      WHEN 1 THEN DBMS_SQL.DEFINE_COLUMN(c,j,v_v_val,2000);
      WHEN 2 THEN DBMS_SQL.DEFINE_COLUMN(c,j,v_n_val);
      WHEN 12 THEN DBMS_SQL.DEFINE_COLUMN(c,j,v_d_val);
    ELSE
      DBMS_SQL.DEFINE_COLUMN(c,j,v_v_val,2000);
    END CASE;
END LOOP;
-- This part outputs the HEADER
v_fh := UTL_FILE.FOPEN(upper(p_dir),p_header_file,'w',32767);
FOR j in 1..col_cnt
LOOP
    v_finaltxt := ltrim(v_finaltxt||','||lower(rec_tab(j).col_name),',');
END LOOP;
-- DBMS_OUTPUT.PUT_LINE(v_finaltxt);
UTL_FILE.PUT_LINE(v_fh, v_finaltxt);
IF NOT v_samefile THEN
    UTL_FILE.FCLOSE(v_fh);
END IF;
-- This part outputs the DATA
IF NOT v_samefile THEN
    v_fh := UTL_FILE.FOPEN(upper(p_dir),p_data_file,'w',32767);
END IF;
LOOP
    v_ret := DBMS_SQL.FETCH_ROWS(c);
    EXIT WHEN v_ret = 0;
    v_finaltxt := NULL;
    FOR j in 1..col_cnt
    LOOP
      CASE rec_tab(j).col_type
        WHEN 1 THEN DBMS_SQL.COLUMN_VALUE(c,j,v_v_val);
                    v_finaltxt := ltrim(v_finaltxt||',"'||v_v_val||'"',',');
        WHEN 2 THEN DBMS_SQL.COLUMN_VALUE(c,j,v_n_val);
                    v_finaltxt := ltrim(v_finaltxt||','||v_n_val,',');
        WHEN 12 THEN DBMS_SQL.COLUMN_VALUE(c,j,v_d_val);
                    v_finaltxt := ltrim(v_finaltxt||','||to_char(v_d_val,'DD/MM/YYYY HH24:MI:SS'),',');
      ELSE
        DBMS_SQL.COLUMN_VALUE(c,j,v_v_val);
        v_finaltxt := ltrim(v_finaltxt||',"'||v_v_val||'"',',');
      END CASE;
    END LOOP;
-- DBMS_OUTPUT.PUT_LINE(v_finaltxt);
    UTL_FILE.PUT_LINE(v_fh, v_finaltxt);
END LOOP;
UTL_FILE.FCLOSE(v_fh);
DBMS_SQL.CLOSE_CURSOR(c);
END;This allows for the header row and the data to be written to seperate files if required.
e.g.
SQL> exec run_query('select * from emp','TEST_DIR','output.txt');
PL/SQL procedure successfully completed.Output.txt file contains:
empno,ename,job,mgr,hiredate,sal,comm,deptno
7369,"SMITH","CLERK",7902,17/12/1980 00:00:00,800,,20
7499,"ALLEN","SALESMAN",7698,20/02/1981 00:00:00,1600,300,30
7521,"WARD","SALESMAN",7698,22/02/1981 00:00:00,1250,500,30
7566,"JONES","MANAGER",7839,02/04/1981 00:00:00,2975,,20
7654,"MARTIN","SALESMAN",7698,28/09/1981 00:00:00,1250,1400,30
7698,"BLAKE","MANAGER",7839,01/05/1981 00:00:00,2850,,30
7782,"CLARK","MANAGER",7839,09/06/1981 00:00:00,2450,,10
7788,"SCOTT","ANALYST",7566,19/04/1987 00:00:00,3000,,20
7839,"KING","PRESIDENT",,17/11/1981 00:00:00,5000,,10
7844,"TURNER","SALESMAN",7698,08/09/1981 00:00:00,1500,0,30
7876,"ADAMS","CLERK",7788,23/05/1987 00:00:00,1100,,20
7900,"JAMES","CLERK",7698,03/12/1981 00:00:00,950,,30
7902,"FORD","ANALYST",7566,03/12/1981 00:00:00,3000,,20
7934,"MILLER","CLERK",7782,23/01/1982 00:00:00,1300,,10The procedure allows for the header and data to go to seperate files if required. Just specifying the "header" filename will put the header and data in the one file.
Adapt to output different datatypes and styles are required.

Getting column names from cursor

Hi all
I have procedure which produces list of applied for jobs web page(using htp. package)
I got result in cursor, but have to provide dinamic sort, based on colimn pressed
procedure my_application_list
(pi_resume_num     in varchar2 default null
,pi_sort_col     in varchar2 default null
,pi_page_no     in varchar2 default null
,pi_action     in varchar2 default null
,pi_msg          in varchar2 default null
is
CURSOR cur_job IS
     SELECT      jtl.JOB_TITLE
          ,jtl.COMPANY_NAME
          ,a.APPLY_DATE
          ,a.lang
          ,a.job_id
     FROM job_tl jtl, applied_for_job a, gateway gt
     WHERE a.job_seeker_id=app.job_Seeker
     AND a.job_id=jtl.job_id
     AND a.lang=jtl.lang
     AND a.gateway=gt.gateway
     AND jtl.lang=(SELECT substr(MIN(lt.order_list||jtl0.lang),2) lang
               FROM      job_tl jtl0
                    ,language_tl lt
               WHERE jtl0.job_id = a.job_id
               AND jtl0.lang=lt.lang
               AND lt.gui_lang=app.language)
     ORDER BY pi_sort_col
rest of code
The columns displayed in web page are Job_title, Company_name and Applied_date
This page is displyed well, bu without column nmes at the top. I am trying to get column names from cursor in order to have ORDER BY <pi_sort_col>
can someone help how i can get those column names:Job_title, Company_name and Applied_date
User will be able to click on column and sort
Thank in advance .I appreciate any help

Hi Francisco
Here is my code
CREATE OR REPLACE PACKAGE BODY cc_web_application_list
IS
TYPE COL_NAME_LIST IS TABLE OF VARCHAR2(100)
     INDEX BY BINARY_INTEGER;
TYPE COL_ORDER_LIST IS TABLE OF VARCHAR2(30)
     INDEX BY BINARY_INTEGER;
col_name_t col_name_list;
col_order_t col_order_list;
procedure my_application_list
     (pi_resume_num     in varchar2 default null
     ,pi_sort_col     in varchar2 default null
     ,pi_page_no     in varchar2 default null
     ,pi_action     in varchar2 default null
     ,pi_msg          in varchar2 default null
is
l_my_page_no      PLS_INTEGER :=     TO_NUMBER(nvl(pi_page_no,1));
l_js_name          gam_user.username%TYPE;
l_js_first_name          gam_user.first_name%TYPE;
l_cnt                PLS_INTEGER := 0;
l_scr_lines      PLS_INTEGER := 0;
l_curline           PLS_INTEGER;
l_jobs_applied           PLS_INTEGER;
l_total_rec      PLS_INTEGER;
l_total_pages      PLS_INTEGER;
l_pos               PLS_INTEGER;
l_first               PLS_INTEGER :=0;
last                PLS_INTEGER :=0;
l_lines           PLS_INTEGER := 10;
col_name      VARCHAR2(100) := col_name_t(3) ;
col_order           VARCHAR2(30) := 'DESC';
str                VARCHAR2(2000);
TYPE display_rec IS TABLE OF VARCHAR2(500) INDEX BY BINARY_INTEGER;
display           display_rec;
TYPE page_table_type IS TABLE OF PLS_INTEGER INDEX BY BINARY_INTEGER;
page_number          page_table_type;
CURSOR cur_job IS
     SELECT      jtl.JOB_TITLE job_title
          ,jtl.COMPANY_NAME company_name
          ,a.APPLY_DATE apply_date
          ,a.lang
          ,a.job_id
     FROM job_tl jtl, applied_for_job a, gateway gt
     WHERE a.job_seeker_id=app.job_Seeker
     AND a.job_id=jtl.job_id
     AND a.lang=jtl.lang
     AND a.gateway=gt.gateway
     ORDER BY a.apply_date;
This decode is a problem
          decode(col_order,'ASC'
               ,decode(col_name
               ,col_name_t(1), jtl.job_title
               ,col_name_t(2), jtl.company_name
               ,col_name_t(3), TO_CHAR(a.apply_date, 'YYYYMMDDhh24miss')
               ,a.apply_date)
               ) ASC
          ,decode(col_order,'DESC'
               ,decode(col_name
               ,col_name_t(1), jtl.job_title
               ,col_name_t(2), jtl.company_name
               ,col_name_t(3), TO_CHAR(a.apply_date, 'YYYYMMDDhh24miss')
               ,a.apply_date)
               ) DESC
          ,a.apply_date
TYPE rec_one IS TABLE OF cur_job%ROWTYPE INDEX BY BINARY_INTEGER;
r               rec_one;
BEGIN
BEGIN
SELECT username,first_name
INTO l_js_name,l_js_first_name
FROM gam_user
WHERE user_id = App.job_seeker;
EXCEPTION
WHEN OTHERS THEN NULL;
END;
Cc_Pkg_Elements.p_page_top_job_seeker(
'Personal Job List'
,REPLACE(Txt_Proc_My_Joblist.title_job_list
     ,'##first_name##',l_js_first_name),'N' ,TRUE ,'Pxx');
----- get numer of records returned by query
SELECT COUNT(1)
INTO l_total_rec
FROM     job_tl jtl,applied_for_job a
     ,gateway gt
WHERE a.job_id = jtl.job_id
AND     a.job_seeker_id     = App.job_seeker
AND     a.gateway     = gt.gateway ;
------get number of pages
l_total_pages:=CEIL (l_total_rec/l_lines);
l_jobs_applied := 0;
col_name := pi_sort_col;
col_order := pi_sort_col;
--get first positions
l_first := (nvl(l_my_page_no,1) - 1) * l_lines + 1;
FOR rec IN cur_job LOOP
     l_cnt := l_cnt + 1;
     EXIT WHEN l_cnt > l_first + l_lines - 1;
     IF l_cnt >= l_first THEN
          l_scr_lines := l_scr_lines + 1;
          r(l_scr_lines) := rec;          --assign counter from loop to r index
          IF rec.apply_date IS NOT NULL THEN
          l_jobs_applied := l_jobs_applied + 1;
          END IF;
     END IF;
END LOOP;
htp.p('<FORM ACTION="'||App.gateway||'8.my_application_list" METHOD="post">');
htp.p('<table align="center">');
htp.p('<tr><td>');
IF r.COUNT = 0 THEN
     Web_Pkg_Elements.doc_msg(Txt_Proc_My_Joblist.no_jobs);
END IF;
htp.p('</td></tr>');
htp.p('</table>');
--table_heading(col_name ,col_order );
htp.p('<table align=center>');
htp.p('<tr align="center"><td>');
FOR i IN 1..l_total_pages LOOP
     page_number(i) := i;
     IF page_number(i) = l_total_pages THEN
          htp.p('');
||'');
          Web_Pkg_Elements.doc_val_small(page_number(i)||'</A>');
     ELSE
     htp.p('');
|'||'');
     Web_Pkg_Elements.doc_val_small(page_number(i)||' |'||'</A>');
     END IF;
END LOOP;
htp.p('</td></tr>');
htp.p('</table>');
htp.p('<table align=center>');
FOR l_curline IN 1..l_scr_lines LOOP
     display(1) := NVL(r(l_curline).job_title, '<br>');
     display(2) := NVL(r(l_curline).company_name, '<br>');
     display(3) := NVL(Cc_Pkg_Nls.date2char(r(l_curline).apply_date, App.date_format), '<br>');
     IF MOD(l_curline, 2) = 0 THEN
          Cc_Pkg_Elements.tr_even;
     ELSE
          Cc_Pkg_Elements.tr_odd;
     END IF;
     htp.p('<td>');
     htp.p('');
     Web_Pkg_Elements.doc_val(display(1)||'');
     htp.p('</td>');
     htp.p('<td>');
     Web_Pkg_Elements.doc_val(display(2));
     htp.p('</td>');
     htp.p('     <td>');
     Web_Pkg_Elements.doc_val(display(3));
     htp.p('     </td>');
htp.p('</tr>');
END LOOP;
htp.p('</TABLE>');
htp.p('<TABLE width="88%" BORDER="0" CELLPADDING="0" CELLSPACING="0"
               align="center">');
htp.p('<tr valign=bottom>');
htp.p('<TD colspan=2 align=right>');
IF l_my_page_no > 1 THEN
     htp.p('<P>'||'<IMG SRC="'||App.image||'prev.gif" ALT="'
     ||Txt_Proc_My_Joblist.prev
     ||'"'     ||' HEIGHT=20 BORDER=0 ALIGN=bottom '
     ||'hspace=2>');
END IF;
IF l_my_page_no < CEIL (l_total_rec/l_lines) THEN
     htp.p(' <a href="'||
     web_pkg_elements.link$$(App.gateway||'8.my_application_list?'
     ||'pi_sort_col='||Web_Pkg_Elements.replace_in_url(pi_sort_col)
     ||'&pi_msg=&pi_page_no='||TO_CHAR(l_my_page_no + 1)
     ||">'||'<IMG SRC="'||App.image||'next.gif" ALT="'
     ||Txt_Proc_My_Joblist.NEXT
     ||'"' ||' HEIGHT=20 BORDER=0 ALIGN=bottom '
     ||'hspace=2></a>');
END IF;
htp.p('</TD>');
htp.p('</TR>');
htp.p('     </TABLE>');
htp.formHidden('pi_sort_col', pi_sort_col);
htp.formHidden('pi_page_no', pi_page_no);
htp.p('</FORM>');
END my_application_list;
END ; --cc_pkg_application_list

How to position the cursor in a text

I there a better way to position the cursor in a text portion other than trying it several times until the OS picks the right space? I know the iPad has a good way to do it by zooming in.
Or is RIM working on it.....

I've been pretty successful at getting the cursor to hit where I want in text entry boxes.
Maybe some more practice will make perfect. Worked for me, until I got used to,and then again maybe my using a touchscreen smartphone, the process just comes second nature for me.
1. If any post helps you please click the below the post(s) that helped you.
2. Please resolve your thread by marking the post "Solution?" which solved it for you!
3. Install free BlackBerry Protect today for backups of contacts and data.
4. Guide to Unlocking your BlackBerry & Unlock Codes
Join our BBM Channels (Beta)
BlackBerry Support Forums Channel
PIN: C0001B7B4 Display/Scan Bar Code
Knowledge Base Updates
PIN: C0005A9AA Display/Scan Bar Code

Error in TCode iview Select a line or position the Cursor correctly

Hi All,
I am getting the below error while selecting the row in Tcode iview
Select a line or position the Cursor correctly.
You have not selected a delivery or a delivery item for processing and the cursor is not positioned on a valid line, even after i am
selecting the Delivery and click on the execute button
My system config :
NW04s SP 20
Thanks&Regards
Murthy

Hi Murthy,
Create the Iview again.Hope the issue will resolve.
Thanks,
Arun

Changing the column position & width using Screen Variant..

Hi Experts,
    Iam trying to change the column position and width for the standard transaction (eg. FB60 or VA02) using the transaction code SHD0 (Transaction and Screen Variant).
    Iam able to create and save the transaction and screen variant and i could see the check box options for table control like
    a. Auto Column Position
    b. Auto Column Width
     I tried checking and unchecking both the check boxes but iam unable to modify / maintain the column position and width.
     Please guide me in changing the column position and width.
   Thanks in Advance.

Hi Mudit,
Kindly go through this link below:
http://help.sap.com/saphelp_nw04/Helpdata/EN/9f/dbac0b35c111d1829f0000e829fbfe/content.htm
Hope it helps you
Regrds
Mansi

Is there anyone there? I hope there is someone who can you understand this problem and have the common sense to respond? I open gmail. I want to save an email to one of my folders. I position my cursor over the appropriate Folder icon or by choice, to th

Is there anyone there? I hope there is someone who can you understand this problem and have the common sense to respond?
I open gmail. I want to save an email to one of my folders.
I position my cursor over the appropriate Folder icon or by choice, to the Trash.
The friendly finger pointing cursor icon changes to an arrow icon.
The hand icon allows me flawless access to opening and/or moving emails.
The arrow, however does not open the link.
On the Google menu bar the cursor hand with finger opens the links to Everett (my name), Search, Images, Maps and Play.
When I attempt to open the remaining links in the menu bar (YouTube, News, Gmail, Drive, Calendar and More) the arrow icon replaces the hand. The arrow icon does not work. It will not activate these links. Nor does it open email messages in the Inbox.
Usually I reset, even reboot Safire and sometimes the problem goes away, then reappears.
Can you imagine if this condition should it happen to a tech savvy Google Support person? Perhaps one can share and make my problem go away.
I am considering dropping Google as my mail source. Unfortunate!
Everett Halvorsen
[email protected]
718.490.3824

I have uninstalled my Access Connection, but this problem seems to persist. IBM technician have changed the wireless card of my T60, the first few days after it was changed was very fine, no problem at all. About a week later, the problem occured again, and it happened quite frequently after that occurence. Now i really have no idea what is the cause and how to solve it. Will be greatful if there is anyone that can help me.

How to position the cursor at the end of the text with EDIT_TEXT?

Hello, it wanted to ask to them if somebody could make work the module of function EDIT_TEXT so that it positions the cursor at the end of the text that is visualizing in the text editor. In the documentation it says that passing a ' X' to him in the field scrollend of the parameter Control is obtained that operation. Nevertheless, I did this and the cursor continues appearing at the beginning of the text that visualizes.
Somebody could help me please?
Regards,
Gabriel
PD: The code that I use is the following one:
FORM f_ingresar_comentarios.
DATA: l_action,
l_result LIKE itcer,
l_pedido LIKE thead-tdname,
li_coment_save LIKE i_comentarios OCCURS 0,
li_coment_aux LIKE i_comentarios OCCURS 0 WITH HEADER LINE,
l_lines TYPE i,
l_lines_save TYPE i,
l_lines_insert TYPE i,
l_index TYPE i,
l_index_aux TYPE i,
l_insert,
lwa_control LIKE itced.
CLEAR: l_action.
CLEAR i_comentarios.
REFRESH: i_comentarios,
li_coment_save,
li_coment_aux.
l_pedido = v_pedido.
Leemos el texto si es que existe
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = sy-mandt
id = v_id_text
language = sy-langu
name = l_pedido
object = c_ekko
IMPORTING
header = wa_cabecera
TABLES
lines = i_comentarios "Lineas de texto leídas
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
IF sy-subrc <> 0.
Armamos la cabecera por primer comentario para el pedido
CLEAR wa_cabecera.
wa_cabecera-tdobject = c_ekko. "Objeto en tabla TTXID
wa_cabecera-tdname = v_pedido. "Nro de pedido
wa_cabecera-tdid = v_id_text. "ID en tabla TTXID
wa_cabecera-tdspras = sy-langu. "Lenguaje
wa_cabecera-tdlinesize = 70.
ENDIF.
Salva comentarios originales
li_coment_save[] = i_comentarios[].
lwa_control-scrollend = c_x. " c_x = 'X'
Abre el editor de texto
CALL FUNCTION 'EDIT_TEXT'
EXPORTING
header = wa_cabecera
save = space
control = lwa_control
IMPORTING
newheader = wa_cabecera
function = l_action
RESULT = l_result
TABLES
lines = i_comentarios
EXCEPTIONS
object = 1
id = 2
language = 3
name = 4
linesize = 5.
Si cambio los comentarios, actualiza comentarios
CASE l_action.
WHEN c_unchanged.
WHEN c_delete.
WHEN c_update OR
c_insert.
Obtiene cantidad de lineas de comentarios originales y modificados
DESCRIBE TABLE li_coment_save LINES l_lines_save.
DESCRIBE TABLE i_comentarios LINES l_lines.
Si se insertaron lineas...
IF l_lines > l_lines_save.
Calcula cantidad de lineas a insertar para luego calcular valor de
indice a partir del cual insertar los nuevos comentarios
l_lines_insert = l_lines - l_lines_save.
l_index = ( l_lines - l_lines_insert ) + 1.
Controla que al menos una de las lineas insertadas sea diferente de
blanco
l_index_aux = l_lines.
l_insert = c_n.
DO l_lines_insert TIMES.
READ TABLE i_comentarios INDEX l_index_aux.
IF sy-subrc = 0 AND
i_comentarios-tdline <> space.
l_insert = c_s.
EXIT.
ENDIF.
l_index_aux = l_index_aux - 1.
ENDDO.
IF l_insert = c_s.
Carga comentarios originales y agrega lineas insertadas
li_coment_aux[] = li_coment_save[].
APPEND LINES OF i_comentarios
FROM l_index
TO l_lines
TO li_coment_aux.
Setea variable para indicar actualizacion de comentarios.
v_comentario = 'S'.
Agrega usuario y fecha del comentario
CONCATENATE sy-uname
sy-datum
INTO li_coment_aux-tdline
SEPARATED BY space.
li_coment_aux-tdformat = '*'.
APPEND li_coment_aux.
Grabamos el texto
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
client = sy-mandt
header = wa_cabecera
savemode_direct = c_x
IMPORTING
newheader = wa_cabecera
TABLES
lines = li_coment_aux
EXCEPTIONS
id = 1
language = 2
name = 3
object = 4
OTHERS = 5.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDIF.
ENDIF.
ENDCASE.
ENDFORM. " f_ingresar_comentarios
In addition, I made another program simpler that it uses the same functions and also have the same problem:
*& Report Y_GVA_TEXT *
REPORT y_gva_text .
DATA: wa_cabecera LIKE thead,
i_comentarios LIKE tline OCCURS 0 WITH HEADER LINE.
DATA: l_action,
v_comentario,
l_result LIKE itcer,
v_pedido LIKE thead-tdname VALUE '3',
l_pedido LIKE thead-tdname,
c_a05 LIKE thead-tdid VALUE 'A05',
c_ekko LIKE stxh-tdobject VALUE 'EKKO',
l_lines LIKE sy-tabix,
lwa_control LIKE itced.
CONSTANTS: c_x VALUE 'X',
update VALUE 'U', "Langtext verändert
insert VALUE 'I', "Langtext eingefügt
delete VALUE 'D', "Langtext gelöscht
modify VALUE 'M', "Kein Langtext, Inlinezeile veränd.
unchanged VALUE ' '.
CLEAR: l_action.
CLEAR i_comentarios.
REFRESH i_comentarios.
Leemos el texto si es que existe
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = sy-mandt
id = c_a05
language = sy-langu
name = v_pedido
object = c_ekko
IMPORTING
header = wa_cabecera
TABLES
lines = i_comentarios "Lineas de texto leídas
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE 'I' NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
Armamos las cabecera para mostrar los comentarios
CLEAR wa_cabecera.
wa_cabecera-tdobject = c_ekko. "Objeto en tabla TTXID
wa_cabecera-tdname = v_pedido. "Nro de pedido
wa_cabecera-tdid = c_a05. "ID en tabla TTXID
wa_cabecera-tdspras = sy-langu. "Lenguaje
wa_cabecera-tdlinesize = 70.
ENDIF.
lwa_control-noendlines = c_x.
lwa_control-scrollend = c_x.
Abre el editor de texto
CALL FUNCTION 'EDIT_TEXT'
EXPORTING
header = wa_cabecera
save = space
control = lwa_control
IMPORTING
newheader = wa_cabecera
function = l_action
RESULT = l_result
TABLES
lines = i_comentarios
EXCEPTIONS
object = 1
id = 2
language = 3
name = 4
linesize = 5.
Si cambio los comentarios, actualiza comentarios
CASE l_action.
WHEN unchanged.
WHEN delete.
WHEN update OR
insert.
Agrega usuario y fecha del comentario
CONCATENATE sy-uname
sy-datum
INTO i_comentarios-tdline
SEPARATED BY space.
i_comentarios-tdformat = '*'.
APPEND i_comentarios.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
header = wa_cabecera
IMPORTING
newheader = wa_cabecera
TABLES
lines = i_comentarios.
ENDCASE.

Murugesh,
I believe that you have mis-read Gabriel's problem.
Gabriel,
The cursor is not positioning at the base of the editor as you have cited.
In order to get this functionality to work, you must set the LINE_EDITOR import paramter to 'X'.
data: hdr like THEAD.
data: l_itced like itced.
hdr-tdobject = 'VBBP'.
hdr-tdname = '4000029521000030'.
hdr-tdid = 'Z005'.
hdr-tdspras = 'E'.
hdr-TDLINESIZE = '100'.
hdr-TDTXTLINES = '3'.
l_itced-SCROLLEND = 'X'.
CALL FUNCTION 'EDIT_TEXT'
    EXPORTING
    DISPLAY             = ' '
    EDITOR_TITLE        = ' '
      HEADER              = hdr
    PAGE                = ' '
    WINDOW              = ' '
    SAVE                = 'X'
      LINE_EDITOR         = 'X'   " here !!!
      CONTROL             = l_itced
    PROGRAM             = ' '
    LOCAL_CAT           = ' '
IMPORTING
    FUNCTION            =
    NEWHEADER           =
    RESULT              =
    TABLES
      LINES               = lines
EXCEPTIONS
    ID                  = 1
    LANGUAGE            = 2
    LINESIZE            = 3
    NAME                = 4
    OBJECT              = 5
    TEXTFORMAT          = 6
    COMMUNICATION       = 7
    OTHERS              = 8
Don't forget those points !!

Why is my BDC_CURSOR command not working to position the cursor?

Why is my BDC_CURSOR command not working to position the cursor? Here are the details regarding my issue.
I am writing a BDC to mass delete routing material assignments using transaction CA02. I am OK to navigate through the initial screen to go to the Header screen and from here I am OK to navigate to the Material Assignments screen. But once here, I cannot get the BDC_CURSOR command to take me into the list. Here are the commands I am using. Please let me know what I may try differently.
CA02 Material Assignment - Set position <-- this resets list of materials to correct position
PERFORM bdc_dynpro      USING 'SAPLCZDI'   '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR' 'RC27X-ENTRY_ACT'.
PERFORM bdc_field       USING 'BDC_OKCODE'   '=ENT1'.
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT' c_position.
CA02 Material Assignment - Delete
PERFORM bdc_dynpro      USING 'SAPLCZDI'   '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR' 'MAPL-MATNR(01)'.    <-- this is not working to set the cursor into the list
PERFORM bdc_field       USING 'BDC_OKCODE' '=LOE'.             " trash can
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT' c_position.
CA02 Material Assignment - Green Check OK
PERFORM bdc_dynpro      USING 'SAPLCZDI'   '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR' 'RC27X-ENTRY_ACT'.
PERFORM bdc_field       USING 'BDC_OKCODE'   '=BACK'.            " check mark
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT' c_position.

Thank you for your reply.
I had used SM35 to record. However, I was not aware of the "create program" feature. I had commented out a section from my previous post which I have now added back (latest code below). But it still did not resolve the issue.
When I execute with dismode = 'N', I get back error message "No batch input data for screen SAPLCZDI 1010".
When I execute with dismode = 'E' (only show dynpros when error), it stops at the material selection screen without placing my cursor in the list. I can then MANUALLY click to set the cursor position in the list, MANUALLY click the trashcan, it then uses my BDC command to respond to the popup asking "Do you want to delete", still leaving me at the material selection screen. I can then MANUALLY click the green check (or enter), then it continues with the BDC to go back to the previous screen, and saves. But it still will not place my cursor in the material selection list (SAPLCZDI screen 1010).
Here is code used. It is the second section of code labeled "CA02 Material Assignment - Delete" that is not working.
CA02 Material Assignment - Set position
this code functions to position the desired material to first in screen list
PERFORM bdc_dynpro      USING 'SAPLCZDI' '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR'
                                'RC27X-ENTRY_ACT'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                                '=ENT1'.
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT'
                                 c_position.
CA02 Material Assignment - Delete
PERFORM bdc_dynpro      USING 'SAPLCZDI' '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR'
                                'MAPL-MATNR(01)'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                                '=LOE'.             " trash can
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT'
                                 c_position.
Acknowledge Pop-Up Screen
PERFORM bdc_dynpro      USING 'SAPLSPO1' '0100'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                                '=YES'.
CA02 Material Assignment - Green Check OK
PERFORM bdc_dynpro      USING 'SAPLCZDI' '1010'.
PERFORM bdc_field       USING 'BDC_CURSOR'
                                'RC27X-ENTRY_ACT'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                                '=BACK'.            " check mark
PERFORM bdc_field       USING 'RC27X-ENTRY_ACT'
                                 c_position.

Line Item Display Variant MIRO-column position needs to be changed..

Hi,
What is the possible way of setting the column position in line item display variant in MIRO screen.
I need to change the positions of couple of columns so need to have one layout as per my requirement.
Does this involve only confiuration or it also needs ABAP changes?
Request to suggest in detail if any one has done it already.
Thanks in advance.
Reagrds,
BM

Hi Charlie,
Thanks for this help.However I have couple of doubts.
When I save the new variant it asks me for package or local object.
Cutrrently I have selected n saved as local object but what is the real time scenarion.Do we need to select any package on this screen.I am not aware of these things in detail so nwant to know the difference between a local object and a package and is it functional consultant's task to do this or developers should do this since they can select the package
Please advise on this.
Thanks in advance.
Regards,
BM

REGARDING position the cursor at the end of the field

i friends,
i have a field having length of 20 ,i need to place the cursor at the end of the filed means at the 20 th position the cursor must be there how will i acieve this...plz help me the value which i will pass to this field is may be of character 4 ,5 what ever but the cursor will be always at the 20th position or at the end of the filed plz help me.......

parameters:pa_str(20) type c default '11111111111111111111' .
initialization. .
Set cursor field 'PA_STR' offset 20.

To position the cursor

How to position the cursor at next item if i choose kod_kat_pkj = '2' then the cursor will go(jump to) to kod_ngra ( state)
Begin
--Job categories
     begin
          select initcap(nama)
          into :lmd_pmk_pkj.kod_kat_pkjn_d
          from lmd_ref_kat_kerja
          where kod = :lmd_pmk_pkj.kod_kat_pkjn;
     exception
          when no_data_found then
               :lmd_pmk_pkj.kod_kat_pkjn_d := '-Tiada-';
     end;
--Worker Categories
     begin
          select initcap(nama)
          into :lmd_pmk_pkj.kod_kat_pkj_d
          from lmd_ref_kat_pkj
          where kod = :lmd_pmk_pkj.kod_kat_pkj;
     exception
          when no_data_found then
               :lmd_pmk_pkj.kod_kat_pkj_d := '-Tiada-';
     end;
--State if imigran
     if :lmd_pmk_pkj.kod_kat_pkj = '3' then
          begin
               select initcap(nama)
               into :lmd_pmk_pkj.kod_ngri_d
               from lmd_ref_ngri
               where kod = :lmd_pmk_pkj.kod_ngri;
          exception
               when no_data_found then
                    :lmd_pmk_pkj.kod_ngri_d := '-Tiada-';
          end;
     end if;
--State
     if :lmd_pmk_pkj.kod_kat_pkj = '2' then
          begin
               select initcap(nama)
               into :lmd_pmk_pkj.kod_ngra_d
               from lmd_ref_ngra
               where kod = :lmd_pmk_pkj.kod_ngra;
          exception
               when no_data_found then
                    :lmd_pmk_pkj.kod_ngra_d := '-Tiada-';
          end;
     end if;
exception
     when others then
     call_alert('e_alt01','POST_QUERY LMD_PMK_PKJ : '||dbms_error_text);
End;

Post-Text-Item
if :lmd_pmk_pkj.kod_kat_pkj = '2' then
     go_item('lmd_pmk_pkj.kod_ngra');
elsif :lmd_pmk_pkj.kod_kat_pkj = '3' then
     go_item('lmd_pmk_pkj.kod_ngri');
else
     go_item('lmd_pmk_pkj.bil_pkj_l');
end if;
But why when i choose 2, the cursor not jump to next item kod_ngra.

Position the cursor at the top of the JTextArea?

How do you position the cursor or document at the top of the JTextArea. When I set the JTextArea to some text that exceeds the JTextArea ScrollPane it scrolls to the bottom of the document. How do you position the document to the top of the JTextArea?
thanks,
Peter

setCaretPosition(0);

How to position the cursor in File Name area in JFileChooser??

Hi,
I have been trying to position the cursor directly to filename area in JFileChooser. But no success.
It positions itself at the directory path by default.
How should I achieve this?
The problem is that I do not know the name of this
component used for File Name area hence difficult to
use "requestFocus() or getFocus()" like methods.
Thanks for your help.
-Manoj

Somewhere I saw a tip that explained how to do it, but I didn't keep a link to it. But basically it's like this: JFileChooser is a Container, so getComponent(n) will return the n-th component in the JFileChooser. One of them is the one you want to give the focus to, and I expect it will be a JTextField. A little experimentation should tell you which index you need to use.

Column position of cursor

Similar Messages

Maybe you are looking for