Use cWebView.pkg
Use cWebPanel.pkg
Use cWebForm.pkg 
Use csfWebToast.pkg
Use cWebCombo.pkg
Use cWebButton.pkg
Use cWebLabel.pkg

Object oToastDemo is a cWebView
    //Set piWidth to 700
    Set psCaption to "Toast Demo"
    Set pbFillHeight to True


    

    // Your DDO structure will go here

    Object oWebMainPanel is a cWebPanel
      Set piColumnCount to 12
        Set piMinHeight to 400

      Object oInfoButton is a cWebButton
          Set piColumnSpan to 2
          Set psCaption to "Info"
      
          Procedure OnClick
            WebSet psCssClass of oWebToast to "e-toast-info"
            WebSet psIcon of oWebToast to "e-info toast-icons"
            WebSet psCaption of oWebToast to "Info"
            WebSet psLabel of oWebToast to "Lorem ipsum dolor!"
            WebSet psValue of oWebToast to "Info"
            Send Show of oWebToast
          End_Procedure
      End_Object
      
      Object oSuccessButton is a cWebButton
          Set piColumnSpan to 2
          Set psCaption to "Success"
          Set psBackgroundColor to "Green"
      
          Procedure OnClick
            WebSet psCssClass of oWebToast to "e-toast-success"
            WebSet psIcon of oWebToast to "e-success toast-icons"
            WebSet psCaption of oWebToast to "Success"
            WebSet psLabel of oWebToast to "Lorem ipsum dolor!"
            WebSet psValue of oWebToast to "Success"
            Send Show of oWebToast
          End_Procedure
      End_Object

    Object oWarningButton is a cWebButton
          Set piColumnSpan to 2
          Set psCaption to "Warning"
          Set psBackgroundColor to "Yellow"
          Set psTextColor to "Black"
      
          Procedure OnClick
            WebSet psCssClass of oWebToast to "e-toast-warning"
            WebSet psIcon of oWebToast to "e-warning toast-icons"
            WebSet psCaption of oWebToast to "Warning"
            WebSet psLabel of oWebToast to "Lorem ipsum dolor!"
            WebSet psValue of oWebToast to "Warning"
            Send Show of oWebToast
          End_Procedure
    End_Object
    
      Object oDangerButton is a cWebButton
          Set piColumnSpan to 2
          Set psCaption to "Danger"
          Set psBackgroundColor to "Red"
      
          Procedure OnClick
            WebSet psCssClass of oWebToast to "e-toast-danger"
            WebSet psIcon of oWebToast to "e-error toast-icons"
            WebSet psCaption of oWebToast to "Danger"
            WebSet psLabel of oWebToast to "Lorem ipsum dolor!"
            WebSet psValue of oWebToast to "Danger"
            Send Show of oWebToast
          End_Procedure
      End_Object
      
      Object oWebToast is a csfWebToast
        Set pbVisible to False
        Set pbServerOnClick to True
        Set pbServerOnCreated to True

          Procedure OnClick String sValue
              Forward Send OnClick sValue
          End_Procedure
      End_Object
    End_Object 

End_Object