The text below is selected, press Ctrl+C to copy to your clipboard. (⌘+C on Mac) No line numbers will be copied.
Guest
Javaaa
By Guest on 16th May 2019 07:50:07 PM | Syntax: TEXT | Views: 10



New paste | Download | Show/Hide line no. | Copy text to clipboard
  1. /*
  2.  *                 IFS Research & Development
  3.  *
  4.  *  This program is protected by copyright law and by international
  5.  *  conventions. All licensing, renting, lending or copying (including
  6.  *  for private use), and all other use of the program, which is not
  7.  *  expressively permitted by IFS Research & Development (IFS), is a
  8.  *  violation of the rights of IFS. Such violations will be reported to the
  9.  *  appropriate authorities.
  10.  *
  11.  *  VIOLATIONS OF ANY COPYRIGHT IS PUNISHABLE BY LAW AND CAN LEAD
  12.  *  TO UP TO TWO YEARS OF IMPRISONMENT AND LIABILITY TO PAY DAMAGES.
  13.  * ----------------------------------------------------------------------------
  14.  *  File        : CKanbanReceipt.java
  15.  *  Description : Kanban b2b - Receipt Report .
  16.  *  Notes       :
  17.  * -----------------------------------------------------------------------------
  18.  *
  19.  *      Date     Sign    History
  20.  * ------   ------  ------------------------------------------------------------------------------------------
  21.  * 160322   Rokulk   C_G1385390-2 Created.  
  22.  * ----------------------------------------------------------------------------
  23.  */
  24.  
  25.  
  26. package ifs.kanbbw;
  27.  
  28. import ifs.fnd.asp.*;
  29. import ifs.fnd.service.*;
  30.  
  31. public class CKanbanReceipt extends ASPPageProvider
  32. {
  33.    /* Static constants */
  34.  
  35.    public static boolean DEBUG = Util.isDebugEnabled("ifs.kanbbw.CKanbanReceipt.java");
  36.  
  37.    /* Instances created on page creation (immutable attributes) */
  38.  
  39.    private ASPContext ctx;
  40.    private ASPBlock blk;
  41.    private ASPRowSet rowset;
  42.    private ASPCommandBar cmdbar;
  43.    private ASPTable tbl;
  44.    private ASPBlockLayout lay;  
  45.  
  46.    /* Transient temporary variables (never cloned) */
  47.  
  48.    //private ASPTransactionBuffer trans;
  49.    private String supplier_no;
  50.    private String supplier;
  51.  
  52.    /* Construction */
  53.  
  54.    public CKanbanReceipt(ASPManager mgr, String page_path)
  55.    {
  56.       super(mgr,page_path);
  57.    }
  58.  
  59.  
  60.    public void run()
  61.    {
  62.       ASPManager mgr = getASPManager();
  63.  
  64.       ctx   = mgr.getASPContext();
  65.       ASPTransactionBuffer trans = mgr.newASPTransactionBuffer();
  66.  
  67.       supplier_no = ctx.readValue("VENDOR_NO","");
  68.       supplier = ctx.readValue("SUPPLIER","");
  69.  
  70.  
  71.       if (!mgr.isEmpty(mgr.getQueryStringValue("SEARCH")))
  72.          okFind();
  73.       else if ( mgr.commandBarActivated())
  74.          eval(mgr.commandBarFunction());
  75.       else if (mgr.commandLinkActivated())
  76.          eval(mgr.commandLinkFunction());
  77.       else
  78.       {
  79.          startup();
  80.          clear();
  81.       }
  82.  
  83.       adjust();
  84.  
  85.       ctx.writeValue("VENDOR_NO",supplier_no);
  86.       ctx.writeValue("SUPPLIER",supplier);
  87.    }
  88.  
  89.    /* Utility functions */
  90.  
  91.    public void  startup()
  92.    {
  93.       ASPManager mgr = getASPManager();
  94.       ASPTransactionBuffer trans = mgr.newASPTransactionBuffer();
  95.       ASPCommand cmd;
  96.  
  97.       cmd = trans.addCustomFunction("FNDUSR","FND_USER_PROPERTY_API.Get_Value(FND_SESSION_API.Get_Fnd_User,'VENDOR_NO')","VENDOR_NO");
  98.       cmd = trans.addCustomFunction("SUPNAM","SUPPLIER_API.Get_Vendor_Name(FND_USER_PROPERTY_API.Get_Value(FND_SESSION_API.Get_Fnd_User,'VENDOR_NO'))","SUPPLIER");
  99.  
  100.       trans = mgr.perform(trans);
  101.  
  102.       supplier_no = trans.getValue("FNDUSR/DATA/VENDOR_NO");
  103.       supplier = trans.getValue("SUPNAM/DATA/SUPPLIER");
  104.    }
  105.  
  106.    /* Command Bar Search Group functions */
  107.  
  108.    public void  clear()
  109.    {
  110.       rowset.clear();
  111.    }
  112.  
  113.    public void  countFind()
  114.    {
  115.       ASPManager mgr = getASPManager();
  116.       ASPTransactionBuffer trans = mgr.newASPTransactionBuffer();
  117.       ASPQuery q;
  118.  
  119.       q = trans.addQuery(blk);
  120.       q.setSelectList("to_char(count(*)) N");
  121.       q.addWhereCondition("SUPPLY_TO = ? AND QTY_RECEIVED = 0 AND COORDINATOR = 'OEK'");
  122.       q.addParameter("SUPPLY_TO", supplier_no);
  123.       q.setSelectList("to_char(count(*)) N");
  124.  
  125.       mgr.submit(trans);
  126.       lay.setCountValue(toInt(rowset.getValue("N")));
  127.       rowset.clear();
  128.    }
  129.  
  130.  
  131.    public void  okFind()
  132.    {
  133.       ASPManager mgr = getASPManager();
  134.       ASPCommand cmd;
  135.       ASPTransactionBuffer trans = mgr.newASPTransactionBuffer();
  136.       ASPQuery q;
  137.  
  138.       q = trans.addQuery(blk);
  139.       q.addWhereCondition("SUPPLY_TO = ? AND QTY_RECEIVED = 0 AND COORDINATOR = 'OEK'");
  140.       q.addParameter("SUPPLY_TO", supplier_no);    
  141.      
  142.       q.includeMeta("ALL");
  143.  
  144.       mgr.querySubmit(trans,blk);
  145.  
  146.       if ( rowset.countRows() == 0 )
  147.       {
  148.         rowset.clear();
  149.         mgr.showAlert("KANBBWCKANBANRECEIPTNODATA: No data found.");
  150.       }
  151.       else
  152.       {
  153.         mgr.createSearchURL(blk);
  154.       }        
  155.      
  156.    }
  157.  
  158.    /* Command Bar Custom Group functions */
  159.  
  160.  
  161.    public void saveReturn()
  162.    {
  163.       ASPManager mgr = getASPManager();
  164.       ASPTransactionBuffer trans = mgr.newASPTransactionBuffer();
  165.       ASPCommand cmd;      
  166.       int count = rowset.countRows();
  167.       //rowset.changeRows();
  168.       rowset.store();
  169.       rowset.setFilterOn();  
  170.       //rowset.first();
  171.       rowset.storeSelections();
  172.      
  173.       for (int i = 0; i < count; i++)
  174.       {
  175.          if (rowset.isRowSelected())
  176.          {
  177.             cmd = trans.addCustomCommand("RECPARTS"+i, "C_Kanban_Deliv_Note_API.Report_Pur_b2b_Receipt");          
  178.             cmd.addParameter("PART_NO",rowset.getValue("PART_NO"));    
  179.             cmd.addParameter("LOCATION", rowset.getValue("LOCATION"));
  180.             cmd.addParameter("ORDER_NO",rowset.getValue("ORDER_NO"));
  181.             cmd.addParameter("LINE_NO",rowset.getValue("LINE_NO"));
  182.             cmd.addParameter("RELEASE_NO",rowset.getValue("RELEASE_NO"));
  183.             cmd.addParameter("SUPPLIER_NO", supplier_no);
  184.             cmd.addParameter("QTY_RECEIVED", rowset.getValue("QTY_RECEIVED"));
  185.             cmd.addParameter("SUPPLY_TO", rowset.getValue("SUPPLY_TO"));
  186.             cmd.addParameter("CONTRACT", rowset.getValue("CONTRACT"));
  187.             rowset.clearRow();
  188.          }  
  189.                
  190.          if ( lay.isMultirowLayout() ) rowset.next();
  191.       }
  192.       mgr.perform(trans);
  193.            
  194.       rowset.refreshAllRows();
  195.       rowset.unselectRows();
  196.       rowset.setFilterOff();  
  197.    }
  198.  
  199.  
  200.    public void  preDefine()
  201.    {
  202.       ASPManager mgr = getASPManager();
  203.  
  204.       blk = mgr.newASPBlock("MAIN");
  205.  
  206.       blk.addField("OBJID").
  207.           setHidden();
  208.  
  209.       blk.addField("OBJVERSION").
  210.           setHidden();
  211.  
  212.       blk.addField("VENDOR_NO").
  213.           setHidden().
  214.           setFunction("''");
  215.      
  216.       blk.addField("SUPPLIER").
  217.           setFunction("''").    
  218.           setHidden();
  219.      
  220.       blk.addField("LOCATION").
  221.           setFunction("LOCATION").    
  222.           setHidden();
  223.      
  224.       blk.addField("SUPPLIER_NO").
  225.           setFunction("''").    
  226.           setHidden();
  227.      
  228.       blk.addField("COORDINATOR").
  229.           setSize(15).              
  230.           unsetQueryable().
  231.           //setFunction("PURCHASE_ORDER_API.Get_Authorize_Code(:ORDER_NO)").
  232.           setReadOnly();
  233.      
  234.       blk.addField("DELIVERY_NOTE_NO").
  235.           setLabel("KANBBWCKANBANRECEIPTDELNO: Delivery Note No").    
  236.           setSize(15).
  237.           setDynamicLOV("C_KANBAN_DELIV_NOTE_LOV").
  238.           setReadOnly();
  239.      
  240.       blk.addField("ORDER_NO").
  241.           setSize(15).              
  242.           setLabel("KANBBWCKANBANRECEIPTORDERNO: Order No").
  243.           unsetQueryable().
  244.           setReadOnly();
  245.      
  246.       blk.addField("LINE_NO").
  247.           setSize(15).              
  248.           setLabel("KANBBWCKANBANRECEIPTLINENO: Line No").          
  249.           unsetQueryable().    
  250.           setReadOnly();
  251.      
  252.       blk.addField("RELEASE_NO").
  253.           setSize(15).              
  254.           setLabel("KANBBWCKANBANRECEIPTRELEASENO: Release No").          
  255.           unsetQueryable().    
  256.           setReadOnly();
  257.            
  258.       blk.addField("PART_NO").
  259.           setLabel("KANBBWCKANBANRECEIPTPARTNO: Part No").
  260.           setSize(12).
  261.           setUpperCase().
  262.           unsetQueryable().    
  263.           setReadOnly();
  264.  
  265.       blk.addField("PART_DESCRIPTION").
  266.           setLabel("KANBBWCKANBANRECEIPTPARTDESC: Part Description").
  267.           setFunction("Inventory_Part_API.Get_Description(:CONTRACT, :PART_NO)").
  268.           setSize(25).
  269.           unsetQueryable().    
  270.           setReadOnly();
  271.        
  272.       blk.addField("SUPPLY_TO").
  273.           setHidden().
  274.           setSize(12).
  275.           setUpperCase().
  276.           unsetQueryable().    
  277.           setReadOnly();
  278.      
  279.       blk.addField("TO_LOCATION").
  280.           setLabel("KANBBWCKANBANRECEIPTLOCTO: To Location").
  281.           setFunction("C_Kanban_Deliv_Note_API.Get_To_Location(:CONTRACT, :PART_NO, :LOCATION)").
  282.           setSize(12).
  283.           setUpperCase().
  284.           unsetQueryable().    
  285.           setReadOnly();
  286.      
  287.       blk.addField("PACKS_UNITS", "Number").
  288.          setLabel("KANBBWCKANBANRECEIPTPACKUNITS: Pack Units").
  289.          unsetQueryable().    
  290.          setSize(10).
  291.          setReadOnly();
  292.      
  293.       blk.addField("DELIVERED_UNITS", "Number").
  294.          setLabel("KANBBWCKANBANRECEIPTORDEREDPACKUNITS: Ordered Units").
  295.          unsetQueryable().    
  296.          setSize(10).
  297.          setReadOnly();
  298.      
  299.       blk.addField("DELIVERED_PACKS", "Number").
  300.          setLabel("KANBBWCKANBANRECEIPTPACKSRECEIVED: Pack Received").
  301.          unsetQueryable().
  302.          setReadOnly().    
  303.          setSize(10);
  304.          
  305.       blk.addField("QTY_RECEIVED", "Number").
  306.          setLabel("KANBBWCKANBANRECEIPTUNITSRECEIVED: Units Received").setFunction("DELIVERED_UNITS").
  307.          unsetQueryable().  
  308.          setSize(10);        
  309.            
  310.       blk.addField("CONTRACT").
  311.          unsetQueryable().  
  312.          setSize(10).setHidden();
  313.      
  314.      blk.setView("C_KANBAN_DELIV_NOTE");
  315.  
  316.      blk.defineCommand("C_KANBAN_DELIV_NOTE_API","Modify__");
  317.  
  318.      rowset = blk.getASPRowSet();
  319.  
  320.      cmdbar = mgr.newASPCommandBar(blk);    
  321.      
  322.      cmdbar.enableCommand(cmdbar.SAVE);
  323.      cmdbar.defineCommand(ASPCommandBar.SAVE, "saveReturn");
  324.    
  325.       tbl = mgr.newASPTable( blk );
  326.       tbl.setEditable();
  327.      
  328.       lay = blk.getASPBlockLayout();
  329.       tbl.enableRowSelect();
  330.       lay.setDefaultLayoutMode(lay.MULTIROW_LAYOUT);
  331.       tbl.setTitle("KANBBWCKANBANRECEIPTTBLTITLE: Kanban Receipt");
  332.    }
  333.  
  334.    public void  adjust()
  335.    {
  336.       ASPManager mgr = getASPManager();
  337.  
  338.  
  339.     if (mgr.isEmpty(supplier_no))
  340.       {
  341.          mgr.showAlert(mgr.translate("KANBBWCKANBANRECEIPTNOLINES: You have no access rights for this data."));
  342.                 }
  343.      
  344.       if (lay.isFindLayout())
  345.       {
  346.          cmdbar.disableCommand(cmdbar.SAVE);
  347.       }  
  348.  
  349.       if (rowset.countRows() == 0)
  350.       {
  351.          cmdbar.disableCommand(cmdbar.FORWARD);
  352.          cmdbar.disableCommand(cmdbar.BACK);
  353.          
  354.       }
  355.    }
  356.  
  357.    /* HTML */
  358.  
  359.    protected String getDescription()
  360.    {
  361.       return "KANBBWCKANBANRECEIPTTITLE1: Kanban Receipt ";
  362.    }
  363.  
  364.    protected String getTitle()
  365.    {
  366.       ASPManager mgr = getASPManager();
  367.  
  368.      return mgr.translate("KANBBWCKANBANRECEIPTTITLE: Kanban Receipt  - Supplier: &1", supplier);
  369.    
  370.    }
  371.  
  372.    protected void printContents() throws FndException
  373.    {
  374.       if(lay.isVisible())
  375.           {
  376.          appendToHTML(lay.show());
  377.       }
  378.    }
  379. }



  • Recent Pastes