PL/SQL

declare
gl_lagerbeh produkter.lagerbeh%type;
ny_lagerbeh produkter.lagerbeh%type;
begin
select lagerbeh into gl_lagerbeh
from produkter
where prodnr = 100870;
ny_lagerbeh := gl_lagerbeh + &antal;
update produkter set lagerbeh = ny_lagerbeh where prodnr = &prodnr;
commit;
end;

Et gæt...

Den går ikke;-)
Angiv værdien for antal: gammel  8: ny_lagerbeh := gl_lagerbeh + &antal;
ny  8: ny_lagerbeh := gl_lagerbeh + OEM_sqlplus_input_finished;
ny_lagerbeh := gl_lagerbeh + OEM_sqlplus_input_finished;
                            *
FEJL i linie 8:
ORA-06550: linje 8, kolonne 30:
PLS-00201: identifikatoren \'OEM_SQLPLUS_INPUT_FINISHED\' skal erklæres
ORA-06550: linje 8, kolonne 1:
PL/SQL: Statement ignored

netsrac har ret. Man bruger &.

Men var det ikke nemmere at skrive

update produkter
    set lagerbeh = lagerbeh + &antal
where prodnr = &prodnr;
commit;

Der vil så i prompt blive spurgt om antal og prodnr

& er defineret i sqlplus ved
set define &

-ehf, jo det da nemmere, men spørgsmålet går mere på hvordan/kan man bruge &antal, &prodnr i en procedure. Jeg har nemlig ikke kunne finde noget om det i de bøger jeg har.

declare
  gl_lagerbeh produkter.lagerbeh%type;
  ny_lagerbeh produkter.lagerbeh%type;
  pnr pls_integer;
  ant pls_integer;
begin
  pnr := &prodnr;
  ant := &antal;

  select lagerbeh into gl_lagerbeh
    from produkter
  where prodnr = pnr;

  ny_lagerbeh := gl_lagerbeh + ant;
  update produkter set lagerbeh = ny_lagerbeh where prodnr = pnr;
  commit;
end;
/

Hov !

Jeg sov vist lidt i timen.

Hvordan kalder du dit script ?
- OEM_SQLPLUS_INPUT_FINISHED kommer vel ikke ud af den blå luft...

accept prodnr prompt \'Prodnr:\'
accept antal prompt \'Antal:\'

declare
gl_lagerbeh produkter.lagerbeh%type;
ny_lagerbeh produkter.lagerbeh%type;
begin
select lagerbeh into gl_lagerbeh
from produkter
where prodnr = &prodnr;
ny_lagerbeh := gl_lagerbeh + &antal;
update produkter set lagerbeh = ny_lagerbeh where prodnr = &prodnr;
commit;
end;
/

Hvorom alting er, så vil det nok være lidt kønnere
at lave en \'rigtig\' procedure á la

CREATE OR REPLACE PROCEDURE update_lager (
  p_antal PLS_INTEGER,
  p_prodnr PLS_INTEGER)
BEGIN
.
.
.
END;

Enig, men så er det jo ikke længere et script :-)

-pgroen,jeg arbejder i sql*plus worksheet og starter mit script med @add_lagerbeh; Herunder er outputtet på dit forslag.

Angiv værdien for prodnr: gammel  7:  pnr := &prodnr;
ny  7:  pnr := ;
Angiv værdien for antal: gammel  8:  ant := &antal;
ny  8:  ant := OEM_sqlplus_input_finished;
  pnr := ;
        *
FEJL i linie 7:
ORA-06550: linje 7, kolonne 10:
PLS-00103: Traf symbolet \";\", hvor en af følgende var forventet:
( - +
mod not null <an identifier>
<a double-quoted delimited-identifier> <a bind variable> avg
count current exists max min prior sql stddev sum variance
execute forall time timestamp interval date
<a string literal with character set specification>
<a number> <a single-quoted SQL string>
Symbolet \"null\" erstattede \";\" for at fortsætte.

-teepee, her er outputtet:

Prodnr:Angiv værdien for prodnr: gammel  7: where prodnr = &prodnr;
ny  7: where prodnr = OEM_sqlplus_input_finished;
Angiv værdien for antal: gammel  8: ny_lagerbeh := gl_lagerbeh + &antal;
ny  8: ny_lagerbeh := gl_lagerbeh + 125;
Angiv værdien for prodnr: gammel  9: update produkter set lagerbeh = ny_lagerbeh where prodnr = &prodnr;
ny  9: update produkter set lagerbeh = ny_lagerbeh where prodnr = ;
update produkter set lagerbeh = ny_lagerbeh where prodnr = ;
                                                          *
FEJL i linie 9:
ORA-06550: linje 9, kolonne 60:
PLS-00103: Traf symbolet \";\", hvor en af følgende var forventet:
( - +
all mod null <an identifier>
<a double-quoted delimited-identifier> <a bind variable> any
avg count current max min prior some sql stddev sum variance
execute forall time timestamp interval date
<a string literal with character set specification>
<a number> <a single-quoted SQL string>
Symbolet \"null\" erstattede \";\" for at fortsætte.

Har du prøvet en alm. sql*plus session?
Jeg kender ikke lige sql*plus worksheet, men den kunne måske have sat define variable mv. anderledes.

Scriptet virker perfekt i sql*plus

Du har ret, det virker i sql*plus.1000 tak, nu kan jeg hovere over for bossen.