Gestione Disponibilità Web Articoli Composizione

Buongiorno,
facendo seguito al trend "Giacenze su articoli composizione" del 26/10/2018 dell'utente Claudia, vi chiediamo se esiste la possibilità di poter gestire la quantità che viene determinata con un vostro script, con il quale è possibile visualizzare nei report la disponibilità della quantità riferita all' "Articolo Composizione".
Per essere più chiari sullo script in questione, lo riportiamo sotto:

Option Explicit

Dim componente
Dim Qdisp
Dim QDispComponente
Qdisp=10000000
For Each componente In Product.KitComponents
   QDispComponente=componente.Product.QtyAvailable
   If QDispComponente<0 Then
        QDispComponente=0
   End If
   If componente.Quantity>0 Then
        QDispComponente = Int(QDispComponente/componente.Quantity)
   End If
   If QDispComponente<QDisp Then
        QDisp=QDispComponente
   End If
Next
If Qdisp=10000000 Then
   ' Articolo non composizione
   Qdisp=Product.QtyAvailable
   If Qdisp<0 Then
       Qdisp=0
   End If
End If
Response.Write(QDisp)

___________________________________

Sostanzialmente, ci occorre che tale disponibilità, faccia si che l'articolo composizione sia acquistabile sul Web.

Grazie e buon lavoro