Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Cursor readwrite
Message
 
To
18/12/2010 15:10:28
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01493239
Message ID:
01493242
Views:
86
This message has been marked as the solution to the initial question of the thread.
Hi Tamas
DTOC(TTOD(tetel.szla_stor)) as szla_storno,;
Long field name. The max legnth of field name is 10 characters.

SQL Select does support longer filed name, but a output cursor is not modifiable.

MartinaJ

>When I use this sql select, the cursor tetel works ok. Alter table command runs properly.
>
>
>SELECT bp_tetel.tetel_id, bp_tetel.fejkod, bp_tetel.engedely, bp_tetel.netto_ar,bp_tetel.brutto_ar,; 
>bp_fej.teljesites, bp_fej.kelte, bp_fej.stornozva as szla_stor,; 
>bp_tetel.aru_nev, VAL(SUBSTR(ALLTRIM(bp_tetel.engedely),9,2)) as sort1,;
>VAL(SUBSTR(ALLTRIM(bp_tetel.engedely),3,6)) as sort2;
>FROM bp_tetel;
>LEFT JOIN bp_fej;
>ON bp_tetel.fejkod == bp_fej.fejkod;
>WHERE SUBSTR(ALLTRIM(bp_tetel.aru_nev),1,10) == "Túlsúlydíj";
>AND bp_fej.teljesites >= {2010.11.01};
>AND bp_fej.teljesites < {2010.12.01};
>ORDER BY sort1, sort2;
>INTO cursor tetel readwrite
>
>ALTER TABLE tetel;
> ADD COLUMN statusz c(20)
>
>
>But when I use this sql select, the cursor tetel2 cannot be altered.
>Alter table command gives a invalid operation for cursor.
>
>
>SELECT tetel.engedely, tetel.fejkod as szlaszam, DTOC(TTOD(bp_eng.iktatva)) as eng_iktat,;
>DTOC(TTOD(bp_eng.kiadva)) as eng_kiad, DTOC(tetel.teljesites) as teljesites, DTOC(TTOD(bp_eng.stornozva)) as eng_storno,;
>DTOC(TTOD(tetel.szla_stor)) as szla_storno,;
>bp_eng.fordulo, bp_eng.tavolsag, bp_eng.tomeg_dij, bp_eng.ten_dij,; 
>bp_eng.ind_varos, bp_eng.bel_vnev, bp_eng.ind_irsz,; 
>bp_eng.cel_varos, bp_eng.kil_vnev, bp_eng.cel_irsz,;
>(((bp_eng.tomeg_dij + bp_eng.ten_dij)* bp_eng.fordulo)*bp_eng.tavolsag) as kalk_dij,;
>tetel.netto_ar, tetel.brutto_ar,;
>(bp_eng.tavolsag-(bp_eng.aka + bp_eng.aap + bp_eng.bp+bp_eng.dak)) as mak,;
> bp_eng.aap, bp_eng.aka, bp_eng.dak, bp_eng.bp,;
>(((bp_eng.tomeg_dij+bp_eng.ten_dij)*bp_eng.fordulo)*(bp_eng.tavolsag-(bp_eng.aka+bp_eng.aap+bp_eng.bp+bp_eng.dak))) as ft_mak,;
>(((bp_eng.tomeg_dij+bp_eng.ten_dij)*bp_eng.fordulo)*bp_eng.aap) as ft_aap,;
>(((bp_eng.tomeg_dij+bp_eng.ten_dij)*bp_eng.fordulo)*bp_eng.aka) as ft_aka,;
>(((bp_eng.tomeg_dij+bp_eng.ten_dij)*bp_eng.fordulo)*bp_eng.dak) as ft_dak,;
>(((bp_eng.tomeg_dij+bp_eng.ten_dij)*bp_eng.fordulo)*bp_eng.bp) as ft_bp,;
>tetel.statusz,;
>bp_eng.utvonal;
>FROM tetel;
>LEFT JOIN bp_eng;
>ON ALLTRIM(tetel.engedely) == ALLTRIM(bp_eng.engkod);
>WHERE SUBSTR(ALLTRIM(bp_eng.engkod),1,2) = "UE";
>AND bp_eng.tipus = "1";
>INTO CURSOR tetel2 READWRITE 
>
>ALTER TABLE tetel2;
> ADD COLUMN k_bdij B(2)
>
>
>Any idea why?
>thanks
"Navision is evil that needs to be erazed... to the ground"

Jabber: gorila@dione.zcu.cz
Jabber? Jabbim
Previous
Reply
Map
View

Click here to load this message in the networking platform