Application PBSample - Technical -w_sheet_sales_order - Controls
Controls of w_sheet_sales_order


dw_master


event pfc_retrieve


General information

Full name w_sheet_sales_order.dw_master.pfc_retrieve
Access public
Overload of pfc_u_dw.pfc_retrieve
Comment Retrieve Revision History Author: Novalys Date Version 07/07/2000 1.0 Initial version
Return value long
Prototype event pfc_retrieve

Source code

call  super::pfc_retrieve; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      pfc_retrieve
//
//      Arguments      :      
//
//      Returns             :      long
//
//      Description      :      Retrieve
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      07/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
Return  This.retrieve (il_number)

Functions and events referenced

Full name Owners
pfc_u_dw.pfc_retrieve pfc_u_dw

Referenced attributes

Full name Scope
w_sheet_sales_order.il_number attribute



event constructor


General information

Full name w_sheet_sales_order.dw_master.constructor
Access public
Overload of u_dw.constructor
Comment Initialize Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Return value long [pbm_constructor
Prototype event constructor

Source code

call  super::constructor; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      constructor
//
//      Arguments      :      
//
//      Returns             :      long [pbm_constructor
//
//      Description      :      Initialize
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
This.of_setLinkage ( true)
this.inv_linkage.of_SetStyle(inv_linkage.RETRIEVE)
This.of_setbase( true)
This.inv_base.of_populatedddw()
This.of_SetDropDownCalendar( true)
iuo_calendar.of_Register( iuo_calendar.DDLB_WITHARROW)

Functions and events referenced

Full name Owners
pfc_u_calendar.of_register pfc_u_calendar
pfc_u_dw.of_setdropdowncalendar pfc_u_dw
pfc_n_cst_dwsrv.of_populatedddw pfc_n_cst_dwsrv
pfc_u_dw.of_setbase pfc_u_dw
pfc_n_cst_dwsrv_linkage.of_setstyle pfc_n_cst_dwsrv_linkage
pfc_u_dw.of_setlinkage pfc_u_dw
u_dw.constructor u_dw

Referenced attributes

Full name Scope
pfc_u_calendar.ddlb_witharrow attribute
pfc_u_dw.iuo_calendar attribute
pfc_u_dw.inv_base attribute
pfc_n_cst_dwsrv_linkage.retrieve attribute
pfc_u_dw.inv_linkage attribute



event pfc_populatedddw


General information

Full name w_sheet_sales_order.dw_master.pfc_populatedddw
Access public
Overload of pfc_u_dw.pfc_populatedddw
Comment Retrieve of dddw Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Parameter string as_colname datawindowchild adwc_obj
Return value long
Prototype event pfc_populatedddw

Source code

call  super::pfc_populatedddw; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      pfc_populatedddw
//
//      Arguments      :      string as_colname      
//                                         datawindowchild adwc_obj      
//
//      Returns             :      long
//
//      Description      :      Retrieve of dddw
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
adwc_obj.SetTransObject (sqlca)
Return adwc_obj.retrieve ()

Functions and events referenced

Full name Owners
pfc_u_dw.pfc_populatedddw pfc_u_dw

Referenced attributes

Full name Scope
pfc_u_dw.pfc_populatedddw.adwc_obj parameter



event pfc_updateprep


General information

Full name w_sheet_sales_order.dw_master.pfc_updateprep
Access public
Overload of pfc_u_dw.pfc_updateprep
Comment MAJ the Master \ Detail !!!!!! Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Return value integer
Prototype event pfc_updateprep

Source code

call  super::pfc_updateprep; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      pfc_updateprep
//
//      Arguments      :      
//
//      Returns             :      integer
//
//      Description      :      MAJ the Master \ Detail !!!!!!
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
long ll_compteur , ll_nb, i
int i_nb_lignes,ii,i_max, i_rtn
Choose  Case ib_new
          
      Case  True
        UPDATE  "compteurs"  
      SET  "cpt" = cpt +  1  
         WHERE  "compteurs". "table_cpt" =  'sales_order'   
           ;
                 
   SELECT  "compteurs". "cpt"  
     INTO :ll_compteur  
     FROM  "compteurs"  
         WHERE  "compteurs". "table_cpt" =  'sales_order'   ;
     
     
      This. object.sales_order_id  [1] = ll_compteur +  1
     
     ib_new =  false
     
     ll_nb = dw_detail.rowcount ()
     
      For i =  1  to ll_nb
          
          dw_detail. object.sales_order_items_id  [i] =  This. object.sales_order_id  [1]
          dw_detail. object.sales_order_items_line_id  [i] = i
          
      Next     
     
Case  Else
          i_nb_lignes = dw_detail.rowcount()
          i_max = i_nb_lignes +  1
          
           FOR ii =  1  to i_nb_lignes
                IF dw_detail.getitemstatus(ii, 0,PRIMARY!) =  new!  OR &
                  dw_detail.getitemstatus(ii, 0,PRIMARY!) =  newmodified!  THEN
                    
                    dw_detail. object.sales_order_items_id  [ii] =  This. object.sales_order_id  [1]
                    dw_detail. object.sales_order_items_line_id  [ii] = i_max
                    i_max ++
                END  IF
               
           NEXT
     
End  Choose
Return SUCCESS

Functions and events referenced

Full name Owners
pfc_u_dw.pfc_updateprep pfc_u_dw

Referenced classes

Full name
w_sheet_sales_order.dw_detail
w_sheet_sales_order.dw_master.pfc_updateprep.sql_2
w_sheet_sales_order.dw_master.pfc_updateprep.sql_1

Referenced attributes

Full name Scope
pfc_u_dw.success attribute
w_sheet_sales_order.dw_master.pfc_updateprep.ii local
w_sheet_sales_order.dw_master.pfc_updateprep.i_max local
w_sheet_sales_order.dw_master.pfc_updateprep.i_nb_lignes local
w_sheet_sales_order.dw_master.pfc_updateprep.i local
w_sheet_sales_order.dw_master.pfc_updateprep.ll_nb local
w_sheet_sales_order.dw_master.pfc_updateprep.ll_compteur local
w_sheet_sales_order.ib_new attribute



event buttonclicked


General information

Full name w_sheet_sales_order.dw_master.buttonclicked
Access public
Overload of datawindowcontrol.buttonclicked
Comment Open the window customer and store the number customer Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Parameter long row long actionreturncode dwobject dwo
Return value long [pbm_dwnbuttoncl
Prototype event buttonclicked

Source code

call  super::buttonclicked; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      buttonclicked
//
//      Arguments      :      long row      
//                                         long actionreturncode      
//                                         dwobject dwo      
//
//      Returns             :      long [pbm_dwnbuttoncl
//
//      Description      :      Open the window customer and store the number customer
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
IF dwo.name =  "b_customer"  then
     
     f_Open (w_resp_customer_search)
     
      IF message.of_getdoubleparm () =  0  then  Return
     
     dw_master.setcolumn(  "sales_order_cust_id")
     dw_master.settext(  string(message.of_getdoubleparm ()))
     
     dw_master. object.sales_order_cust_id  [1] = message.of_getdoubleparm ()
     
End  if

Functions and events referenced

Full name Owners
pfc_n_msg.of_getdoubleparm pfc_n_msg
f_open f_open

Referenced classes

Full name
w_sheet_sales_order.dw_master
w_resp_customer_search

Referenced attributes

Full name Scope
datawindowcontrol.buttonclicked.dwo parameter



dw_detail

event constructor


General information

Full name w_sheet_sales_order.dw_detail.constructor
Access public
Overload of u_dw.constructor
Comment Initialize Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Return value long [pbm_constructor
Prototype event constructor

Source code

call  super::constructor; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      constructor
//
//      Arguments      :      
//
//      Returns             :      long [pbm_constructor
//
//      Description      :      Initialize
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
This.of_setLinkage ( true)
This.inv_linkage.of_LinkTo (dw_master)
This.inv_linkage.of_Register ( "sales_order_id" "sales_order_items_id")
this.inv_linkage.of_SetStyle(inv_linkage.RETRIEVE)
This.of_setbase( true)
This.inv_base.of_populatedddw()

Functions and events referenced

Full name Owners
pfc_n_cst_dwsrv.of_populatedddw pfc_n_cst_dwsrv
pfc_u_dw.of_setbase pfc_u_dw
pfc_n_cst_dwsrv_linkage.of_setstyle pfc_n_cst_dwsrv_linkage
pfc_n_cst_dwsrv_linkage.of_register pfc_n_cst_dwsrv_linkage
pfc_n_cst_dwsrv_linkage.of_linkto pfc_n_cst_dwsrv_linkage
pfc_u_dw.of_setlinkage pfc_u_dw
u_dw.constructor u_dw

Referenced classes

Full name
w_sheet_sales_order.dw_master

Referenced attributes

Full name Scope
pfc_u_dw.inv_base attribute
pfc_n_cst_dwsrv_linkage.retrieve attribute
pfc_u_dw.inv_linkage attribute



event pfc_populatedddw


General information

Full name w_sheet_sales_order.dw_detail.pfc_populatedddw
Access public
Overload of pfc_u_dw.pfc_populatedddw
Comment Populate the dddw Revision History Author: Novalys Date Version 06/07/2000 1.0 Initial version
Parameter string as_colname datawindowchild adwc_obj
Return value long
Prototype event pfc_populatedddw

Source code

call  super::pfc_populatedddw; //////////////////////////////////////////////////////////////////////////////
//
//      Function             :      pfc_populatedddw
//
//      Arguments      :      string as_colname      
//                                         datawindowchild adwc_obj      
//
//      Returns             :      long
//
//      Description      :      Populate the dddw
//
//////////////////////////////////////////////////////////////////////////////
//
//      Revision       History                    Author:      Novalys
//
//      Date                    Version
//
//      06/07/2000             1.0         Initial version
//
//////////////////////////////////////////////////////////////////////////////
adwc_obj.SetTransObject (sqlca)
Return adwc_obj.retrieve ()

Functions and events referenced

Full name Owners
pfc_u_dw.pfc_populatedddw pfc_u_dw

Referenced attributes

Full name Scope
pfc_u_dw.pfc_populatedddw.adwc_obj parameter



event itemchanged


General information

Full name w_sheet_sales_order.dw_detail.itemchanged
Access public
Overload of pfc_u_dw.itemchanged

Source code

call  super::itemchanged; string s_name, s_desc, s_color, s_size
dec dc_price
long l_id
if dwo.name =  "sales_order_items_prod_id"  THEN
 l_id =  long (data)
  SELECT product.name,   
         product.description,   
         product.prod_size,   
         product.color,   
         product.unit_price   
     INTO :s_name,   
         :s_desc,   
         :s_size,   
         :s_color,   
         :dc_price  
     FROM product  
    WHERE product.id = :l_id   ;
      IF SQLCA.SQLCode <>  0  THEN  Return  1
     
      this. object.product_name  [row] = s_name
      this. object.product_unit_price  [row] = dc_price
      this. object.product_description  [row] = s_desc
      this. object.product_color  [row] = s_color
      this. object.product_size  [row] = s_size
      this. object.sales_order_items_quantity  [row] =  0
     
     
END  IF

Functions and events referenced

Full name Owners
pfc_u_dw.itemchanged pfc_u_dw

Referenced classes

Full name
w_sheet_sales_order.dw_detail.itemchanged.sql_1

Referenced attributes

Full name Scope
w_sheet_sales_order.dw_detail.itemchanged.s_size local
w_sheet_sales_order.dw_detail.itemchanged.s_color local
w_sheet_sales_order.dw_detail.itemchanged.s_desc local
w_sheet_sales_order.dw_detail.itemchanged.dc_price local
w_sheet_sales_order.dw_detail.itemchanged.s_name local
datawindowcontrol.itemchanged.row parameter
datawindowcontrol.itemchanged.data parameter
w_sheet_sales_order.dw_detail.itemchanged.l_id local
datawindowcontrol.itemchanged.dwo parameter




Document created on Friday 06 June 2003 at 11:21 by Visual Expert