Insert text into a report depending on your choice (Page 1 of 2)

Hi Fabio

In FastScript, next to INVENTARIO, a Memo9 text field is created.
An OnAfterPrint event has been created for MasterData1.
In the FastScript script for the event, we write a command.

   memo9.text := <Report."Stagione.Stagione">;

Yes, everything else is as you described, and here you need to think about how to solve it.

Hi sparrows,
Thanks for the hint, that was something I didn't know.
I've tried various attempts, including the ones below but I just can't find the solution.

procedure MasterData1OnAfterPrint(Sender: TfrxComponent);
begin
  // if <"Stagione.Stagione.value"> = 0 then memo9.text := '' else
     if <"frmInventario.combobox1.index"> = 0 then memo9.text := '' else                                                                                                                                          
       memo9.text := <Report."Stagione.Stagione">;
end;

begin

end.

EDIT:
Ah OK. While I was writing you posted the change report, I hadn't noticed. So beyond that I didn't write the code well, my approach was also wrong.

It is easier for us to work with this variable than with the results (set) that are passed by the SQL query to FastScript .
The set is processed record by record sequentially in "MasterData1" or manually in a script.
The ComboBox1 variable is passed from the program itself when you select a season.
We only analyze this variable. If it is empty, then output 'ALL SEASONS'; if not empty, then the variable itself.

[IIF(<ComboBox1><>'',<ComboBox1>,'All seasons')]

One remark, you will already change the text ALL SEASONS for yourself.

Hi everyone, I'm here again. I always come up with new ideas but I can not develop, damn!
We always talk about this project.
I just realized that by creating a receipt (frmscontrinidetails) the project as it is also allows you to enter the quantity of an item even if the availability is lower. That is, I can put 3 pieces of an article even if I have 2.
This has a negative impact on the inventory because it inserts the article with equal quantity, in the case of the example, -1 and consequently subtracts the cost of the article.
If a user inserts that item by mistake or on purpose in the receipt, then in the inventory the cost is subtracted and therefore the inventory is untruthful.
How could I do to prevent entering quantities of a product that are lower than availability or at least not being notified of what is being done?
I've tried various ways including this creepy thing I post at the bottom but besides being crap it tells me that "function OnSQLException" already exists.
Thank you all.

function OnSQLException(Sender: TObject; Msg: string; SQL: string): boolean;
begin
  if Sender = frmScontrinidetail.button1 then
    begin
      if articoli.quantia < 0 then  
    begin      
      result := True; //*** blocca il messaggio originale di MVD ***
      MessageBox('ATTENZIONE stai inserendo una quantià inferiore alla disponibilità','', MB_ICONWARNING + 0); //*** messaggio personalizzato ***
    end;
end;

Sorry Sparrow, I can't always convey what I think I probably expressed myself badly.
I'll try to make you understand with an example.
In the warehouse I loaded ten pieces of an item which I paid ten for each piece.
I make a receipt and put in eleven pieces, so one more than what I have in stock. The project doesn't stop me from putting in eleven pieces even though I only have ten pieces in my warehouse.
Going to make the inventory and being that I have finished all the pieces, in the general inventory I should have, at least for that item, a value equal to zero.
Instead, in the general value which also includes other items, it subtracts the value of that piece from the total.
Let's assume the general value of the entire inventory is one hundred, so it becomes ninety and it's not real because it should be one hundred.
I would like to try to do something that prevents me from adding more pieces of an item than I have in stock or at least warns me that I am exceeding the quantity I actually have.

Ciao Domenico, "elencopro" esattamente a quale identificatore corrisponderebbe?

questo è un vecchio progetto rifatto

Grazie Domenico, ora lo guardo e cerco di capirci qualcosa. Poi vi faccio sapere. Per il momento ti posso dire che la grafica mi piace molto.
Thanks to you too sparrow.

Hi Fabio,
A couple of suggestions in addition to the advice you have already received about not saving a record if there is not enough stock.
In Option 1, you can show the available stock in the combobox (Product X  (100) etc etc).  You can also filter out those products where there is no stock so they do not even appear in the combobox.
In Option 2, when you select a product in the combobox, the available stock is shown as a text hint in the field where you enter the quantity.
As I said, it won't prevent the user from entering an incorrect quantity but at least it gives extra information about the available stock.
Derek.

Thank you so much tireless derek Check it out now.

An error can occur if the Quantita field of the frmInserimentoArticolo form is incorrectly specified
or not specified (empty) when colorizing a table.
Several solutions:
set default value
do validation of the entered value in the Edit field,
modify the calculated field to return 0 instead of empty.

p.s. Fabio in this case, commenting one line will not help in finding the error. You need to comment out 957 - 960.
These lines contain the condition check.