|
1 | | -/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.220 2003/05/2207:58:41 meskes Exp $*/ |
| 1 | +/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.221 2003/05/2217:09:00 meskes Exp $*/ |
2 | 2 |
|
3 | 3 | /* Copyright comment*/ |
4 | 4 | %{ |
@@ -610,15 +610,17 @@ stmt: AlterDatabaseSetStmt { output_statement($1, 0, connection); } |
610 | 610 | snprintf(errortext,sizeof(errortext), "trying to open undeclared cursor %s\n", $1); |
611 | 611 | mmerror(PARSE_ERROR, ET_ERROR, errortext); |
612 | 612 | } |
| 613 | +else |
| 614 | +{ |
| 615 | +/* merge variables given in prepare statement with those given here*/ |
| 616 | +for (p = ptr->argsinsert; p; p = p->next) |
| 617 | +append_variable(&argsinsert, p->variable, p->var_array_element, p->indicator, p->ind_array_element); |
613 | 618 |
|
614 | | -/* merge variables given in prepare statement with those given here*/ |
615 | | -for (p = ptr->argsinsert; p; p = p->next) |
616 | | -append_variable(&argsinsert, p->variable, p->var_array_element, p->indicator, p->ind_array_element); |
617 | | - |
618 | | -for (p = ptr->argsresult; p; p = p->next) |
619 | | -add_variable(&argsresult, p->variable, p->var_array_element, p->indicator, p->ind_array_element); |
| 619 | +for (p = ptr->argsresult; p; p = p->next) |
| 620 | +add_variable(&argsresult, p->variable, p->var_array_element, p->indicator, p->ind_array_element); |
620 | 621 |
|
621 | | -output_statement(mm_strdup(ptr->command), 0, ptr->connection ? mm_strdup(ptr->connection) : NULL); |
| 622 | +output_statement(mm_strdup(ptr->command), 0, ptr->connection ? mm_strdup(ptr->connection) : NULL); |
| 623 | +} |
622 | 624 | } |
623 | 625 | |ECPGPrepare |
624 | 626 | { |
|
