Forum OpenACS Development: MIGRATION: ACS --> OPENACS 5.1.4

HELLO,

IM TRYING TO MIGRATE FROM ACS TO OPENACS 5.14

IM LOOKING FOR TCL EXAMPLES THAT WORK IN OPENACS 5.1.4

IM NEW IN ACS AND OPENACS STUFF.

I REALLY APPRECIATE IT.

Collapse
Posted by Jade Rubick on
Hi Judith:

What you're trying to do is a fair amount of work. We'll need a little more information about your ACS system and how it is currently being used. How much data is in the ACS database?

Depending on what you're using on ACS, this may be a difficult task, or an extremely difficult one :) Many people have done it before, but it's not easy. But it will depend a lot of what you're currently using ACS for.

Collapse
Posted by Judith Pino Chial on
THANK U JADE.

THEY USED ACS 4.0, ORACLE 8.1.7, AOLSERVER 3.1 AND IM USING OPENACS 5.1.4, ORACLE 8.1.7, AOLSERVER: 4.0 (WHEN EVERYTHING RUN PERFECTLY ON OPENACS, WE WILL CHANGE ORACLE 8i TO ORACLE 9i.)

THERE SO MANY WEB APPLICATIONS ON ACS THAT I HAVE TO MIGRATE TO OPENACS.(EASY AND DIFFICULT). IM STARTING WITH THE EASY ONE. BUT IM STILL HAVE PROBLEMS :(

DO YOU HAVE ANY TIPS FOR ME ON OPENACS?

Collapse
Posted by Andrew Piskorski on
Yeah, I have one tip: Turn off your caps lock key! Eric Raymond's advice might also be useful.
Collapse
Posted by Jade Rubick on
I don't mean this in a sarcastic sense, but my first tip is to provide specific details of the problems you're having when you're asking for help ;)

All I know is you are on ACS and are migrating it and having problems. There isn't any way any of us can help with that sort of information.

Collapse
Posted by Judith Pino Chial on
sorry for the poor information that i gave before....
----------------------------------------------------------
------
ERROR1:
------
wrong # args: should be "query statement_name result_name type sql args"
while executing
"query posiciones_creadas multirow $query"
("uplevel" body line 7)
invoked from within
"uplevel {

template::form create posiciones_creadas

set query "select nombre_pos, cod_pos
from procadm.t_cargos or..."
(procedure "code::tcl::/var/lib/aolserver/oacspa/packages/cargoxnombrami..." line 2)
invoked from within
"code::tcl::$__adp_stub"
invoked from within
"if { [file exists $__adp_stub.tcl] } {

# ensure that data source preparation procedure exists and is up-to-date
adp_init tcl $__adp_stub
..."
("uplevel" body line 3)
invoked from within
"uplevel {

if { [file exists $__adp_stub.tcl] } {

# ensure that data source preparation procedure exists and is up-to-date
adp_init t..."
(procedure "adp_prepare" line 2)
invoked from within
"adp_prepare "
(procedure "template::adp_parse" line 30)
invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
(procedure "adp_parse_ad_conn_file" line 5)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
set tcl_url2path_info..."
-----------------------------------------------------------
----
IN:
----
set query "select nombre_pos, cod_pos
rom procadm.t_cargos
order by nombre_pos asc"
query posiciones_creadas multirow $query
.......
-------------
I CHANGED TO:
-------------
ad_page_contract{
} {
poscrea
opcion
} -properties {
posiciones_creadas:multirow
}

db_multirow posiciones_creadas posiciones_creadas_query "select nombre_pos, cod_pos
from procadm.t_cargos order by nombre_pos asc"
----------------------------------------------------------
-------
ERROR2:
-------
invalid command name "ad_page_contract{"
while executing
"ad_page_contract{"
("uplevel" body line 5)
invoked from within
"uplevel {

template::form create posiciones_creadas

ad_page_contract{
} {
poscrea
opcion
} -properties {
posiciones_creadas:multiro..."
(procedure "code::tcl::/var/lib/aolserver/oacspa/packages/cargoxnombrami..." line 2)
invoked from within
"code::tcl::$__adp_stub"
invoked from within
"if { [file exists $__adp_stub.tcl] } {

# ensure that data source preparation procedure exists and is up-to-date
adp_init tcl $__adp_stub
..."
("uplevel" body line 3)
invoked from within
"uplevel {

if { [file exists $__adp_stub.tcl] } {

# ensure that data source preparation procedure exists and is up-to-date
adp_init t..."
(procedure "adp_prepare" line 2)
invoked from within
"adp_prepare "
(procedure "template::adp_parse" line 30)
invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
(procedure "adp_parse_ad_conn_file" line 5)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
set tcl_url2path_info..."
-----------------------------------------------------------
I dont know what to do...please..HELPME!

Collapse
Posted by Jade Rubick on
Hi Judith:

Sorry to have so much advice. Here's something I wrote about getting help from the OpenACS forums:

http://www.rubick.com/openacs/getting_started/

Collapse
Posted by Judith Pino Chial on
Thank you

I did it! :D

Collapse
Posted by Judith Pino Chial on
Thank you very much JADE.

I just changed ns_ora dml $db sql -bind [ns_getform]
to db_dml $db sql -bind [ns_getform].

I have to change ns_ora dml $db "commit" too?

Collapse
Posted by Judith Pino Chial on
Hi :D

I have another error:
-------------------------------------------

can't read "info(nombre_pos)": variable isn't array
    while executing
"lang::util::localize $info(nombre_pos)"
    invoked from within
"ad_quotehtml [lang::util::localize $info(nombre_pos)]"
    invoked from within
"append __adp_output "</td></tr>
  <tr><td align=left><b>Código:</b></td>
  <td nowrap>[ad_quotehtml [lang::util::localize ${pos}]]</td>            ..."
    ("uplevel" body line 34)
    invoked from within
"uplevel {
          set __adp_output ""
append __adp_output "<html>
<head>
  <style>
    h2 \{ font-family: Arial, Helvetica \}
    th \{ font-family: Ar..."
    (procedure "template::code::adp::/var/lib/aolserver/oacspa/packages/carg..." line 2)
    invoked from within
"template::code::${template_extension}::$__adp_stub"
    (procedure "template::adp_parse" line 68)
    invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
    (procedure "adp_parse_ad_conn_file" line 5)
    invoked from within
"$handler"
    ("uplevel" body line 2)
    invoked from within
"uplevel $code"
    invoked from within
"ad_try {
                $handler
            } ad_script_abort val {
                # do nothing
            }"
    invoked from within
"rp_serve_concrete_file [ad_conn file]"
    (procedure "rp_serve_abstract_file" line 60)
    invoked from within
"rp_serve_abstract_file "$root/$path""
    ("uplevel" body line 2)
    invoked from within
"uplevel $code"
    invoked from within
"ad_try {
            rp_serve_abstract_file "$root/$path"
            set tcl_url2file([ad_conn url]) [ad_conn file]
            set tcl_url2path_info...

---------------------------------------------
any idea???

array format change in OpenACS?

Collapse
Posted by Jade Rubick on
Judith: please post the relevant code.
Collapse
Posted by Judith Pino Chial on
---------------------------------------------------
can't read "info(nombre_pos)": variable isn't array
    while executing
"lang::util::localize $info(nombre_pos)"
---------------------------------------------------
Collapse
Posted by Judith Pino Chial on
HI!

I fixed all the messages errors.

Thanks