class Solution {
public int maxSubArray(int[] nums) {
int sum=0;
int max=0;
for(int i=0;i<nums.length;i++){
sum+=nums[i];
if(sum<0){
sum=0;
}
else{
if(sum>max){
max=sum;
}
}
}
if(max==0)
max=Integer.MIN_VALUE;
for(int i=0;i<nums.length;i++){
if(nums[i]>max)
max=nums[i];
}
return max;
}
}
void Books.Edit_discpatch_note_actual_invoice(int dnaid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
disnote_act = Create_Dispatch_Note_Format[ID == input.dnaid];
fetch_cust = Customers[ID == disnote_act.Customer_Name];
fet_so = Sales_Order[ID == disnote_act.Sales_Order_No];
mymap = Map();
info mymap;
//mymap.put("customer_id",fetch_cust.Customer_Books_ID);
item_list = List();
for each rec in disnote_act.Product_Details
{
if(rec.Individual == false && rec.Actual_Qty > 0)
{
fetchitem = Materials[ID == rec.Product_Code];
line_item_map = Map();
//line_item_map.put("description",fetchitem.Classification);
// info "Product des" + rec.Product_Description;
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
line_item_map.put("quantity",rec.Actual_Qty);
item_list.add(line_item_map);
}
}
mymap.put("line_items",item_list);
update_inv = zoho.books.updateRecord("invoices","60015333461",disnote_act.Draft_Invoice_ID,mymap,conn_tok);
info update_inv;
for each indrec in disnote_act.Product_Details
{
if(indrec.Individual == true)
{
item_list = List();
inmymap = Map();
fetchitem = Materials[ID == indrec.Product_Code];
line_item_map = Map();
//line_item_map.put("description",fetchitem.Classification);
// info "Product des" + rec.Product_Description;
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
line_item_map.put("quantity",indrec.Actual_Qty);
item_list.add(line_item_map);
inmymap.put("line_items",item_list);
update_inv_ind = zoho.books.updateRecord("invoices","60015333461",indrec.Zoho_Books_Invoice_ID,inmymap,conn_tok);
info update_inv_ind;
}
}
}
void Books.Cancel_SO_in_ZBooks(int soid)
{
//Getting authtoken and organisation id
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
//------------------------------------------------------------------------------
fetch_so = Sales_Order[ID == input.soid];
info fetch_so.Sale_Order_No;
mymap = Map();
stts = "void";
mymap.put("status",stts);
//item_list = List();
/* for each rec in fetch_so.Item_Details
{
fetchitem = Materials[ID == rec.Part_Description];
line_item_map = Map();
line_item_map.put("quantity",rec.Qty);
//line_item_map.put("rate",rec.Rate);
lineitemid = rec.zb_line_item_id;
line_item_map.put("line_item_id",lineitemid);
item_list.add(line_item_map);
}*/
//mymap.put("line_items",item_list);
//status to changed
refno = fetch_so.Sale_Order_No;
books_id = fetch_so.Zoho_Books_ID;
//updtstatus = zoho.books.updateRecord("salesorders",org_id,books_id,mymap,conn_tok);
test_map = Map();
header_data = Map();
header_data.put("content-type","application/json");
void_so = invokeurl
[
url :"https://www.zohoapis.in/books/v3/salesorders/" + books_id + "/status/void?organization_id=" + org_id
type :POST
parameters:test_map
headers:header_data
connection:"books_con"
];
res_code = void_so.get("code").toLong();
log_type = "Failure";
if(res_code == 0)
{
log_type = "Success";
}
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Sales Order"
Form_Name="Cancel Sales Order"
Log_Details=void_so
Log_Type=log_type
Reference_NO=refno
];
}
void Books.Create_Shipment(int shipid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
fetchdisp = Create_Dispatch_Note_Format[ID == input.shipid];
fetdispsf = Dispatch_Note_Subform[Create_Dispatch_Note_Plan_RECID == fetchdisp.ID];
fetinv = Invoice[ID == fetchdisp.Create_Dispatch_Note_Plan_ID];
fetch_cust = Customers[ID == fetchdisp.Customer_Name];
fetchso = Sales_Order[ID == fetchdisp.Sales_Order_ID];
soid = fetchso.Zoho_Books_ID;
pkgid = fetchdisp.Package_ID;
ss = soid.tostring();
//info soid;
//info pkgid;
grnmap = Map();
//mymap.put("delivered_date",fetchdisp.Actual_Date_Time);
mymap = Map();
mymap.put("date",fetchdisp.Dispatch_Note_Date.toString("yyyy-MM-dd"));
mymap.put("delivery_method","By Road");
mymap.put("tracking_number",fetchdisp.Vehicle_No_dup);
//mymap.put("delivered_date",fetchdisp.Actual_Date_Time);
grnmap.put("JSONString",mymap);
// info grnmap;
// json = Map();
// json.put("JSONString",grnmap);
crtrecord = invokeurl
[
url :"https://www.zohoapis.in/inventory/v3/shipmentorders?package_ids=" + pkgid + "&salesorder_id=" + ss + "&organization_id=" + org_id + "&is_delivered=" + true
type :POST
parameters:mymap.tostring()
connection:"zoho_inventory"
];
//crtrecord = zoho.books.createRecord("shipmentorders", org_id, grnmap);
// info crtrecord;
rescode = crtrecord.get("code").toLong();
log_type = "Failure";
if(rescode == 0)
{
log_type = "Success";
/* var = crtrecord.get("shipment_order").get("shipment_id");
fetchdisp.Shipment_ID=var; */
//info rescode;
}
/* ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="shipments-Books"
Form_Name="Dispatch_Note_Actual_In_Books-shipments"
Log_Details=crtrecord
Log_Type=log_type
Reference_NO=fetchdisp.CDNF_ID
]; */
}
void Books.SyncVirtualStock(int recid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
getinventory = Inventory[ID != null];
//cnt = 0;
for each rec in getinventory
{
fet_vs = Virtual_Stock[Inventory_Rec_ID == rec.ID];
//info fet_vs.Part_No.Part_No;
if(fet_vs.count() == 0)
{
// cnt = cnt + 1;
// info rec.Part_No.Part_No;
ins = insert into Virtual_Stock
[
Warehouse=rec.Warehouse
Available_Qty=rec.Available_Qty
Part_Description=rec.Part_Description
Sub_Location=rec.Sub_Location
Location_Name=rec.Location_Name
Rack_Number=rec.Rack_Number
Total_Qty=rec.Total_Qty
Part_No=rec.Part_No
UOM=rec.UOM
Category=rec.Category
Sub_Category=rec.Sub_Category
Inventory_Rec_ID=rec.ID
Added_User=zoho.loginuser
];
}
else if(fet_vs.Block_Qty == null || fet_vs.Block_Qty >= 0)
{
fet_vs.Available_Qty=rec.Available_Qty;
fet_vs.Total_Qty=rec.Total_Qty;
fet_vs.Block_Qty=rec.Block_Qty;
}
}
//info cnt;
}
void Books.invoice_delete_in_books(int Draft_Invoice_ID)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
//new api ur
del_book = invokeurl
[
url :"https://www.zohoapis.in/books/v3/invoices/" + input.Draft_Invoice_ID + "?organization_id=60015333461"
type :DELETE
connection:"zoho_inventory"
];
// del_book = invokeurl
// [
// url :"https://www.zohoapis.in/books/v3/invoices/" + input.Draft_Invoice_ID + "?organization_id=60015333461"
// type :DELETE
// connection:"zoho_inventory"
// ];
info del_book;
}
map Books.Purchase_Order(int var)
{
//Getting authtoken and organisation id
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
//-------------------------------------------------------------------------
fetchpo = Purchase_Order[ID == input.var];
fetchposf = Purchase_Order_Subform[Purchase_Order_ExisID == fetchpo];
fetchven = Vendor[ID == fetchpo.Vendor_Name];
//fetchshipp = Shipping_Mode[ID == fetchpo.Shipping_Mode];
fetchwarehouse = Warehouse[ID == fetchpo.Deliver_To].Warehouse_Books_ID;
//info fetchwarehouse;
fettax = GST_Details[ID == fetchpo.Item_Details.Tax];
fetch_del_schd = Delivery_Schedule[Purchase_Order_Exis_ID == input.var].maximum(Delivery_Date);
fetch_payment_trms = Payment_Terms[ID == fetchpo.Payment_Terms];
delivery_date = fetch_del_schd.toString("yyyy-MM-dd");
//info "fetchpo.Zoho_Books_ID" + fetchpo.Zoho_Books_ID;
if(fetchpo.Zoho_Books_ID == "" || fetchpo.Zoho_Books_ID == null)
{
//info "Insidee";
pomap = Map();
pomap.put("customer",fetchven.Vendor_Name);
pomap.put("purchaseorder_number",fetchpo.Purchase_Order_No);
pomap.put("vendor_id",fetchven.ZOHO_Books_ID);
pomap.put("purchaseorder_number",fetchpo.Purchase_Order_No);
po2 = fetchpo.Purchase_Order_Date.toString("yyyy-MM-dd");
pomap.put("phone",fetchven.Mobile);
pomap.put("email",fetchven.Email_ID);
pomap.put("date",po2);
pomap.put("cf_payment_terms",fetch_payment_trms.Stages);
//info url_to_po;
pomap.put("delivery_date",delivery_date);
pomap.put("delivery_address",fetchpo.Shipping_Address);
url_to_po = "https://creatorapp.zoho.in/carrierwheels/erp/#Page:PO_Template?ID=" + var;
//new_url_to_po = "<a href='https://creatorapp.zoho.in/carrierwheels/erp/#Page:PO_Template?ID=" + var + "' target='_blank' title='Open PO'>Download PO from ERP</a>";
custom_list = List();
custom_map = Map();
custom_map.put("api_name","cf_download_po_from_erp");
custom_map.put("value",url_to_po);
custom_list.add(custom_map);
pomap.put("custom_fields",custom_list);
//pomap.put("status", "Open");
item_list = List();
//info pomap;
tx_val = 0;
for each rec in fetchpo.Item_Details
{
fetchitem = Materials[ID == rec.Part_Description];
//info fetchitem;
line_item_map = Map();
//custom_list1 = List();
//custom_map1 = Map();
line_item_map.put("name",rec.Part_Description.Part_Description);
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
mfrPartNo = "";
if(fetchitem.Mfr_Part_No != "")
{
mfrPartNo = "Manufacturer Part No: " + fetchitem.Mfr_Part_No;
}
myspecs = "";
if(rec.Specification != null)
{
myspecs = "Specifications: " + rec.Specification + "\n";
}
myremarks = "";
if(rec.Remarks != null)
{
myremarks = "Remarks: " + rec.Remarks + "\n";
}
line_item_map.put("description",myspecs + myremarks + mfrPartNo);
//line_item_map.put("description",rec.Part_Description.Specification);
line_item_map.put("quantity",rec.Ordered_Qty);
line_item_map.put("rate",rec.Rate);
line_item_map.put("warehouse_name",fetchwarehouse);
line_item_map.put("tax_id",fettax.Zoho_Books_ID);
line_item_map.put("tax_percentage",fettax.Total_Rate);
// custom_map1.put("api_name","cf_posubformid");
// custom_map1.put("value",rec.ID);
// custom_list1.add(custom_map1);
// line_item_map.put("custom_fields",custom_list1);
item_list.add(line_item_map);
tx_val = tx_val + ifnull(rec.Tax_Value,0.00);
}
//info item_list;
for each extra in Additional_Charges_Subform[Purchase_Order_Exis_ID == input.var]
{
line_item_map = Map();
line_item_map.put("name",extra.Charge_Name.Zoho_Books_ID);
line_item_map.put("rate",extra.Rate);
line_item_map.put("quantity",1);
line_item_map.put("item_total",extra.Total);
line_item_map.put("tax_id",extra.Tax.Zoho_Books_ID);
line_item_map.put("tax_percentage",fettax.Total_Rate);
item_list.add(line_item_map);
}
pomap.put("tax_total",tx_val);
pomap.put("line_items",item_list);
post_url = zoho.books.createRecord("purchaseorders",org_id,pomap,conn_tok);
//info "Url:" + post_url;
res_code = post_url.get("code").toLong();
resp_Map = Map();
log_type = "Failure";
//info "rescode " + res_code;
varconn = API_Connections[Module_Name == "Zoho Books"].Connection;
if(res_code == 0)
{
log_type = "Success";
books_id = post_url.toMap().get("purchaseorder").toMap().get("purchaseorder_id");
fetchpo.Zoho_Books_ID=books_id;
test_map = Map();
mark_response = invokeurl
[
url :"https://www.zohoapis.in/books/v3/purchaseorders/" + books_id + "/status/open?organization_id=" + org_id + ""
type :POST
parameters:test_map
connection:"books_con"
];
//old api is commented and new api is in above as per Zoho
// mark_response = invokeurl
// [
// url :"https://www.zohoapis.in/books/v3/purchaseorders/" + books_id + "/status/open?organization_id=" + org_id + ""
// type :POST
// parameters:test_map
// connection:"books_con"
// ];
//info mark_response;
}
if(res_code == 0)
{
getinventory = zoho.inventory.getRecordsByID("purchaseorders",org_id,books_id);
get_line_item = getinventory.toMap().get("purchaseorder").toMap().get("line_items");
for each lineitem in get_line_item
{
lineitemid = lineitem.getjson("line_item_id");
itemid = lineitem.getjson("item_id");
itemorder = lineitem.getjson("item_order");
//array = {"custom_fields":{{"api_name":"cf_posubformid","value":cfposfid}}};
fetchpo = Purchase_Order[Zoho_Books_ID == books_id];
//fetchposf = Purchase_Order_Subform[Purchase_Order_ExisID == fetchpo.ID];
getmat = Materials[Zoho_Books_ID == itemid];
fetchposf = Purchase_Order_Subform[Purchase_Order_ExisID == fetchpo.ID && S_No == itemorder && Part_No == getmat.ID];
fetchposf.zb_line_item_id=lineitemid;
// for each posfrec in fetchposf
// {
// if(posfrec.Part_No == getmat.ID)
// {
// posfrec.zb_line_item_id=lineitemid;
// }
// }
}
}
//Insert into Log Form
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Purchase Order"
Form_Name="Purchase Order"
Log_Details=post_url
Log_Type=log_type
Reference_NO=fetchpo.Purchase_Order_No
];
//sending error log message
if(log_type == "Failure")
{
resp_Map.put("Resp","Failure");
resp_Map.put("log_msg",post_url.get("message"));
}
//status to changed
// updtstatus = zoho.books.markStatus("purchaseorders",org_id,books_id,"Open",conn_tok);
// info updtstatus;
//When the log type is failure and rescode is code:57,message:You are not authorized to perform this operation" and try again call the function again after 5 minutes using the below function
if(res_code == 57 && log_type == "Failure")
{
insert into Failure_Functions_re_schedule_form
[
Added_User=zoho.loginuser
Module_name="Purchase Order"
module_record_id=var
Schedule_date_time=zoho.currenttime.addMinutes(5)
]
//send mail
sendmail
[
from :"erp@carrierwheels.com"
to :"parthasarathy.m@synprosoft.com"
subject :"Purchase Order Not pushed to Books" + var
message :"Purchase Order Not pushed to Books" + var
]
}
}
return resp_Map;
}
map Books.Get_Books_Access()
{
ret_mod_name = Company_Details[Sync_Process == "On"];
auth_tok = ret_mod_name.Connection;
org_id = ret_mod_name.Organisation_ID;
ret_map = Map();
ret_map.put("connection",auth_tok);
ret_map.put("organisation_id",org_id);
return ret_map;
}
void Books.Create_Packages(int disid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
fetchdisp = Create_Dispatch_Note_Format[ID == input.disid];
fetdispsf = Dispatch_Note_Subform[Create_Dispatch_Note_Plan_RECID == fetchdisp.ID];
fetch_cust = Customers[ID == fetchdisp.Customer_Name];
// if(fetch_cust.ID != 143536000004625764 && fetch_cust.ID != 143536000004570816 && fetch_cust.ID != 143536000005088666 && fetch_cust.ID != 143536000005117329)
// {
fetchso = Sales_Order[ID == fetchdisp.Sales_Order_ID];
soid = fetchso.Zoho_Books_ID;
ss = soid.tostring();
grnmap = Map();
// grnmap.put("package_number",fetchdisp.CDNF_ID);
grnmap.put("date",fetchdisp.Dispatch_Note_Date.toString("yyyy-MM-dd"));
grnmap.put("notes","Total Weight: " + fetchdisp.Total_Weight);
custom_list = List();
custom_map = Map();
custom_map.put("api_name","cf_dispatch_no");
custom_map.put("value",fetchdisp.CDNF_ID);
custom_list.add(custom_map);
grnmap.put("custom_fields",custom_list);
item_list = List();
actqtycheck = 0;
// info soid;
for each rec in fetdispsf
{
if(rec.Individual == false && rec.Actual_Qty > 0)
{
actqtycheck = 1;
fetchitem = Materials[ID == rec.Product_Code];
fet_so = Sales_Order[ID == fetchdisp.Sales_Order_No];
getsosf = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Part_No == rec.Product_Code];
line_item_map = Map();
line_item_map.put("so_line_item_id",getsosf.zb_line_item_id);
if(rec.Actual_Qty > 0)
{
line_item_map.put("quantity",rec.Actual_Qty);
}
item_list.add(line_item_map);
}
}
info item_list + "Itemlist";
if(actqtycheck == 1)
{
//info item_list;
grnmap.put("line_items",item_list);
json = Map();
json.put("JSONString",grnmap);
info json;
crtrecord = invokeurl
[
url :"https://www.zohoapis.in/inventory/v3/packages?organization_id=" + org_id + "&salesorder_id=" + ss
type :POST
parameters:json
connection:"zoho_inventory"
];
info crtrecord;
rescode = crtrecord.get("code").toLong();
log_type = "Failure";
if(rescode == 0)
{
log_type = "Success";
var = crtrecord.get("package").get("package_id");
fetchdisp.Package_ID=var;
info rescode;
}
/* ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Packages-Books"
Form_Name="Dispatch_Note_Actual_In_Books-Packages"
Log_Details=crtrecord
Log_Type=log_type
Reference_NO=fetchdisp.CDNF_ID
]; */
}
}
void Books.Create_Cust_in_books(int cust)
{
//Getting authtoken and organisation id
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
//-------------------------------------------------------------------------
fet_cust = Customers[ID == input.cust];
cust_des = Destination[ID == fet_cust.Place_of_Supply];
cust_gst_trm = GST_Treatment[ID == fet_cust.GST_Treatment];
curr_code = Currency_Code[ID == fet_cust.Currency_Code];
web_cnvt = fet_cust.Web.toString();
web_suff = web_cnvt.getprefix("</a>");
web_final = web_suff.getsuffix(">");
custmap = Map();
custmap.put("contact_type","customer");
custmap.put("contact_name",fet_cust.Customer_Name);
custmap.put("company_name",fet_cust.Customer_Name);
//custmap.put("email",fet_cust.Email_ID);
custmap.put("mobile",fet_cust.Contact_Number);
custmap.put("phone",fet_cust.Phone_Number1);
custmap.put("pan_no",fet_cust.PAN_No);
custmap.put("gst_no",fet_cust.GST_No);
custmap.put("website",web_final);
custmap.put("place_of_contact",cust_des.Short_Name);
custmap.put("gst_treatment",cust_gst_trm.Link_name);
custmap.put("currency_id",curr_code.Zoho_Books_ID);
custmap.put("currency_code",curr_code.Currency_Code);
cont_list = List();
primary_cont_pers = Map();
primary_cont_pers.put("first_name",fet_cust.Customer_Name);
primary_cont_pers.put("phone",fet_cust.Contact_Number);
primary_cont_pers.put("email",fet_cust.Email_ID);
cont_list.add(primary_cont_pers);
//secndary Contact persons updated.
if(fet_cust.Contact_Person_Details != null)
{
for each contacts_val in fet_cust.Contact_Person_Details
{
cont_pers = Map();
cont_pers.put("first_name",contacts_val.Contact_Person_Name);
cont_pers.put("phone",contacts_val.Phone_Number);
cont_pers.put("email",contacts_val.Email);
cont_list.add(cont_pers);
}
}
custmap.put("contact_persons",cont_list);
bill_add = Map();
shipp_add = Map();
bill_add.put("address",fet_cust.Billing_Address.address_line_1);
bill_add.put("street2",fet_cust.Billing_Address.address_line_2);
bill_add.put("city",fet_cust.Billing_Address.district_city);
bill_add.put("state",fet_cust.Billing_Address.state_province);
bill_add.put("zip",fet_cust.Billing_Address.postal_Code);
bill_add.put("country",fet_cust.Billing_Address.country);
custmap.put("billing_address",bill_add);
shipp_add.put("address",fet_cust.Shipping_Address.address_line_1);
shipp_add.put("street2",fet_cust.Shipping_Address.address_line_2);
shipp_add.put("city",fet_cust.Shipping_Address.district_city);
shipp_add.put("state",fet_cust.Shipping_Address.state_province);
shipp_add.put("zip",fet_cust.Shipping_Address.postal_Code);
shipp_add.put("country",fet_cust.Shipping_Address.country);
custmap.put("shipping_address",shipp_add);
custmap.put("status","active");
custmap.put("cf_customer_code",fet_cust.Customer_Code);
//resp = zoho.books.createRecord("contacts",org_id,custmap,conn_tok);
resp = zoho.books.createRecord("contacts",org_id,custmap);
info resp;
res_code = resp.get("code").toLong();
if(res_code == 0)
{
books_id = resp.toMap().get("contact").toMap().get("contact_id");
fet_cust.Customer_Books_ID=books_id;
contact_person_list = List();
contact_person_list = resp.toMap().get("contact").toMap().get("contact_persons").toList();
for each contacts_1 in contact_person_list
{
contact_rec = contacts_1.toMap();
contact_Email = contact_rec.get("email");
contact_person_id = contact_rec.get("contact_person_id");
if(fet_cust.Email_ID == contact_Email)
{
fet_cust.contactPerson_Books_ID=contact_person_id;
}
else
{
updateContactPersonID = Contact_Person_Subform[Customer_Exis_ID == input.cust && Email == contact_Email];
if(updateContactPersonID.count() > 0)
{
updateContactPersonID.Contact_Person_Books_ID=contact_person_id;
}
}
}
}
//Insert into Log Details Report
// ins_log = insert into Log_Files
// [
// Added_User=zoho.loginuser
// Module_Name="Books"
// Form_Name="Customer"
// Log_Details=resp
// ];
}
void Invoice.Get_Invoice_from_Books(int recid)
{
try
{
getdata = Get_Invoice_ID_from_Books[ID == input.recid];
// info getdata;
zbinvoiceid = getdata.Invoice_Books_ID;
//info zbinvoiceid;
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
invoice_resp = zoho.books.getRecordsByID("invoices",org_id,zbinvoiceid,conn_tok);
// info "invresp" + invoice_resp;
invoice_data = invoice_resp.tomap().get("invoice");
saleno = "";
vehicleno = "";
trans = "";
for each rec1 in invoice_data.get("custom_fields")
{
if(rec1.get("label") == "Sales Order No")
{
saleno = rec1.get("value_formatted");
}
else if(rec1.get("label") == "Vehicle No")
{
vehicleno = rec1.get("value_formatted");
}
else if(rec1.get("label") == "Transporter")
{
trans = rec1.get("value_formatted");
}
}
// info "invdata" + invoice_data;
custname = invoice_data.get("customer_name");
invid = invoice_data.get("invoice_id");
custid = invoice_data.get("customer_id");
customer_id = Customers[Customer_Books_ID == custid].ID;
//info customer_id;
invdate = invoice_data.get("date").todate();
//info invdate;
invduedate = invoice_data.get("due_date").todate();
//info invduedate;
refno = ifnull(invoice_data.get("reference_number"),"");
// info refno;
custgst = ifnull(invoice_data.get("gst_no"),"");
//info custgst;
invno = invoice_data.get("invoice_number");
Payment_Terms = invoice_data.get("payment_terms_label");
payment_terms_id = Payment_Terms[Stages == Payment_Terms];
if(payment_terms_id.count(ID) == 0)
{
pmtterms_map = Map();
pmtterms_map.put("Stages",Payment_Terms);
dummy_map33 = Map();
zoho.creator.createRecord("carrierwheels","erp","Payment_Terms",pmtterms_map,dummy_map33,"vj_creator");
}
currency_code = invoice_data.get("currency_code");
currency_code_id = Currency_Code[Currency_Code == currency_code].ID;
//info currency_code;
Place_of_Supply = invoice_data.get("place_of_supply");
place_of_supply_id = Destination[Short_Name == Place_of_Supply].ID;
//info Place_of_Supply;
Source_of_Supply_id = Destination[Short_Name == "UP"].ID;
//info Source_of_Supply_id;
billingaddress = invoice_data.tomap().get("billing_address");
address_line_1 = billingaddress.get("address");
address_line_2 = billingaddress.get("street2");
district_city = billingaddress.get("city");
state_province = billingaddress.get("state");
postal_code = billingaddress.get("zip");
country = billingaddress.get("country");
fax_number = billingaddress.get("fax");
//info billingaddress;
shippingaddress = invoice_data.toMap().get("shipping_address");
address_line_11 = shippingaddress.get("address");
address_line_12 = shippingaddress.get("street2");
district_city1 = shippingaddress.get("city");
state_province1 = shippingaddress.get("state");
postal_code1 = shippingaddress.get("zip");
country1 = shippingaddress.get("country");
itemtotal = invoice_data.get("sub_total");
taxtotal = invoice_data.get("tax_total");
grandtotal = invoice_data.get("total");
gettcs = invoice_data.get("is_tcs_amount_in_percent");
if(gettcs == "true")
{
applytcs = gettcs;
tcs = invoice_data.get("tcs_tax_id");
tcs_id = Bill_TCS[Zoho_Books_ID == tcs].ID;
tcsvalue = invoice_data.get("tcs_amount");
}
//get the sales order details
getsomain = Sales_Order[Sale_Order_No == saleno];
info getsomain + "somain";
if(getsomain.count() > 0)
{
getsosub = Sale_Order_Subform[Sales_Order_Exis_ID == getsomain.ID];
cwstat = "Closed";
sostat = "Closed";
for each sosubfrm in Sale_Order_Subform[Sales_Order_Exis_ID == getsomain.ID]
{
if(sosubfrm.Balance_Qty > 0)
{
cwstat = "Closed Partially";
sostat = "Open";
}
}
getsomain.CWPL_SO_Status=cwstat;
getsomain.SO_Status=sostat;
if(getsomain.Sales_Type == "Contract" && getsomain.CWPL_SO_Status == "Shipped Completed")
{
getsomain.CWPL_SO_Status="Closed";
}
buyerordno = getsomain.PO_Reference;
buyrerorddt = getsomain.PO_Date;
dispatchnoteno = "";
if(getsomain.Dispatch_Note_No != null)
{
//dispatchnoteno = ifnull(getsomain.Dispatch_Note_No.CDNF_ID,"");
}
get_cfs = invoice_resp.get("invoice").toMap().get("custom_field_hash");
dispatchnoteno = get_cfs.get("cf_disp_note_no");
// info getsomain;
// info getsosub;
dnid = null;
getdnmain = Create_Dispatch_Note_Format[Sales_Order_No == getsomain.ID];
info getdnmain.count();
getdnmain.Draft_Invoice_No=invoice_data.get("invoice_number");
if(getdnmain.count() > 0)
{
dnid = getdnmain.ID;
VehicleNo = getdnmain.Vehicle_No;
DriverContactName = getdnmain.Driver_Name;
DriverContactNo = getdnmain.Driver_Mobile_Number;
NameofTransport1 = getdnmain.Transport_Name;
dispatchnoteno = getdnmain.ID;
dispatchnotedt = getdnmain.Dispatch_Note_Date;
grno = getdnmain.GR_No;
}
}
// sendmail
// [
// from :"erp@carrierwheels.com"
// to :"parthasarathy.m@synprosoft.com"
// subject :"getinvoicefrombooks function " + getdnmain.count() + "--" + getsomain.ID + " recid " + recid
// message :"getinvoicefrombooks function " + getdnmain.count() + "--" + getsomain.ID + " recid " + recid
// ]
str = thisapp.Common.Number_Function_New("Invoice");
//info str;
invoiceins = insert into Invoice
[
Customer_Name=customer_id
Invoice_No=invno
Invoice_Date=invdate
Invoice_Due_Date=invduedate
Reference_No=refno
Invoice_Status="open"
GST_No=custgst
Payment_Terms=payment_terms_id.ID
Currency_Code=currency_code_id
Place_of_Supply=place_of_supply_id
Source_of_Supply=Source_of_Supply_id
Billing_Address.address_line_1=address_line_1
Billing_Address.address_line_2=address_line_2
Billing_Address.district_city=district_city
Billing_Address.state_province=state_province
Billing_Address.postal_Code=postal_code
Billing_Address.country=country
Shipping_Address.address_line_1=address_line_11
Shipping_Address.address_line_2=address_line_12
Shipping_Address.district_city=district_city1
Shipping_Address.state_province=state_province1
Shipping_Address.postal_Code=postal_code1
Shipping_Address.country=country1
Vehicle_no1=vehicleno
Driver_Contact_Name=DriverContactName
Driver_Contact_No=DriverContactNo
Name_of_Transport=trans
Sale_Order_No=getsomain.ID
Sale_Order_Date=getsomain.Sale_Order_Date
Approval_Status="Approved"
Item_Total=itemtotal
Tax_Total=taxtotal
Grand_Total=grandtotal
Zoho_Books_ID=zbinvoiceid
Invoice_Type="Domestic Invoice"
Apply_TCS=applytcs
TCS=tcs_id
TCS_Value=tcsvalue
Create_Dispatch_Note_RECID=dnid
Buyer_Order_No=buyerordno
Buyer_Order_Date=buyrerorddt
Added_User=zoho.loginuser
Dispatch_Note_No=dispatchnoteno
Dispatch_Note_Date=dispatchnotedt
GR_No=grno
Sales_Type=getsomain.Sales_Type
];
if(getsomain.count() > 0)
{
solist = List();
solist.addAll(getsomain.Invoice_No);
solist.add(invoiceins);
getsomain.Invoice_No=solist;
info invoiceins;
info getsomain.Sale_Order_No;
info getsomain.Sale_Order_Date;
}
sno = 0;
lineitems = invoice_data.get("line_items");
taxperc = 0;
for each var in lineitems
{
taxvalue = 0;
taxperc = var.getjson("tax_percentage");
taxvalue = var.getjson("item_total") * taxperc / 100;
Totalamt = var.getjson("item_total") + taxvalue;
sno = sno + 1;
partno = Materials[Zoho_Books_ID == var.getjson("item_id")].ID;
custpartcode = Sale_Order_Subform[Sales_Order_Exis_ID == getsomain.ID && Part_No == partno].Customer_Part_Code;
invoicesub = insert into Invoice_Subform
[
S_No=sno
Part_No=Materials[Zoho_Books_ID == var.getjson("item_id")].ID
Part_Description=Materials[Zoho_Books_ID == var.getJSON("item_id")].ID
Dispatch_Plan_Date_time=getdnmain.Plan_Date_Time
Dispatch_Actual_Date_Time=getdnmain.Actual_Date_Time
Vehicle_Gate_in_Time=getdnmain.In_Time
Vehicle_Gate_out_time=getdnmain.Out_Time
HSN_Code=var.getjson("hsn_or_sac")
UoM=Unit_of_Measurement[UOM == var.getjson("unit")].ID
Qty=var.getjson("quantity")
Rate=var.getjson("rate")
Sub_Total=var.getjson("item_total")
Tax=GST_Details[Tax_Name == var.getjson("tax_name")].ID
Tax_Value=taxvalue
Total=Totalamt
Invoice_Exist_ID=invoiceins
Sales_Order_RECID=getsomain.ID
Added_User=zoho.loginuser
Customer_Part_Code=custpartcode
];
}
//Update the total Invoice Qty
totalinvqty = 0;
totalinvqty = Invoice_Subform[Invoice_Exist_ID == invoiceins].sum(Qty);
if(totalinvqty > 0)
{
getmaininv = Invoice[ID == invoiceins];
if(getmaininv.count() > 0)
{
getmaininv.Total_Invoice_Qty=ifnull(totalinvqty,"");
}
}
//Insert into Log Form
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Invoice"
Form_Name="GetInvoicefromBooks"
Log_Details=invoice_resp
Log_Type="success"
Reference_NO=getsomain.Sale_Order_No
];
//update the E-Way Bill No.
invoice_resp = zoho.books.getRecordsByID("invoices",org_id,zbinvoiceid,conn_tok);
//info "invoice resp code " + invoice_resp.get("code") + "---" + zbid;
ewaybill = invoice_resp.get("invoice").toMap().get("eway_bill_details");
//info ewaybill;
sendmail
[
from :"erp@carrierwheels.com"
to :"parthasarathy.m@synprosoft.com"
subject :"Function Invoice.Getinvoicefrombooks ewaybill details " + zbinvoiceid
message :"ewaybill " + ewaybill
]
if(!isempty(ewaybill))
{
bno = ewaybill.get("eway_bill_number");
if(!isnull(bno))
{
getinv = Invoice[Zoho_Books_ID == zbinvoiceid];
if(getinv.count() > 0)
{
getinv.E_Way_Bill_No=ewaybill.get("eway_bill_number");
}
}
if(!isnull(ewaybill.get("eway_bill_date")))
{
getinv = Invoice[Zoho_Books_ID == zbinvoiceid];
if(getinv.count() > 0)
{
getinv.E_Way_Bill_Date=ewaybill.get("eway_bill_date").toString("dd-MMM-yyyy");
}
}
}
}
catch (e)
{
sendmail
[
from :"erp@carrierwheels.com"
to :"parthasarathy.m@synprosoft.com"
subject :"Invoice.Get Invoice from books try & catch" + zbinvoiceid
message :e
]
}
//update the Invoice number in Dispatch Note format
// if(getdnmain.count() > 0)
// {
// getdnmain.Invoice_Bill_No=str;
// }
//update the inventory , Check Inventory Forms
//lineitemsin = invoice_data.get("line_items");
// for each rec in lineitemsin
// {
// Part_No_id = Materials[Zoho_Books_ID == rec.getjson("item_id")].ID;
// Part_Description_id = Materials[Zoho_Books_ID == rec.getJSON("item_id")].ID;
// qty = rec.getjson("quantity");
// fetinvent = Inventory[Part_No == Part_No_id];
// //Subtracting available Stock
// if(fetinvent.count() > 0)
// {
// if(fetinvent.Total_Qty < fetinvent.Available_Qty)
// {
// fetinvent.Total_Qty=fetinvent.Available_Qty;
// }
// //blck_quantity = ifnull(fetinvent.Available_Qty,0.0) - ifnull(qty,0.0);
// tot_inv_qty = ifnull(fetinvent.Total_Qty,0.0) - ifnull(qty,0.0);
// //fetinvent.Block_Qty=fetinvent.Block_Qty - ifnull(qty,0.0);
// fetinvent.Total_Qty=tot_inv_qty;
// sendmail
// [
// from :zoho.loginuserid
// to :"parthasarathy.m@certifytechnologies.com"
// subject :"Invoice.Get_Invoice_from_Books"
// message :"Part no " + fetinvent.Part_No.Part_No + "Total Qty " + fetinvent.Total_Qty + "Availabel Qty " + fetinvent.Available_Qty
// ]
// }
//Subtract the quantity in check Inventory form
// fetchkinvent = Check_Inventory[Sales_Order_No == getsomain.ID && Part_No == Part_No_id && Customer_Name == customer_id];
// if(fetchkinvent.count() > 0)
// {
// if(fetchkinvent.Quantity_to_be_Blocked > 0)
// {
// fetchkinvent.Quantity_to_be_Blocked=fetchkinvent.Quantity_to_be_Blocked - ifnull(qty,0.0);
// if(fetchkinvent.Quantity_to_be_Blocked == 0)
// {
// fetchkinvent.Status="Closed";
// }
// }
// }
//getsosub.Invoiced_so_far_Qty=ifnull(getsosub.Invoiced_so_far_Qty,0.00) + ifnull(qty,0.0);
}
void Books.Create_invoice_individual(int dnaid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
disnote_act = Create_Dispatch_Note_Format[ID == input.dnaid];
fetch_cust = Customers[ID == disnote_act.Customer_Name];
fet_so = Sales_Order[ID == disnote_act.Sales_Order_No];
plc_of_supply = Destination[Destination == fet_so.Place_of_Supply.Destination].Short_Name;
for each rec in disnote_act.Product_Details
{
if(rec.Individual == true && rec.Actual_Qty > 0 && isNull(rec.Zoho_Books_Invoice_ID) == True)
{
disdate = disnote_act.Dispatch_Note_Date.toString("yyyy-MM-dd");
sodate = fet_so.Sale_Order_Date.toString("yyyy-MM-dd");
podate = fet_so.PO_Date.toString("yyyy-MM-dd");
mymap = Map();
info mymap;
mymap.put("customer_id",fetch_cust.Customer_Books_ID);
info fetch_cust.Customer_Books_ID;
mymap.put("customer_name",fetch_cust.Contact_Name);
info fetch_cust.Contact_Name;
mymap.put("billing_address_id",fetch_cust.Billing_Address_Id);
mymap.put("shipping_address_id",fetch_cust.Shipping_Address_id);
//mymap.put("billing_address",disnote_act.Customer_Address);
// info "custaddress" + disnote_act.Customer_Address;
// mymap.put("shipping_address",fet_so.Shipping_Address);
// info "Shipping" + fet_so.Shipping_Address;
mymap.put("place_of_supply",plc_of_supply);
// info "placeofsupply" + plc_of_supply;
custom_list = List();
custom_map = Map();
custom_map.put("api_name","cf_sales_order_no");
custom_map.put("value",fet_so.Sale_Order_No);
custom_list.add(custom_map);
// info "Salerderno" + fet_so.Sale_Order_No;
custom_map = Map();
custom_map.put("api_name","cf_dispatch_date");
custom_map.put("value",disdate);
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_disp_note_no");
custom_map.put("value",disnote_act.CDNF_ID);
custom_list.add(custom_map);
// info "dis date" + disnote_act.Dispatch_Note_Date;
custom_map = Map();
custom_map.put("api_name","cf_sales_order_date");
custom_map.put("value",sodate);
custom_list.add(custom_map);
info "sale date" + fet_so.Sale_Order_Date;
vehicle_no = "";
transpotor = "";
if(disnote_act.Transport_Type == "One Time")
{
vehicle_no = ifNull(disnote_act.Vehicle_No_dup,"");
transpotor = ifNull(disnote_act.Transporter_Name,"");
}
else
{
//vehicle_no = ifNull(disnote_act.Vehicle_No_dup,"");
vehicle_no = ifNull(disnote_act.Vehicle_No.Vehicle_No,"");
transpotor = ifNull(disnote_act.Transport_Name.Name_of_Transport,"");
}
custom_map = Map();
custom_map.put("api_name","cf_vehicle_no");
custom_map.put("value",vehicle_no);
custom_list.add(custom_map);
// info "vehicleno" + disnote_act.Vehicle_No;
custom_map = Map();
custom_map.put("api_name","cf_container_no");
custom_map.put("value",ifnull(disnote_act.Container_No,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_transporter");
custom_map.put("value",transpotor);
custom_list.add(custom_map);
// info "transname" + disnote_act.Transporter_Name;
custom_map = Map();
custom_map.put("api_name","cf_gr");
custom_map.put("value",ifNull(disnote_act.GR_No,""));
custom_list.add(custom_map);
// info "grno" + disnote_act.GR_No;
custom_map = Map();
custom_map.put("api_name","cf_buyer_s_po_no");
custom_map.put("value",ifNull(fet_so.PO_Reference,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_buyer_order_date");
custom_map.put("value",podate);
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_incoterms");
custom_map.put("value",ifNull(fet_so.Incoterms1.Incoterms,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_incoterms_location");
custom_map.put("value",ifNull(fet_so.Incoterms_Location.Incoterms_Location,""));
custom_list.add(custom_map);
mymap.put("custom_fields",custom_list);
item_list = List();
fetchitem = Materials[ID == rec.Product_Code];
line_item_map = Map();
line_item_map.put("description",fetchitem.Classification);
// info "Product des" + rec.Product_Description;
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
line_item_map.put(" product_type","goods");
// info fetchitem.Zoho_Books_ID;
line_item_map.put("quantity",rec.Actual_Qty);
// info "ordee qty" + rec.Ordered_Qty;
fetsosub = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Part_No == rec.Product_Code];
line_item_map.put("rate",fetsosub.Rate);
// info "rate" + rec1.Rate;
line_item_map.put("tax",fetsosub.Tax);
// info "Tax" + rec1.Tax;
line_item_map.put("tax_value",fetsosub.Tax_Value);
line_item_map.put("salesorder_item_id",fetsosub.zb_line_item_id);
line_sub = List();
custom_map = Map();
custom_map.put("label","Customer Part Code");
custom_map.put("value",ifNull(fetsosub.Customer_Part_Code,""));
line_sub.add(custom_map);
custom_map = Map();
custom_map.put("label","Packing");
custom_map.put("value",ifNull(fetsosub.Packing_Std.Packaging_Name,""));
line_sub.add(custom_map);
line_item_map.put("item_custom_fields",line_sub);
line_item_map.put("hsn_or_sac",fetsosub.HSN_Code);
// info "taxvalue" + rec1.Tax_Value;
custom_map = Map();
custom_map.put("label","UOM");
custom_map.put("value",ifnull(fetsosub.UoM.UOM,""));
line_sub.add(custom_map);
item_list.add(line_item_map);
mymap.put("line_items",item_list);
mymap.put("payment_terms_label",ifNull(fetch_cust.Payment_Terms.Stages,""));
mymap.put("payment_terms",fetch_cust.Exposure_Days);
info mymap;
createinbooks = zoho.books.createRecord("invoices","60015333461",mymap,conn_tok);
info createinbooks;
retainerno = createinbooks.get("invoice").toMap();
retinvno = retainerno.get("invoice_number");
retinvid = retainerno.get("invoice_id");
rec.Zoho_Books_Invoice_ID=retinvid.toString();
rescode = createinbooks.get("code").toLong();
log_type = "Failure";
if(rescode == 0)
{
log_type = "Success";
}
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Invoice-Books"
Form_Name="Dispatch_Note_Actual_In_Books-Invoice Individual"
Log_Details=createinbooks
Log_Type=log_type
Reference_NO=disnote_act.CDNF_ID
];
//disnote_act.Draft_Invoice_ID=retinvid.toString();
// info disnote_act.Draft_Invoice_ID;
//disnote_act.Draft_Invoice_No=retinvno;
//info disnote_act.Draft_Invoice_No;
//fet_so.Books_Invoice_ID=retinvid.toString();
}
}
}
void Books.Dispatch_Note_Actual_In_Books(int dnaid)
{
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
disnote_act = Create_Dispatch_Note_Format[ID == input.dnaid];
fetch_cust = Customers[ID == disnote_act.Customer_Name];
if(fetch_cust.ID != 143536000004625764 && fetch_cust.ID != 143536000004570816 && fetch_cust.ID != 143536000005088666 && fetch_cust.ID != 143536000005117329)
{
fet_so = Sales_Order[ID == disnote_act.Sales_Order_No];
fettax = GST_Details[ID == fet_so.Item_Details.Tax];
// info fet_so;
plc_of_supply = Destination[Destination == fet_so.Place_of_Supply.Destination].Short_Name;
disdate = disnote_act.Dispatch_Note_Date.toString("yyyy-MM-dd");
sodate = fet_so.Sale_Order_Date.toString("yyyy-MM-dd");
podate = fet_so.PO_Date.toString("yyyy-MM-dd");
info disdate;
info sodate;
mymap = Map();
//info mymap;
mymap.put("customer_id",fetch_cust.Customer_Books_ID);
// info fetch_cust.Customer_Books_ID;
mymap.put("customer_name",fetch_cust.Contact_Name);
//info fetch_cust.Contact_Name;
mymap.put("billing_address_id",fetch_cust.Billing_Address_Id);
//info "custaddress" + fetch_cust.Billing_Address_Id;
//mymap.put("shipping_address_id",fetch_cust.Shipping_Address_id);
mymap.put("shipping_address",disnote_act.Customer_Address);
//info "Shipping" + fet_so.Shipping_Address;
mymap.put("place_of_supply",plc_of_supply);
// info "placeofsupply" + plc_of_supply;
custom_list = List();
custom_map = Map();
custom_map.put("api_name","cf_sales_order_no");
custom_map.put("value",fet_so.Sale_Order_No);
custom_list.add(custom_map);
// info "Salerderno" + fet_so.Sale_Order_No;
custom_map = Map();
custom_map.put("api_name","cf_dispatch_date");
custom_map.put("value",disdate);
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_disp_note_no");
custom_map.put("value",disnote_act.CDNF_ID);
custom_list.add(custom_map);
// info "dis date" + disnote_act.Dispatch_Note_Date;
custom_map = Map();
custom_map.put("api_name","cf_sales_order_date");
custom_map.put("value",sodate);
custom_list.add(custom_map);
//info "sale date" + fet_so.Sale_Order_Date;
vehicle_no = "";
transpotor = "";
if(disnote_act.Transport_Type == "One Time")
{
vehicle_no = ifNull(disnote_act.Vehicle_No_dup,"");
transpotor = ifNull(disnote_act.Transporter_Name,"");
}
else
{
//vehicle_no = ifNull(disnote_act.Vehicle_No_dup,"");
vehicle_no = ifNull(disnote_act.Vehicle_No.Vehicle_No,"");
transpotor = ifNull(disnote_act.Transport_Name.Name_of_Transport,"");
}
custom_map = Map();
custom_map.put("api_name","cf_vehicle_no");
custom_map.put("value",vehicle_no);
custom_list.add(custom_map);
// info "vehicleno" + disnote_act.Vehicle_No;
custom_map = Map();
custom_map.put("api_name","cf_container_no");
custom_map.put("value",ifnull(disnote_act.Container_No,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_transporter");
custom_map.put("value",transpotor);
custom_list.add(custom_map);
// info "transname" + disnote_act.Transporter_Name;
custom_map = Map();
custom_map.put("api_name","cf_gr");
custom_map.put("value",ifNull(disnote_act.GR_No,""));
custom_list.add(custom_map);
// info "grno" + disnote_act.GR_No;
custom_map = Map();
custom_map.put("api_name","cf_buyer_s_po_no");
custom_map.put("value",ifNull(fet_so.PO_Reference,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_buyer_order_date");
custom_map.put("value",podate);
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_incoterms");
custom_map.put("value",ifNull(fet_so.Incoterms1.Incoterms,""));
custom_list.add(custom_map);
custom_map = Map();
custom_map.put("api_name","cf_incoterms_location");
custom_map.put("value",ifNull(fet_so.Incoterms_Location.Incoterms_Location,""));
custom_list.add(custom_map);
mymap.put("custom_fields",custom_list);
item_list = List();
actqtycheck = 0;
tx_val = 0;
for each rec in disnote_act.Product_Details
{
if(rec.Individual == false && rec.Actual_Qty > 0 && isNull(disnote_act.Draft_Invoice_ID) == True)
{
actqtycheck = 1;
fetchitem = Materials[ID == rec.Product_Code];
line_item_map = Map();
line_item_map.put("description",fetchitem.Classification);
// info "Product des" + rec.Product_Description;
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
line_item_map.put(" product_type","goods");
// info fetchitem.Zoho_Books_ID;
line_item_map.put("quantity",rec.Actual_Qty);
// info "ordee qty" + rec.Ordered_Qty;
fetsosub = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Part_No == rec.Product_Code];
//info fetsosub;
line_item_map.put("rate",fetsosub.Rate);
// info "rate" + rec1.Rate;
//line_item_map.put("tax",fetsosub.Tax);
// info "Tax" + rec1.Tax;
//line_item_map.put("tax_value",fetsosub.Tax_Value);
line_item_map.put("tax_id",fetsosub.Tax.Zoho_Books_ID);
line_item_map.put("salesorder_item_id",fetsosub.zb_line_item_id);
line_sub = List();
custom_map = Map();
custom_map.put("label","Customer Part Code");
custom_map.put("value",ifNull(fetsosub.Customer_Part_Code,""));
line_sub.add(custom_map);
custom_map = Map();
custom_map.put("label","Packing");
custom_map.put("value",ifNull(fetsosub.Packing_Std.Packaging_Name,""));
line_sub.add(custom_map);
line_item_map.put("item_custom_fields",line_sub);
line_item_map.put("hsn_or_sac",fetsosub.HSN_Code);
custom_map = Map();
custom_map.put("label","UOM");
custom_map.put("value",ifnull(fetsosub.UoM.UOM,""));
line_sub.add(custom_map);
item_list.add(line_item_map);
}
}
if(fet_so.Packing_Forwarding > 0)
{
fetchitem = Materials[Part_No == "900114"];
line_item_map = Map();
line_item_map.put("name",fetchitem.Part_Description);
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
//line_item_map.put("quantity",1);
line_item_map.put("rate",fet_so.Packing_Forwarding);
line_item_map.put("tax_name",fettax.Tax_Name);
line_item_map.put("tax_id",fettax.Zoho_Books_ID);
line_item_map.put("tax_percentage",fettax.Total_Rate);
item_list.add(line_item_map);
tx_val = ifnull(tx_val,0.0) + ifnull(fet_so.PF_Tax_value,0.0);
}
mymap.put("tax_total",tx_val);
if(actqtycheck == 1)
{
mymap.put("line_items",item_list);
mymap.put("payment_terms_label",ifNull(fetch_cust.Payment_Terms.Stages,""));
mymap.put("payment_terms",fetch_cust.Exposure_Days);
info mymap;
createinbooks = zoho.books.createRecord("invoices","60015333461",mymap,conn_tok);
info createinbooks;
rescode = createinbooks.get("code").toLong();
log_type = "Failure";
if(rescode == 0)
{
log_type = "Success";
}
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Module_Name="Invoice-Books"
Form_Name="Dispatch_Note_Actual_In_Books-Invoice"
Log_Details=createinbooks
Log_Type=log_type
Reference_NO=disnote_act.CDNF_ID
];
retainerno = createinbooks.get("invoice").toMap();
retinvno = retainerno.get("invoice_number");
retinvid = retainerno.get("invoice_id");
retain_upd_map = Map();
retain_dummyMap = Map();
// retain_upd_map.put("Invoice_No",retinvno);
retain_upd_map.put("invoice_ID",retinvid);
disnote_act.Draft_Invoice_ID=retinvid.toString();
//disnote_act.Draft_Invoice_No=retinvno;
fet_so.Books_Invoice_ID=retinvid.toString();
}
}
}
void Books.Create_Sales_Order_in_Books(int soid)
{
//Getting authtoken and organisation id
books_access = thisapp.Books.Get_Books_Access();
conn_tok = books_access.get("connection");
org_id = books_access.get("organisation_id");
//info auth_tok;
//info org_id;
//------------------------------------------------------------------------------
fetch_so = Sales_Order[ID == input.soid];
//info fetch_so;
fetch_cust = Customers[ID == fetch_so.Customer_Name];
//info ("fetchcust" + fetch_cust) + " " + fetch_cust.Customer_Books_ID;
fetch_delivery_method = Shipping_Mode[ID == fetch_so.Delivery_Mode].Shipping_Mode;
fetch_warehouse = Warehouse[ID = fetch_so.Warehouse].Warehouse_Name;
fettax = GST_Details[ID == fetch_so.Item_Details.Tax];
fetemp = Employee_Details[ID == fetch_so.Created_By].Employee_Name;
fetch_payment_trms = Payment_Terms[ID == fetch_so.Payment_Terms].Stages;
shipment_date = fetch_so.Expected_Shipment_Date.toString("yyyy-MM-dd");
so_date = zoho.currentdate.toString("yyyy-MM-dd");
curr_code = Currency_Code[ID == fetch_cust.Currency_Code];
curr_conv = Currency_Conversion[Convert_To == fetch_cust.Currency_Code];
plc_of_supply = Destination[Destination == fetch_so.Place_of_Supply.Destination].Short_Name;
fet_gst_trmt = GST_Treatment[ID == fetch_cust.GST_Treatment];
mymap = Map();
mymap.put("customer_id",fetch_cust.Customer_Books_ID);
mymap.put("customer_name",fetch_cust.Contact_Name);
mymap.put("date",so_date);
//mymap.put("billing_address",fetch_so.Billing_Address);
//mymap.put("shipping_address",fetch_so.Shipping_Address);
mymap.put("shipment_date",shipment_date);
mymap.put("delivery_method",fetch_delivery_method);
mymap.put("place_of_supply",plc_of_supply);
mymap.put("gst_treatment",fet_gst_trmt.Link_name);
mymap.put("salesorder_number",fetch_so.Sale_Order_No);
mymap.put("salesperson_name",fetemp);
mymap.put("currency_id",curr_code.Zoho_Books_ID);
mymap.put("exchange_rate",curr_conv.Exchange_Rate);
mymap.put("status","Open");
url_to_so = "https://creatorapp.zoho.in/carrierwheels/erp/#Page:SO_Print?ID=" + soid;
custom_list = List();
custom_map = Map();
custom_map.put("api_name","cf_download_so_from_erp");
custom_map.put("value",url_to_so);
custom_list.add(custom_map);
mymap.put("custom_fields",custom_list);
item_list = List();
tx_val = 0;
totalqty = 0;
for each rec in fetch_so.Item_Details
{
fetchitem = Materials[ID == rec.Part_Description];
line_item_map = Map();
line_item_map.put("name",rec.Part_Description.Part_Description);
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
// line_item_map.put("description",rec.Part_Description.Additional_Description);
line_item_map.put("quantity",rec.Qty);
totalqty = ifnull(totalqty,0.00) + ifnull(rec.Qty,0.00);
line_item_map.put("rate",rec.Rate);
line_item_map.put("warehouse_name",fetch_warehouse);
//line_item_map.put("tax_type",fettax.Tax_Details.Tax_Type);
line_item_map.put("tax_name",fettax.Tax_Name);
line_item_map.put("tax_id",fettax.Zoho_Books_ID);
line_item_map.put("tax_percentage",fettax.Total_Rate);
item_list.add(line_item_map);
tx_val = ifnull(tx_val,0.0) + ifnull(rec.Tax_Value,0.0);
}
if(fetch_so.Packing_Forwarding > 0)
{
fetchitem = Materials[Part_No == "900114"];
line_item_map = Map();
line_item_map.put("name",fetchitem.Part_Description);
line_item_map.put("item_id",fetchitem.Zoho_Books_ID);
//line_item_map.put("quantity",1);
line_item_map.put("rate",fetch_so.Packing_Forwarding);
line_item_map.put("warehouse_name",fetch_warehouse);
line_item_map.put("tax_name",fettax.Tax_Name);
line_item_map.put("tax_id",fettax.Zoho_Books_ID);
line_item_map.put("tax_percentage",fettax.Total_Rate);
item_list.add(line_item_map);
tx_val = ifnull(tx_val,0.0) + ifnull(fetch_so.PF_Tax_value,0.0);
}
mymap.put("tax_total",tx_val);
mymap.put("line_items",item_list);
post_url = zoho.books.createRecord("salesorders",org_id,mymap,conn_tok);
info post_url;
res_code = post_url.get("code").toLong();
resp_Map = Map();
log_type = "Failure";
if(res_code == 0)
{
log_type = "Success";
books_id = post_url.toMap().get("salesorder").toMap().get("salesorder_id");
fetch_so.Zoho_Books_ID=books_id;
test_map = Map();
mark_response = invokeurl
[
url :"https://www.zohoapis.in/books/v3/salesorders/" + books_id + "/status/open?organization_id=" + org_id + ""
type :POST
parameters:test_map
connection:"books_con"
];
}
if(res_code == 0)
{
getzbook = zoho.books.getRecordsByID("salesorders",org_id,books_id);
get_line_item = getzbook.toMap().get("salesorder").toMap().get("line_items");
for each lineitem in get_line_item
{
lineitemid = lineitem.getjson("line_item_id");
itemid = lineitem.getjson("item_id");
fetso = Sales_Order[Zoho_Books_ID == books_id];
fetsosf = Sale_Order_Subform[Sales_Order_Exis_ID == fetso.ID];
getmat = Materials[Zoho_Books_ID == itemid];
for each sosfrec in fetsosf
{
if(sosfrec.Part_No == getmat.ID)
{
sosfrec.zb_line_item_id=lineitemid;
fetso.pack_forw_lineitemid=lineitemid;
}
}
}
}
ins_log = insert into Log_Files
[
Added_User=zoho.loginuser
Log_Type=log_type
Module_Name="Books"
Form_Name="Sales Order"
Log_Details=post_url
Reference_NO=fetch_so.Sale_Order_No
];
//sending error log message
if(log_type == "Failure")
{
resp_Map.put("Resp","Failure");
resp_Map.put("log_msg",post_url.get("message"));
}
//status to changed
updtstatus = zoho.books.markStatus("salesorders",org_id,books_id,"open",conn_tok);
}
for each rec in Calibration_Master[ID != null && Cal_Due_Date != null]
{
if(rec.Today != zoho.currentdate)
{
rec.Today=zoho.currentdate;
//info rec.Today;
info rec.Cal_Due_Date;
daysleft = daysBetween(rec.Today,rec.Cal_Due_Date);
rec.Days_Left=daysleft;
info daysleft;
if(rec.Days_Left.toNumber() <= 30 && rec.Days_Left.toNumber() > 0)
{
rec.Status1="Attention";
}
else if(rec.Days_Left.toNumber() > 30)
{
rec.Status1="No Issue";
}
else if(rec.Days_Left.toNumber() <= 0)
{
rec.Status1="Urgent";
}
}
}
for each rec in Calibration_Master[ID != null]
{
calhist = Calibration_History[Calibration_Master_ID == rec.ID];
if(calhist.Cal_Due_Date < zoho.currentdate && calhist.Status != "Completed")
{
calhist.Status="Overdue";
}
if(calhist.Cal_Due_Date >= zoho.currentdate && calhist.Status != "Completed")
{
calhist.Status="Due";
}
if(rec.Cal_Due_Date < zoho.currentdate)
{
rec.Status="Overdue";
}
if(rec.Cal_Due_Date >= zoho.currentdate)
{
rec.Status="Due";
}
}
getemail = Email_Template[Template_No == 9];
sub = getemail.Subject_field;
body = getemail.Body;
tab = "<html><style>th,td {padding: 5px;}</style><table border = 1> <th> S.No. </th> <th>Part No.</th> <th>Part Name <th>Minimum Quantity</th> <th>Available Quantity</th>";
count = 0;
for each var in Materials[Material_Item_Type.Material_Type == "General Purchase" && Planning_Procedure == "Consumption-Based Planning"]
{
stock = Stock_Value[Part_No == var.ID].sum(Stock_Qty);
if(var.Minimum_Stock != null)
{
if(var.Minimum_Stock >= stock)
{
count = count + 1;
tab = tab + "<tr><td>" + count + "</td>";
tab = tab + "<td>" + var.Part_No + "</td>";
tab = tab + "<td>" + var.Part_Description + "</td>";
tab = tab + "<td>" + var.Minimum_Stock + "</td>";
tab = tab + "<td>" + stock + "</td></tr>";
}
}
}
if(count > 1)
{
info "test";
tab = tab + "</table></html>";
body = body.replaceAll("{table}",tab,true);
sub = sub.replaceAll("<partno>",var.Part_No,true);
sendmail
[
from :"CWPL ERP <erp@carrierwheels.com>"
to :"pooja.s@synprosoft.com"
subject :sub
message :body
]
}
alllist = List();
alllist = {"png","PNG","JPEG","jpeg","JPG","jpg","GIF","gif","BMP","bmp"};
var = "";
if(input.Attachment != null)
{
ext = input.Attachment.toList(".").get(input.Attachment.toList(".").size() - 1);
}
rpl = replaceAll(ext," border = \"0\"></img>","");
var = rpl.replaceAll("\"","");
if(!alllist.contains(var) && var != "")
{
alert "This file type is not accepted. Only PNG,JPG,JPEG,BMP file formats are allowed";
cancel submit;
}
i = 0;
for each rec in input.Item_Details1
{
i = i + 1;
rec.S_No=i;
}
itmname = "";
des = "";
for each sub in input.Item_Details1
{
if(sub.S_No == 1)
{
itmname = sub.Item_Name;
des = sub.Description;
}
}
if(itmname != null)
{
for each sub1 in input.Item_Details1
{
if(sub1.S_No > 1)
{
sub1.Item_Name=itmname;
sub1.Description=des;
}
}
}
// itm = List();
// for each var in input.Item_Details1
// {
// fetcal = Calibration_Master[Item_Name == var.Item_Name.Item_Name].ID.getAll();
// itm.add(fetcal);
// itm = itm.distinct();
// var.Item_Name:ui.add(itm);
// }
alllist = List();
alllist = {"png","PNG","JPEG","jpeg","JPG","jpg","GIF","gif","BMP","bmp"};
var = "";
if(input.Attachment != null)
{
ext = input.Attachment.toList(".").get(input.Attachment.toList(".").size() - 1);
}
rpl = replaceAll(ext," border = \"0\"></img>","");
var = rpl.replaceAll("\"","");
if(!alllist.contains(var) && var != "")
{
alert "This file type is not accepted. Only PNG,JPG,JPEG,BMP file formats are allowed";
}
if(input.Calibration_Master_ID != null)
{
fetcal = Calibration_Master[ID == input.Calibration_Master_ID];
input.Item_Name = fetcal.ID;
input.Gauge_No = fetcal.ID;
input.Description_Make = fetcal.Description_Make;
input.Location = fetcal.Location;
input.Range = fetcal.ID;
input.Least_Count = fetcal.ID;
input.Permissable_Error = fetcal.Permissable_Error;
input.Usable_Range = fetcal.ID;
input.Internal_External = fetcal.Internal_External;
input.Calibration_Type = fetcal.Internal_External;
input.Closed_Date = zoho.currentdate;
input.Cal_Done_Date = zoho.currentdate;
input.Cal_Due_Date = fetcal.Cal_Due_Date;
input.Master_Instrument = fetcal.Master_Instruments;
input.Checked_By = ifnull(Employee_Details[Employee_Email == "kapilsaini7890ks@gmail.com"].ID,"");
input.Verification_By = ifnull(Employee_Details[Employee_Email = "manishchaudhary@carrierwheels.com"].ID,"");
input.Approved_By = ifnull(Employee_Details[Employee_Email = "barkha@carrierwheels.com"].ID,"");
input.Calibration_By = ifnull(Employee_Details[Employee_Email == zoho.loginuserid].ID,"");
if(input.Internal_External == "Both")
{
enable Calibration_Type;
}
else
{
disable Calibration_Type;
}
}
//Hide/Disable
//disable Calibration_Type ;
hide Checked_By;
disable Internal_External;
hide Vendor_Name;
hide Vendor_Address;
hide Calibration_Done;
hide Closed_Date;
disable Item_Details1.S_No;
//disable Calibration_By;
disable Permissable_Error;
disable Usable_Range;
disable Least_Count;
//disable Internal_External;
disable Cal_Due_Date;
disable Item_Name;
disable Gauge_No;
disable Description_Make;
disable Location;
disable Range;
disable Master_Instrument;
//disable Master_Instrument;
disable Vendor_Address;
hide Shipping_Cost;
hide Calibration_Master_ID;
hide Status;
hide Transportation_Details;
hide Vehicle_Photo;
hide Transport_Name;
hide Transporter_Name;
hide Driver_Name;
hide Driver_Mobile;
hide Driver_License_No;
hide Vehicle_Type;
hide Vehicle_No_dup;
hide Vehicle_RC_No;
hide Vehicle_No;
hide GR_RR_No;
hide Calibration_No;
//disable Calibration_Type;
//disable Closed_By;
hide Calibration_History_ID;
hide Approval;
//hide Verification_By;
hide Approved_By;
if(input.Start_Date != null && input.Frequency != null)
{
mon = input.Frequency;
input.Cal_Due_Date = input.Start_Date.addDay(mon);
input.Cal_Due_Date = input.Cal_Due_Date.subDay(1);
startDate = input.Cal_Due_Date;
endDate = input.Today.subDay(1);
input.Days_Left = daysBetween(endDate,startDate);
}
if(input.Start_Date != null && input.Frequency != null)
{
mon = input.Frequency;
input.Cal_Due_Date = input.Start_Date.addDay(mon);
input.Cal_Due_Date = input.Cal_Due_Date.subDay(1);
startDate = input.Cal_Due_Date;
endDate = input.Today.subDay(1);
input.Days_Left = daysBetween(endDate,startDate);
}
rec = 0;
if(isBlank(input.Cal_Master_No.trim()))
{
rec = 1;
str1 = thisapp.Common.Number_Function_New("Cal Master No");
input.Cal_Master_No = str1;
}
if(input.Calibration_Master_ID == null)
{
info "if";
input.Obsolete_Status = "Active";
var = 0;
if(isBlank(input.Gauge_No.trim()))
{
var = 1;
str = thisapp.Common.Number_Function_New("Gauge No");
input.Gauge_No = str;
openUrl("#Form:Alert_Messages?Status=" + "cal" + "&Value=" + input.Gauge_No + "&zc_LoadIn=dialog","same window");
}
}
if(input.Calibration_Master_ID != null && Revision_Status == "Yes")
{
fetcal = Calibration_Master[ID == input.ID];
fetcal.Obsolete_Status="Inactive";
fetcal.Approval="Pending for Approval";
openUrl("#Report:All_Calibration_Masters","same window");
}
thisapp.Calibration.CalibrationHistory(input.ID);
// GIN num generation
try
{
input.Status = "Open";
for each rec in input.Item_Details
{
rec.Status=input.Status;
}
var = 0;
if(input.GIN_Number.trim().len() < 1)
{
var = 1;
str = thisapp.Common.Number_Function_New("Goods Issued Note");
input.GIN_Number = str;
}
//as per the advice from Mr.senthil dt 05/1/2024 in stock values form reduce the stockqty based on FIFO method(added time)
for each itdrec in input.Item_Details
{
getstkvalue = Stock_Value[Part_No == itdrec.Part_No && Stock_Qty > 0] sort by Added_Time asc;
if(getstkvalue.count() > 0)
{
svbalqty = 0;
svi = 1;
for each stokvalrec in getstkvalue
{
//Issued Quantiy is less total qty
if(itdrec.Issued_Quantity <= stokvalrec.Stock_Qty && svi == 1)
{
stokvalrec.Stock_Qty=ifnull(itdrec.Qty_after_Issued,0.0);
stokvalrec.Stock_Value=ifnull(itdrec.Rate,0.0) * ifnull(itdrec.Qty_after_Issued,0.0);
stokvalrec.Inventory_Qty=ifnull(itdrec.Qty_after_Issued,0.0);
}
//Issued Quantity is more total qty
else if(itdrec.Issued_Quantity > stokvalrec.Stock_Qty && svi == 1)
{
svbalqty = ifnull(itdrec.Issued_Quantity,0.0) - ifnull(stokvalrec.Stock_Qty,0.0);
stokvalrec.Stock_Qty=0;
stokvalrec.Stock_Value=0;
stokvalrec.Inventory_Qty=0;
}
//for first time it should not get inside the loop
if(svbalqty > 0 && svi > 1)
{
//Balance Qty is less
if(svbalqty <= stokvalrec.Stock_Qty)
{
stokvalrec.Stock_Qty=ifnull(stokvalrec.Stock_Qty,0.0) - ifnull(svbalqty,0.0);
stokvalrec.Stock_Value=ifnull(stokvalrec.Unit_Price,0.0) * ifnull(stokvalrec.Stock_Qty,0.0);
stokvalrec.Inventory_Qty=ifnull(stokvalrec.Inventory_Qty,0.0) - ifnull(svbalqty,0.0);
svbalqty = 0;
}
//Balance Qty is More
else if(svbalqty >= stokvalrec.Stock_Qty)
{
svbalqty = ifnull(svbalqty,0.0) - ifnull(stokvalrec.Stock_Qty,0.0);
stokvalrec.Stock_Qty=0;
stokvalrec.Stock_Value=0;
stokvalrec.Inventory_Qty=0;
}
}
if(svbalqty == 0)
{
info "before break";
break;
}
svi = svi + 1;
}
}
else if(getstkvalue.count() == 0)
{
insert into Stock_Value
[
Added_User=zoho.loginuser
Part_No=itdrec.Part_No
Part_Description=itdrec.Part_Description
Specification=itdrec.Specification
Stock_Qty=ifnull(itdrec.Qty_after_Issued,0.0)
Unit_Price=ifnull(itdrec.Rate,0.00)
Stock_Value=ifnull(itdrec.Rate,0.00) * ifnull(itdrec.Qty_after_Issued,0.00)
Inventory_Qty=ifnull(itdrec.Qty_after_Issued,0.0)
]
}
}
// //insert the part no if not available in stock value form.the below comment and new code is above on 5/1/2024
/*for each stkvalrec in input.Item_Details
{
getinvent = Inventory[Part_No == stkvalrec.Part_No && Total_Qty > 0];
if(getinvent.count() > 0)
{
fet_stockvalue = Stock_Value[Part_No == stkvalrec.Part_No && Unit_Price == stkvalrec.Rate];
if(fet_stockvalue.count() == 0)
{
insert into Stock_Value
[
Added_User=zoho.loginuser
Part_No=stkvalrec.Part_No
Part_Description=stkvalrec.Part_Description
Specification=stkvalrec.Specification
Location_Name=getinvent.Location_Name
Sub_Location=getinvent.Sub_Location
Rack_Number=getinvent.Rack_Number
Warehouse=getinvent.Warehouse
Stock_Qty=ifnull(stkvalrec.Qty_after_Issued,0.0)
Unit_Price=ifnull(stkvalrec.Rate,0.00)
Stock_Value=ifnull(stkvalrec.Rate,0.00) * ifnull(stkvalrec.Qty_after_Issued,0.00)
Inventory_Qty=ifnull(stkvalrec.Qty_after_Issued,0.0)
]
}
else if(fet_stockvalue.count() > 0)
{
fet_stockvalue = Stock_Value[Part_No == stkvalrec.Part_No && Unit_Price == stkvalrec.Rate];
if(fet_stockvalue.Stock_Qty > 0)
{
fet_stockvalue.Stock_Qty=ifnull(fet_stockvalue.Stock_Qty,0.0) - ifnull(stkvalrec.Issued_Quantity,0.0);
fet_stockvalue.Stock_Value=ifnull(stkvalrec.Rate,0.0) * ifnull(fet_stockvalue.Stock_Qty,0.0);
fet_stockvalue.Inventory_Qty=ifnull(fet_stockvalue.Stock_Qty,0.0);
}
else
{
fet_stockvalue.Stock_Qty=ifnull(stkvalrec.Qty_after_Issued,0.0);
fet_stockvalue.Stock_Value=ifnull(stkvalrec.Rate,0.0) * ifnull(stkvalrec.Qty_after_Issued,0.0);
fet_stockvalue.Inventory_Qty=ifnull(stkvalrec.Qty_after_Issued,0.0);
}
}
}
}*/
//
if(input.Form_Mode == "GIN against WO")
{
iss_qty = 0;
ava_qty = 0;
bal_qty = 0;
for each wovar in input.Item_Details
{
getinv = Inventory[Part_No == wovar.Part_No && Location_Name.Location__Name == "Production WIP" && Sub_Location.Sub_Location == "Paint Shop"];
getin = Inventory[Part_No == wovar.Part_No && Location_Name.Location__Name != "Production WIP" && Total_Qty > 0] sort by Total_Qty desc;
// sendmail
// [
// from :zoho.loginuserid
// to :"pooja.s@synprosoft.com","parthasarathy.m@synprosoft.com"
// subject :"GIN Successful form submission - getinV"
// message :"Part No " + getin.Part_No.Part_No + "PRD WIP TOT QTY-" + getinv.Total_Qty + "PRD WIP AVL QTY-" + getinv.Available_Qty + "PRD WIP BLK QTY-" + getinv.Block_Qty + "ID-" + getin.ID + "getinv insert Count-" + getinv.count() + "NOPRDWIP TQ " + getin.Total_Qty + "noprdwip aq " + getin.Available_Qty + "noprd blkqty " + getin.Block_Qty
// ]
if(getin.count() > 0)
{
//Block is greater than Issue qty
if(getin.Block_Qty >= wovar.Issued_Quantity && getin.Block_Qty > 0)
{
getin.Block_Qty=ifnull(getin.Block_Qty,0) - ifnull(wovar.Issued_Quantity,0);
getin.Total_Qty=ifnull(getin.Total_Qty,0) - ifnull(wovar.Issued_Quantity,0);
}
else if(getin.Block_Qty < wovar.Issued_Quantity && getin.Block_Qty > 0)
{
bal = ifnull(wovar.Issued_Quantity,0) - ifnull(wovar.Block_Qty,0);
blk = ifnull(wovar.Block_Qty,0);
getin.Available_Qty=ifnull(getin.Available_Qty,0) - bal;
getin.Total_Qty=ifnull(getin.Total_Qty,0) - ifnull(wovar.Issued_Quantity,0);
getin.Block_Qty=0;
}
else if(getin.Block_Qty == 0 || getin.Block_Qty == null)
{
if(getin.Available_Qty > 0 && getin.Available_Qty >= wovar.Issued_Quantity)
{
getin.Available_Qty=ifnull(getin.Available_Qty,0) - wovar.Issued_Quantity;
getin.Total_Qty=ifnull(getin.Total_Qty,0) - ifnull(wovar.Issued_Quantity,0);
}
if(getin.Available_Qty > 0 && getin.Available_Qty < wovar.Issued_Quantity)
{
getin.Available_Qty=wovar.Issued_Quantity - ifnull(getin.Available_Qty,0);
getin.Total_Qty=ifnull(wovar.Issued_Quantity,0) - ifnull(getin.Total_Qty,0);
}
}
}
if(getinv.count() == 0)
{
bal = 0;
if(wovar.Issued_Quantity > wovar.Block_Qty && getin.Available_Qty > 0)
{
bal = ifnull(wovar.Issued_Quantity,0) - ifnull(wovar.Block_Qty,0);
getin.Block_Qty=0;
getin.Available_Qty=ifnull(getin.Available_Qty,0) - bal;
getin.Total_Qty=ifnull(getin.Available_Qty,0);
}
if(wovar.Issued_Quantity > wovar.Required_Quantity)
{
blk = ifnull(wovar.Issued_Quantity,0) - ifnull(wovar.Required_Quantity,0);
ins = insert into Inventory
[
Part_Description=wovar.Part_Description
Part_No=wovar.Part_No
Total_Qty=wovar.Required_Quantity
Available_Qty=wovar.Issued_Quantity
Block_Qty=blk
UOM=wovar.Unit_of_Measurement
Location_Name=143536000004382382
Sub_Location=143536000004382454
Added_User=zoho.loginuser
];
}
else if(wovar.Issued_Quantity == wovar.Required_Quantity)
{
ins1 = insert into Inventory
[
Part_Description=wovar.Part_Description
Part_No=wovar.Part_No
Total_Qty=wovar.Required_Quantity
Available_Qty=wovar.Issued_Quantity
Block_Qty=0
UOM=wovar.Unit_of_Measurement
Location_Name=143536000004382382
Sub_Location=143536000004382454
Added_User=zoho.loginuser
];
}
else if(wovar.Issued_Quantity < wovar.Required_Quantity)
{
ins2 = insert into Inventory
[
Part_Description=wovar.Part_Description
Part_No=wovar.Part_No
Total_Qty=wovar.Required_Quantity
Available_Qty=wovar.Issued_Quantity
Block_Qty=wovar.Balance_Quantity
UOM=wovar.Unit_of_Measurement
Location_Name=143536000004382382
Sub_Location=143536000004382454
Added_User=zoho.loginuser
];
}
}
else if(getinv.count() > 0)
{
sendmail
[
from :zoho.loginuserid
to :"pooja.s@synprosoft.com"
subject :"GIN Successful form submission - getinV"
message :"Part No " + getin.Part_No.Part_No + "PRD WIP TOT QTY-" + getinv.Total_Qty + "PRD WIP AVL QTY-" + getinv.Available_Qty + "PRD WIP BLK QTY-" + getinv.Block_Qty + "ID-" + getin.ID + "getinv insert Count-" + getinv.count()
]
if(wovar.Required_Quantity == wovar.Issued_Quantity)
{
getinv.Available_Qty=ifnull(getinv.Available_Qty,0) + ifnull(wovar.Issued_Quantity,0);
getinv.Total_Qty=ifnull(getinv.Total_Qty,0) + ifnull(wovar.Issued_Quantity,0);
}
//When Issued Qty is Greater than Reqquired Qty
else if(wovar.Issued_Quantity > wovar.Required_Quantity)
{
// blk = ifnull(wovar.Issued_Quantity,0) - ifnull(wovar.Required_Quantity,0);
// getinv.Total_Qty=ifnull(getinv.Total_Qty,0) + ifnull(wovar.Required_Quantity,0);
// getinv.Available_Qty=ifnull(getinv.Available_Qty,0) + ifnull(wovar.Issued_Quantity,0);
// getinv.Block_Qty=ifnull(getinv.Block_Qty,0) + blk;
blk = ifnull(wovar.Issued_Quantity,0) + ifnull(wovar.Required_Quantity,0);
getinv.Total_Qty=ifnull(getinv.Total_Qty,0) + blk;
getinv.Available_Qty=ifnull(getinv.Available_Qty,0) + ifnull(wovar.Issued_Quantity,0);
getinv.Block_Qty=ifnull(getinv.Block_Qty,0) + ifnull(wovar.Required_Quantity,0);
}
else if(wovar.Issued_Quantity < wovar.Required_Quantity)
{
getinv.Total_Qty=ifnull(getinv.Total_Qty,0) + ifnull(wovar.Required_Quantity,0);
getinv.Available_Qty=ifnull(getinv.Available_Qty,0) + ifnull(wovar.Issued_Quantity,0);
getinv.Block_Qty=ifnull(getinv.Block_Qty,0) + ifnull(wovar.Balance_Quantity,0);
}
}
mat_isf_qty = ifnull(wovar.Issued_Quantity,0) + ifnull(wovar.Quantity_issued_so_far,0);
fetch_mat_subform = Material_Request_Subform[ID == wovar.Material_Request_Subform_lu && Part_Description == wovar.Part_Description];
fetch_mat_subform.Quantity_issued_so_far=mat_isf_qty;
blnc_qty = ifnull(wovar.Balance_Quantity,0.0);
fetch_mat_subform.Balance_Qty=blnc_qty;
bat_no_list = List();
iss_qty = wovar.Issued_Quantity;
bat = Stock_Batch[Part_No == wovar.Part_No && Part_Description == wovar.Part_Description && Status != "Issued" && Location == wovar.Location && Warehouse == input.Warehouse && Sub_Location == wovar.Sub_Location && Racks_Bins == wovar.Racks_Bins];
for each i1 in bat
{
bat_no = Stock_Batch[ID == i1].Batch_No;
bat_no_list.add(bat_no);
}
i = 0;
for each no in bat_no_list
{
batching = Stock_Batch[Batch_No == no];
ava_qty = batching.Available_Quantity;
i = i + 1;
if(i == 1 && iss_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = iss_qty - ava_qty;
}
else if(i == 1 && iss_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - iss_qty;
bal_qty = 0;
}
else if(i == 1 && iss_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
else if(i > 1 && bal_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = bal_qty - ava_qty;
}
else if(i > 1 && bal_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - bal_qty;
bal_qty = 0;
}
else if(i > 1 && bal_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=bal_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
}
// Updating Stock value
temp_issued_qty = rec.Issued_Quantity;
ival = 0;
bal = 0;
if(wovar.Balance_Quantity < 1)
{
fetch_mat_subform.Status="Issued";
}
else
{
fetch_mat_subform.Status="Partially Issued";
}
}
}
//above closing parenthesis is for gin from work order if contidion.
emptylist = List();
if(Material_Request_RECID != emptylist || Material_Request_RECID != null && input.Form_Mode == "GIN against MRQ")
{
fet_Mrq_sts = Material_Request[ID == input.Material_Request_RECID];
//For GIN Validtaions
for each rec in input.Item_Details
{
if(rec.Issued_Quantity != null || rec.Issued_Quantity != 0)
{
//Updating qty issued so far
mat_isf_qty = ifnull(rec.Issued_Quantity,0) + ifnull(rec.Quantity_issued_so_far,0);
//Updating Quantity_issued_so_far in Material Request Subform
fetch_mat_subform = Material_Request_Subform[ID == rec.Material_Request_Subform_lu && Part_Description == rec.Part_Description];
fetch_mat_subform.Quantity_issued_so_far=mat_isf_qty;
//Updating blnc qty
blnc_qty = ifnull(rec.Balance_Quantity,0.0);
fetch_mat_subform.Balance_Qty=blnc_qty;
//below is new code to handle when items are in multiple times with different places.
getinventory = Inventory[Part_No == rec.Part_No] sort by Total_Qty desc;
info getinventory;
if(getinventory.count() > 0)
{
balqty = 0;
i = 1;
for each inventrec in getinventory
{
info balqty;
info i;
//Issued Quantiy is less total qty
if(rec.Issued_Quantity <= inventrec.Total_Qty && i == 1)
{
info "issued qty is less than total qty";
inventrec.Total_Qty=ifnull(inventrec.Total_Qty,0.0) - ifnull(rec.Issued_Quantity,0.0);
inventrec.Available_Qty=ifnull(inventrec.Available_Qty,0.0) - ifnull(rec.Issued_Quantity,0.0);
}
//Issued Quantity is more total qty
else if(rec.Issued_Quantity > inventrec.Total_Qty && i == 1)
{
info "issued qty is more than total qty";
balqty = ifnull(rec.Issued_Quantity,0.0) - ifnull(inventrec.Total_Qty,0.0);
inventrec.Total_Qty=0;
inventrec.Available_Qty=0;
}
//for first time it should not get inside the loop
if(balqty > 0 && i > 1)
{
info "balaance qty is more than zero";
//Balance Qty is less
if(balqty <= inventrec.Total_Qty)
{
info "balance qty is less than total qty";
inventrec.Total_Qty=ifnull(inventrec.Total_Qty,0.0) - ifnull(balqty,0.0);
inventrec.Available_Qty=ifnull(inventrec.Available_Qty,0.0) - ifnull(balqty,0.0);
balqty = 0;
}
//Balance Qty is More
else if(balqty >= inventrec.Total_Qty)
{
info "balance qty is greater than total qty";
balqty = ifnull(balqty,0.0) - ifnull(inventrec.Total_Qty,0.0);
inventrec.Total_Qty=0;
inventrec.Available_Qty=0;
}
}
if(balqty == 0)
{
info "before break";
break;
}
i = i + 1;
}
}
//--
//Subracting stock-batch
// Basic
/*bat = Stock_Batch[Part_No == rec.Part_No && Part_Description == rec.Part_Description && Status != "Issued" && Batch_No == rec.Batch_No.Batch_No];
if(bat.Available_Quantity == rec.Issued_Quantity)
{
bat.Status="Issued";
}
if(bat.Available_Quantity > rec.Issued_Quantity)
{
bat.Status="Partially Issued";
bat.Available_Quantity=bat.Available_Quantity - rec.Issued_Quantity;
}*/
// Advanced
iss_qty = 0;
ava_qty = 0;
bal_qty = 0;
// if(rec.Specification == null || rec.Specification == "")
// {
bat = Stock_Batch[Part_No == rec.Part_No && Part_Description == rec.Part_Description && Status != "Issued" && Location == rec.Location && Warehouse == input.Warehouse && Sub_Location == rec.Sub_Location && Racks_Bins == rec.Racks_Bins];
// }
// else
// {
// bat = Stock_Batch[Part_No == rec.Part_No && Part_Description == rec.Part_Description && Specification == rec.Specification && Status != "Issued" && Location == rec.Location && Warehouse == input.Warehouse && Sub_Location == rec.Sub_Location && Racks_Bins == rec.Racks_Bins];
// }
bat_no_list = List();
iss_qty = rec.Issued_Quantity;
for each i1 in bat
{
bat_no = Stock_Batch[ID == i1].Batch_No;
bat_no_list.add(bat_no);
}
info bat_no_list;
i = 0;
for each no in bat_no_list
{
batching = Stock_Batch[Batch_No == no];
ava_qty = batching.Available_Quantity;
i = i + 1;
if(i == 1 && iss_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = iss_qty - ava_qty;
}
else if(i == 1 && iss_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - iss_qty;
bal_qty = 0;
}
else if(i == 1 && iss_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
else if(i > 1 && bal_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = bal_qty - ava_qty;
}
else if(i > 1 && bal_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - bal_qty;
bal_qty = 0;
}
else if(i > 1 && bal_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=bal_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
}
// Updating Stock value
temp_issued_qty = rec.Issued_Quantity;
ival = 0;
bal = 0;
}
if(rec.Balance_Quantity == null || rec.Balance_Quantity == 0)
{
fetch_mat_subform.Status="Issued";
}
else
{
fetch_mat_subform.Status="Partially Issued";
}
}
}
else if(input.Form_Mode == "Direct GIN" || input.Form_Mode == "")
{
str = thisapp.Common.Number_Function_New("Material Request");
gin_without_mrq = insert into Material_Request
[
Request_Date=zoho.currentdate
Added_User=zoho.loginuser
Request_Raised_By=input.Issued_By
Warehouse=input.Warehouse
Material_Type=input.Material_Request_Type
Material_Request_No=str
MR_Status="MRQ from GIN"
];
input.Material_Request_RECID = gin_without_mrq;
Statusw = "";
Balance_Qtyw = input.Item_Details.Balance_Quantity;
if(Balance_Qtyw < 1)
{
Statusw = "Issued";
}
else
{
Statusw = "Partially Issued";
}
for each recmrsf in input.Item_Details
{
insert into Material_Request_Subform
[
Part_Description=recmrsf.Part_No
Part_No=recmrsf.Part_Description
Added_User=zoho.loginuser
Material_Type=recmrsf.Material_Type
Department=input.Issued_Empolyee_Department
UoM=recmrsf.Unit_of_Measurement
Specification=recmrsf.Specification
Stock_Qty=recmrsf.Stock_Quantity
Required_Qty=recmrsf.Required_Quantity
Balance_Qty=recmrsf.Balance_Quantity
Status=Statusw
Quantity_issued_so_far=recmrsf.Issued_Quantity
Material_Req_Exis_ID=gin_without_mrq
]
}
//For GIN Validtaions
for each rec in input.Item_Details
{
if(rec.Issued_Quantity != null || rec.Issued_Quantity != 0)
{
rec.Material_Request_No=str;
//below is new code to handle when items are in multiple times with different places.
getinventory = Inventory[Part_No == rec.Part_No] sort by Total_Qty desc;
info getinventory;
if(getinventory.count() > 0)
{
balqty = 0;
i = 1;
for each inventrec in getinventory
{
//Issued Quantiy is less total qty
if(rec.Issued_Quantity <= inventrec.Total_Qty && i == 1)
{
inventrec.Total_Qty=ifnull(inventrec.Total_Qty,0.0) - ifnull(rec.Issued_Quantity,0.0);
inventrec.Available_Qty=ifnull(inventrec.Available_Qty,0.0) - ifnull(rec.Issued_Quantity,0.0);
}
//Issued Quantity is more total qty
else if(rec.Issued_Quantity > inventrec.Total_Qty && i == 1)
{
balqty = ifnull(rec.Issued_Quantity,0.0) - ifnull(inventrec.Total_Qty,0.0);
inventrec.Total_Qty=0;
inventrec.Available_Qty=0;
}
//for first time it should not get inside the loop
if(balqty > 0 && i > 1)
{
info "balaance qty is more than zero";
//Balance Qty is less
if(balqty <= inventrec.Total_Qty)
{
info "balance qty is less than total qty";
inventrec.Total_Qty=ifnull(inventrec.Total_Qty,0.0) - ifnull(balqty,0.0);
inventrec.Available_Qty=ifnull(inventrec.Available_Qty,0.0) - ifnull(balqty,0.0);
balqty = 0;
}
//Balance Qty is More
else if(balqty >= inventrec.Total_Qty)
{
info "balance qty is greater than total qty";
balqty = ifnull(balqty,0.0) - ifnull(inventrec.Total_Qty,0.0);
inventrec.Total_Qty=0;
inventrec.Available_Qty=0;
}
}
if(balqty == 0)
{
info "before break";
break;
}
i = i + 1;
}
iss_qty = 0;
ava_qty = 0;
bal_qty = 0;
bat = Stock_Batch[Part_No == rec.Part_No && Part_Description == rec.Part_Description && Status != "Issued" && Warehouse == input.Warehouse && Location == rec.Location && Sub_Location == rec.Sub_Location && Racks_Bins == rec.Racks_Bins];
bat_no_list = List();
iss_qty = rec.Issued_Quantity;
for each i1 in bat
{
bat_no = Stock_Batch[ID == i1].Batch_No;
bat_no_list.add(bat_no);
}
info bat_no_list;
i = 0;
for each no in bat_no_list
{
batching = Stock_Batch[Batch_No == no];
ava_qty = batching.Available_Quantity;
i = i + 1;
if(i == 1 && iss_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = iss_qty - ava_qty;
}
else if(i == 1 && iss_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - iss_qty;
bal_qty = 0;
}
else if(i == 1 && iss_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
else if(i > 1 && bal_qty > ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=0;
bal_qty = bal_qty - ava_qty;
}
else if(i > 1 && bal_qty < ava_qty)
{
batching.Status="Partially Issued";
batching.Issued_Qty_So_far=iss_qty;
batching.Available_Quantity=ava_qty - bal_qty;
bal_qty = 0;
}
else if(i > 1 && bal_qty == ava_qty)
{
batching.Status="Issued";
batching.Issued_Qty_So_far=bal_qty;
batching.Available_Quantity=0;
bal_qty = 0;
}
}
// Updating Stock value
temp_issued_qty = rec.Issued_Quantity;
ival = 0;
bal = 0;
if(temp_issued_qty != 0)
{
}
}
}
}
//Insert / Update the Issued Details
for each Itemdetrec in input.Item_Details
{
insert into Inventory_Ageing
[
Added_User=zoho.loginuser
Part_No=Itemdetrec.Part_No
Part_Description=Itemdetrec.Part_Description
Specification=Itemdetrec.Specification
Issued_Stock=Itemdetrec.Issued_Quantity
Stock_Added_Issued_Date=zoho.currentdate
]
}
getdeptname = Department[ID == input.Issued_Empolyee_Department].Department_Name;
//The code below is to get Project cost
posum = 0;
fc = 0;
for each rec in input.Item_Details
{
fet_posub = Purchase_Order_Subform[Part_No == rec.Part_No];
if(rec.Part_No == fet_posub.Part_No)
{
posum = posum + ifnull(fet_posub.Rate,0.00);
finalcost = fet_posub.Rate * rec.Issued_Quantity;
}
else
{
fet_venSub = Vendor_Contract_Subform[Part_Description == rec.Part_Description].maximum(Unit_Price);
posum = posum + ifnull(fet_venSub,0.00);
finalcost = ifnull(fet_posub.Rate,0.0) * ifnull(rec.Issued_Quantity,0.0);
}
fc = fc + finalcost;
}
input.Project_Cost = fc;
input.Project_Rate = posum;
//below code is to update in zoho project form
if(input.Project_Name.Project_Title != null)
{
Fet_ZohoProject = Zoho_Projects_Data[ID == input.Project_Name];
if(Fet_ZohoProject.GIN_Item_Total_Amount == 0 || Fet_ZohoProject.GIN_Item_Total_Amount == null)
{
Fet_ZohoProject.GIN_Item_Total_Amount=ifnull(input.Project_Cost,0.00);
}
else
{
Fet_ZohoProject.GIN_Item_Total_Amount=ifnull(Fet_ZohoProject.GIN_Item_Total_Amount,0.00) + Ifnull(input.Project_Cost,0.00);
}
}
//THE Below function write the record in stock ledger.
thisapp.Stock_Ledger.Quantity_out_for_Stock_Ledger(input.ID);
for each itemrec in input.Item_Details
{
//if(itemrec.Part_No.Part_No == "100166" || itemrec.Part_No.Part_No == "100044")
if(itemrec.Part_No.Part_No == "100166")
{
//thisapp.Books.Adjust_Item_Inventory_in_zbooks(itemrec.ID);
//thisapp.Inventory.update_books_stock_details(itemrec.ID);
}
}
if(var == 1)
{
openUrl("#Form:Alert_Messages?Status=" + "GIN" + "&Value=" + input.GIN_Number + "&zc_LoadIn=dialog","same window");
}
else
{
openUrl("#Form:GIN","same window");
}
}
catch (e)
{
sendmail
[
from :"erp@carrierwheels.com"
to :"parthasarathy.m@synprosoft.com"
subject :"GIN Created Or Edited Successful Form Submission try & catch" + input.ID
message :e
]
}
emptylist = List();
//move the status into form mode to handle.
if(input.Form_Mode == null || input.Form_Mode == "")
{
input.Form_Mode = "Direct GIN";
//info Form_Mode;
}
if(input.Status == "GIN against MRQ" && input.Material_Request_Subform_record_id != emptylist || input.Material_Request_Subform_record_id != null)
{
input.Form_Mode = "GIN against MRQ";
hide Item_Details.Available_Qty;
hide Item_Details.Block_Qty;
input.Status = "";
matreqsf = Material_Request_Subform[ID == input.Material_Request_Subform_record_id];
Material_Req_Exis_ID = matreqsf.Material_Req_Exis_ID;
mat_req = Material_Request[ID == Material_Req_Exis_ID];
input.Material_Request_RECID = Material_Req_Exis_ID;
input.Warehouse = matreqsf.Material_Req_Exis_ID.Warehouse;
input.Work_Order_No = matreqsf.Material_Req_Exis_ID.Work_Order_No;
input.Finished_Good = mat_req.FG_Part_Description;
mrn = mat_req.Material_Request_No;
input.Project_Name = Zoho_Projects_Data[ID == mat_req.Project_Name].ID;
input.Machine_Name = Machine_Master[ID == mat_req.Machine_Name].ID;
input.Status = "Draft";
input.Request_raised_By = mat_req.Request_Raised_By;
//input.Department = Department[ID==mat_req.Department].Department_Name;
input.Request_Date = mat_req.Request_Date;
//info mat_req.Material_Type;
input.Material_Request_Type = mat_req.Material_Type;
//input.Project_Name = ifnull(mat_req.Project_Name,"");
row1 = Goods_Issued_Note.Item_Details();
i = 0;
grstot = 0;
for each i1 in matreqsf
{
i = i + 1;
//Store will issue Itmes from Satellite stores and engineering stores - erp channel - 14/12/2024 from user.
//inv = Inventory[Part_No == i1.Part_No && Warehouse == input.Warehouse && Total_Qty > 0];
inv = Inventory[Part_No == i1.Part_No && Warehouse == input.Warehouse && Total_Qty > 0 && Location_Name.Location__Name == "Satellite Stores" || Location_Name.Location__Name == "Engineering Stores"];
//info inv;
fet_stockvalue = Stock_Value[Part_No == i1.Part_No] sort by Unit_Price desc;
row1.S_No=i;
row1.Part_No=i1.Part_No;
row1.Part_Description=i1.Part_Description;
row1.Material_Type=i1.Material_Type;
row1.Unit_of_Measurement=i1.UoM;
row1.Required_Quantity=ifnull(i1.Required_Qty,0.00);
row1.Quantity_issued_so_far=ifnull(i1.Quantity_issued_so_far,0);
row1.Specification=i1.Specification;
if(i1.Quantity_issued_so_far > 0 && i1.Required_Qty > 0)
{
if(i1.Quantity_issued_so_far > i1.Required_Qty)
{
row1.Issued_Quantity=ifnull(i1.Quantity_issued_so_far,0) - ifnull(i1.Required_Qty,0);
}
}
else
{
row1.Issued_Quantity=ifnull(i1.Required_Qty,0);
}
//row1.Issued_Quantity=ifnull(i1.Required_Qty,0) - ifnull(i1.Quantity_issued_so_far,0);
//row1.Sub_Total=row1.Issued_Quantity * row1.Rate;
//new function is written to calculate the rate by Mr.Varun - dt 5/12/2023 - Mail on 5/12/2023
//row1.Rate=fet_stockvalue.Unit_Price;
getrate = thisapp.Stock_Value.Average_Stock_Value(row1.Part_No,row1.Issued_Quantity);
row1.Rate=ifnull(getrate,0);
if(row1.Issued_Quantity > 0 && row1.Rate > 0)
{
sub = ifnull(row1.Issued_Quantity,0) * ifnull(row1.Rate,0);
}
grstot = ifnull(grstot,0) + ifnull(sub,0);
//row1.Sub_Total=sub;
row1.Value=sub;
row1.Balance_Quantity=0.00;
row1.Stock_Quantity=ifnull(inv.Total_Qty,0.00);
row1.Available_Qty=ifnull(inv.Available_Qty,0.00);
row1.Block_Qty=ifnull(inv.Block_Qty,0.00);
row1.Work_Order_No=i1.Work_Order_No;
row1.Sales_Order_No=i1.Sales_Order_No;
row1.Material_Request_No=Material_Req_Exis_ID.Material_Request_No;
row1.Material_Request_Subform_lu=i1.ID;
row1.Material_type_from_mrq=Material_Req_Exis_ID.Material_Type;
row1.Location=inv.Location_Name.getall();
row1.Sub_Location=inv.Sub_Location.getall();
row1.Racks_Bins=inv.Rack_Number.getall();
input.Item_Details.insert(row1);
}
input.Grand_Total1 = grstot;
for each row2 in input.Item_Details
{
if(row2.Racks_Bins != null)
{
ava = 0;
for each i1 in row2.Racks_Bins
{
inv2 = Inventory[Warehouse == input.Warehouse && Part_No == row2.Part_No && Location_Name == row2.Location && Sub_Location == row2.Sub_Location && Rack_Number == i1 && Total_Qty > 0];
//info inv2;
ava = ava + ifnull(inv2.Available_Qty,0.0);
}
row2.Stock_Quantity=ifnull(ava,0.00);
row2.Qty_after_Issued=ifnull(row2.Stock_Quantity,0.0) - ifnull(row2.Issued_Quantity,0.0);
//info row2.Qty_after_Issued;
}
}
disable Request_raised_By;
disable Request_Date;
disable Material_Request_Type;
}
else if(input.Form_Mode == "GIN against WO")
{
disable Item_Details.Available_Qty;
disable Item_Details.Block_Qty;
input.Status = "";
matreqsf = Material_Request_Subform[ID == input.Material_Request_Subform_record_id];
Material_Req_Exis_ID = matreqsf.Material_Req_Exis_ID;
mat_req = Material_Request[ID == Material_Req_Exis_ID];
input.Material_Request_RECID = Material_Req_Exis_ID;
input.Warehouse = matreqsf.Material_Req_Exis_ID.Warehouse;
input.Work_Order_No = matreqsf.Material_Req_Exis_ID.Work_Order_No;
input.Finished_Good = mat_req.FG_Part_Description;
mrn = mat_req.Material_Request_No;
input.Project_Name = Zoho_Projects_Data[ID == mat_req.Project_Name].ID;
input.Machine_Name = Machine_Master[ID == mat_req.Machine_Name].ID;
input.Status = "Draft";
input.Request_raised_By = mat_req.Request_Raised_By;
input.Request_Date = mat_req.Request_Date;
input.Material_Request_Type = mat_req.Material_Type;
partno_list = List();
qtylist = List();
mymap = Map();
qtymap = Map();
for each bomrec in matreqsf
{
partno_list.add(bomrec.Part_No);
qtyvar = ifnull(qtymap.get(bomrec.Part_No),0) + bomrec.Required_Qty;
qtymap.put(bomrec.Part_No,qtyvar);
//partno_list.add(bomrec.Required_Qty);
}
partno_list.sort();
i = 0;
grstot = 0;
for each recpartlist in partno_list.distinct()
{
row1 = Goods_Issued_Note.Item_Details();
mrqsflist = Material_Request_Subform[ID = input.Material_Request_Subform_record_id && Part_No == recpartlist];
mymap.put("Partno",recpartlist);
mymap.put("partdesc",mrqsflist.Part_Description);
i = i + 1;
getinv = Inventory[Part_No == mrqsflist.Part_No && Warehouse == input.Warehouse && Total_Qty > 0];
getin = Inventory[Part_No == mrqsflist.Part_No && Location_Name.Location__Name != "Production WIP"].sum(Total_Qty);
////Store will issue Itemss from Satellite stores and engineering stores - erp channel - 14/12/2024 from user.
getstokqty = Inventory[Part_No == mrqsflist.Part_No && Warehouse == input.Warehouse && Total_Qty > 0 && Location_Name.Location__Name == "Satellite Stores" || Location_Name.Location__Name == "Engineering Stores"].sum(Total_Qty);
//info "getstokqty " + getstokqty;
fet_stockvalue = Stock_Value[Part_No == mrqsflist.Part_No] sort by Unit_Price desc;
row1.S_No=i;
row1.Part_No=recpartlist;
row1.Part_Description=mrqsflist.Part_Description;
row1.Material_Type=mrqsflist.Material_Type;
row1.Unit_of_Measurement=mrqsflist.UoM;
qtv = qtymap.get(mrqsflist.Part_No);
//info "line 155 qty " + qtv;
row1.Required_Quantity=qtv;
row1.Quantity_issued_so_far=ifnull(mrqsflist.Quantity_issued_so_far,0);
row1.Specification=mrqsflist.Specification;
if(mrqsflist.Quantity_issued_so_far > 0 && mrqsflist.Required_Qty > 0)
{
if(mrqsflist.Quantity_issued_so_far > qtv)
{
row1.Issued_Quantity=ifnull(mrqsflist.Quantity_issued_so_far,0) - ifnull(qtv,0);
}
else if(mrqsflist.Quantity_issued_so_far < qtv)
{
row1.Issued_Quantity=ifnull(qtv,0) - ifnull(mrqsflist.Quantity_issued_so_far,0);
}
}
else
{
row1.Issued_Quantity=ifnull(qtv,0);
}
getrate = thisapp.Stock_Value.Average_Stock_Value(row1.Part_No,row1.Issued_Quantity);
if(getrate == null)
{
getrate = Stock_Value[Part_No == row1.Part_No && Unit_Price > 0].Unit_Price sort by Added_Time asc;
}
if(getrate > 0 || getrate != null)
{
row1.Rate=ifnull(getrate,0);
sub = ifnull(row1.Issued_Quantity,0) * ifnull(row1.Rate,0);
}
grstot = ifnull(grstot,0) + ifnull(sub,0);
//row1.Sub_Total=sub;
row1.Value=sub;
row1.Balance_Quantity=0.00;
//Stock Quantity should be from engineering and satellite locations only - 16/12/2024
//row1.Stock_Quantity=ifnull(getinv.Total_Qty,0.00);
// row1.Stock_Quantity=ifnull(getin,0);
row1.Stock_Quantity=ifnull(getstokqty,0);
row1.Available_Qty=ifnull(getinv.Available_Qty,0.00);
row1.Block_Qty=ifnull(getinv.Block_Qty,0.00);
row1.Work_Order_No=mrqsflist.Work_Order_No;
row1.Sales_Order_No=mrqsflist.Sales_Order_No;
row1.Material_Request_No=Material_Req_Exis_ID.Material_Request_No;
row1.Material_Request_Subform_lu=mrqsflist.ID;
row1.Material_type_from_mrq=Material_Req_Exis_ID.Material_Type;
// row1.Location=getinv.Location_Name.getall();
// row1.Sub_Location=getinv.Sub_Location.getall();
// row1.Racks_Bins=getinv.Rack_Number.getall();
input.Item_Details.insert(row1);
}
input.Grand_Total1 = grstot;
for each row2 in input.Item_Details
{
if(row2.Racks_Bins != null)
{
ava = 0;
for each mrqsflist in row2.Racks_Bins
{
////Store will issue Itemss from Satellite stores and engineering stores - erp channel - 14/12/2024 from user.
//inv2 = Inventory[Warehouse == input.Warehouse && Part_No == row2.Part_No && Location_Name == row2.Location && Sub_Location == row2.Sub_Location && Rack_Number == mrqsflist && Total_Qty > 0];
inv2 = Inventory[Warehouse == input.Warehouse && Part_No == row2.Part_No && Location_Name.Location__Name == "Satellite Stores" || Location_Name.Location__Name == "Engineering Stores" && Rack_Number == mrqsflist && Total_Qty > 0];
//info inv2;
ava = ava + ifnull(inv2.Available_Qty,0.0);
}
row2.Stock_Quantity=ifnull(ava,0.00);
row2.Qty_after_Issued=ifnull(row2.Stock_Quantity,0.0) - ifnull(row2.Issued_Quantity,0.0);
//info row2.Qty_after_Issued;
}
}
disable Request_raised_By;
disable Request_Date;
disable Material_Request_Type;
}
getmrp = MRP[Work_Order_Subform_ID == input.ID];
getmrpsub = MRP_Subform_CWPL[MRP_Exis_ID == getmrp.ID];
fet_wosub = Work_Order_Subform[ID == input.ID];
fet_wo = Work_Order[ID == fet_wosub.Work_Order_Exis_ID];
fet_bom = Create_BOM[Part_No == fet_wosub.Part_No];
fetsubbom = BoM_FG_Subform[BOM_FG_Exis_ID == fet_bom.ID];
//info fetsubbom.count();
if(fetsubbom.count() == 0)
{
openUrl("#Form:Alert_Messages?Status=MRPbom_Alert&Value=BoM not created! Create BoM for this Material. &zc_LoadIn=dialog","same window");
}
else if(getmrp.MRP_Status == null && fet_wosub.WO_Qty != 0)
{
openUrl("#Form:MRP?Work_Order_Subform_ID=" + input.ID,"same window");
}
else if(getmrp.MRP_Status == "MRP Reverted")
{
openUrl("#Form:MRP?Work_Order_Subform_ID=" + input.ID,"same window");
}
else if(fet_wosub.Work_Order_Status == "MRP Rejected")
{
openUrl("#Form:MRP?Work_Order_Subform_ID=" + input.ID,"same window");
}
else if(getmrp.MRP_Status == "Draft")
{
openUrl("#Form:MRP?recLinkID=" + getmrp.ID + "&viewLinkName=MRP_Report&Form_Mode=DraftMRP","same window");
}
else if(fet_wosub.WO_Qty <= 0)
{
openUrl("#Form:Alert_Messages?Status=MRP_Alert&Value=Stock available for this WorkOrder. <br>Not Required MRP! &zc_LoadIn=dialog","same window");
}
else
{
openUrl("#Form:MRP?Work_Order_Subform_ID=" + input.ID,"same window");
}
void Dispatch_Note.Dispatch(int ID)
{
openUrl("#Form:Create_Dispatch_Note_Format?recLinkID=" + ID + "&viewLinkName=Dispatch_Note_Actual&Dispatch_Type=Actual","popup window");
}
for each deliv in input.Despatch_Schedule
{
if(deliv.Part_No == row.Part_No)
{
deliv.Full_Quantity=false;
}
}
for each r in input.Despatch_Schedule
{
b = r.S_No - 1;
r.S_No=b;
if(r.S_No < row.S_No)
{
b = b + 1;
r.S_No=b;
}
}
for each r in input.Item_Details
{
b = ifnull(r.S_No,0) - 1;
r.S_No=b;
if(r.S_No < row.S_No)
{
b = b + 1;
r.S_No=b;
}
}
input.Gross_Total = ifnull(input.Gross_Total,0.0) - ifnull(row.Sub_Total,0.0);
input.Total_Quantity = ifnull(input.Total_Quantity,0.0) - ifnull(row.Qty,0.0);
if(input.Gross_Total == 0)
{
input.Gross_Total = 0;
input.Total_Quantity = null;
input.Discount = null;
input.Discount_Amount = 0;
input.Discount_Amount = null;
hide Discount_Amount;
input.Discount_Percentage = null;
hide Discount_Percentage;
input.Final_Gross_Total = 0;
input.Total_Taxes = null;
input.Grand_Total = null;
input.Gross_with_Discount = null;
input.Gross_Value_Tax = null;
input.Gross_Total_with_Discount = null;
input.Packing_Forwarding = null;
input.PF_Total_with_tax = null;
input.PF_Tax_value = null;
}
for each rec in input.Despatch_Schedule
{
if(rec.Part_No == row.Part_No)
{
rec.Part_No=null;
rec.Quantity=null;
rec.Delivery_Date=null;
}
}
itemlist = List();
qtyList = List();
dateList = List();
remarksList = List();
fullQtyList = List();
for each rec in input.Despatch_Schedule
{
if(rec.Part_No != null)
{
itemlist.add(rec.Part_No);
qtyList.add(rec.Quantity);
dateList.add(rec.Delivery_Date);
remarksList.add(rec.Remarks);
fullQtyList.add(rec.Full_Quantity);
}
}
input.Despatch_Schedule.clear();
i = 0;
s_no = 0;
for each items in itemlist
{
s_no = s_no + 1;
row1 = Sales_Order.Despatch_Schedule();
row1.S_No=s_no;
row1.Part_No=items;
row1.Quantity=qtyList.get(i);
row1.Delivery_Date=dateList.get(i);
row1.Remarks=remarksList.get(i);
row1.Full_Quantity=fullQtyList.get(i);
input.Despatch_Schedule.insert(row1);
i = i + 1;
}
//Grand total adjustment
input.Grand_Total = ifnull(input.Grand_Total,0.0) - ifnull(row.Total_Amount,0.0);
i = 0;
for each rec_sn in input.Despatch_Schedule
{
i = i + 1;
row.S_No=i;
}
//For Delivery Schedule
clear row.Part_No;
item_list = List();
deliv_list = List();
for each an_item in input.Item_Details
{
item_list.add(an_item.Part_Description);
}
for each deliv in input.Despatch_Schedule
{
if(deliv.Part_No != null && deliv.Full_Quantity == true)
{
deliv_list.add(deliv.Part_No);
}
}
item_list.removeAll(deliv_list);
row.Part_No:ui.add(item_list.sort(true));
if(item_list.size() > 0)
{
row.Part_No=item_list.get(0);
//Setting Quantity
for each rec in input.Item_Details
{
if(rec.Qty < 1)
{
alert "Please enter quantity for all the item(s) in Item Details ";
row.Quantity=null;
}
else
{
tot = 0.0;
for each rec1 in input.Despatch_Schedule
{
if(rec1.Part_No == rec.Part_Description)
{
tot = tot + ifnull(rec1.Quantity,0.0);
}
}
if(rec.Part_Description == row.Part_No)
{
row.Quantity=if(tot > 0,rec.Qty - tot,rec.Qty);
row.Delivery_Date=if(tot > 0,null,input.Expected_Shipment_Date);
row.Specification=rec.Remarks_multiline;
row.Full_Quantity=true;
}
}
}
}
i = 0;
for each rec_sn in input.Item_Details
{
i = i + 1;
row.S_No=i;
}
//item details part no should be loaded from customer pricing master based on customer selected as per user requirement-7/3/2023,if not in master then load asusal
clear row.Part_No;
clear row.Part_Description;
if(input.Sales_Type != "Tooling" && input.Sales_Type != "Research & Development Charges")
{
getcust = Customer_Pricing_Master[Customer_Name == input.Customer_Name && Status == "Active"];
if(getcust.count() > 0)
{
//Remove the Part No available in Regular Item master for contract- User Requirement - MR.Senthil - 14/03/2024 - will open after production
//if input.Sales_Type == "Contract"
//{
//regularitem = Regular_Item_Master[ID != 0].Part_No.getAll();
//get_active = Customer_Pricing_subform[Customer_Pricing_Master_Recid == getcust.ID && sf_Status == "Active" && Part_No != regularitem].Part_No.getAll();
//}
//else
// {
get_active = Customer_Pricing_subform[Customer_Pricing_Master_Recid == getcust.ID && sf_Status == "Active"].Part_No.getAll();
// }
//info get_active;
row.Part_No:ui.add(get_active);
//To restrict choosing same items
clear row.Part_Description;
//Remove the Part No available in Regular Item master for contract- User Requirement - MR.Senthil - 14/03/2024 - will open after production
//if input.Sales_Type == "Contract"
//{
//regularitem = Regular_Item_Master[ID != 0].Part_No.getAll();
//get_active = Customer_Pricing_subform[Customer_Pricing_Master_Recid == getcust.ID && sf_Status == "Active" && Part_No != regularitem].Part_No.getAll();
//}
//else
// {
prdcts = Customer_Pricing_subform[ID == getcust.ID && sf_Status == "Active"].Part_No.getAll();
// }
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_No != 0)
{
toadd = Materials[ID == prd.Part_Description].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_Description:ui.add(addproduct);
clear row.Part_No;
//Remove the Part No available in Regular Item master for contract- User Requirement - MR.Senthil - 14/03/2024 - will open after production
//if input.Sales_Type == "Contract"
//{
//regularitem = Regular_Item_Master[ID != 0].Part_No.getAll();
//get_active = Customer_Pricing_subform[Customer_Pricing_Master_Recid == getcust.ID && sf_Status == "Active" && Part_No != regularitem].Part_No.getAll();
//}
//else
// {
prdcts = Customer_Pricing_subform[Customer_Pricing_Master_Recid == getcust.ID && sf_Status == "Active"].Part_No.getAll();
//}
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_No != 0)
{
toadd = Materials[ID == prd.Part_No].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_No:ui.add(addproduct);
}
}
else
{
//New Sale type Research & Development Charges - Mail Dated 29/11/2023 -Parthasarathy
if(input.Sales_Type == "Tooling")
{
prdcts = Materials[Category.Category == "Tooling" && Status == "Active"].ID.getAll();
}
else if(input.Sales_Type == "Research & Development Charges")
{
prdcts = Materials[Category.Category == "R&D" && Status == "Active"].ID.getAll();
}
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_Description != 0)
{
toadd = Materials[ID == prd.Part_Description].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_Description:ui.add(addproduct);
clear row.Part_No;
if(input.Sales_Type == "Tooling")
{
prdcts = Materials[Category.Category == "Tooling" && Status == "Active"].ID.getAll();
}
else if(input.Sales_Type == "Research & Development Charges")
{
prdcts = Materials[Category.Category == "R&D" && Status == "Active"].ID.getAll();
}
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_No != 0)
{
toadd = Materials[ID == prd.Part_No].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_No:ui.add(addproduct);
}
//below code is blocked as per user request - 01/04/2023
/*if(getcust.count() == 0)
{
clear row.Part_No;
clear row.Part_Description;
prdcts = Materials[ID != 0 && Material_Item_Type.Material_Type == "CWPL Products" && CRM_Sync == "Yes"].ID.getAll();
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_Description != 0)
{
toadd = Materials[ID == prd.Part_Description].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_Description:ui.add(addproduct);
clear row.Part_No;
prdcts = Materials[ID != 0 && Material_Item_Type.Material_Type == "CWPL Products" && CRM_Sync == "Yes"].ID.getAll();
addproduct = List();
addproduct.addAll(prdcts);
remproduct = List();
for each prd in input.Item_Details
{
if(prd.Part_No != 0)
{
toadd = Materials[ID == prd.Part_No].ID;
remproduct.add(toadd);
}
}
addproduct.removeAll(remproduct);
row.Part_No:ui.add(addproduct);
}*/
Created or Edited -> User input of Item Details.Part_Description -> ItemDeatils_PartDesc_Validations
if(row.Part_Description != null)
{
check_same_item = 0;
for each rec in input.Item_Details
{
if(rec.Part_Description == row.Part_Description)
{
check_same_item = check_same_item + 1;
}
}
if(check_same_item == 2)
{
alert "You have already entered the same item";
row.Part_Description=null;
}
else
{
mat_data = Materials[ID == row.Part_Description];
row.Rate=ifnull(mat_data.Selling_Price,0.0);
row.Part_No=mat_data.ID;
/*-------------------------Tax Showing----------------------------*/
if(input.Place_of_Supply.Inside_India == "Yes")
{
tax_det = if(input.Customer_Name.Destination.Short_Name == "" || input.Customer_Name.Destination.Short_Name == null,if(input.Place_of_Supply.Short_Name == "TN",mat_data.GST_Details,mat_data.IGST_Details),if(input.Customer_Name.Destination.Short_Name == "TN",mat_data.GST_Details,mat_data.IGST_Details));
}
else
{
tax_det = GST_Details[Tax_Name == "IGST0"].ID;
}
/*-----------------------End-------------------------------------------------------------------------------*/
row.Tax=tax_det;
row.UoM=row.Part_Description.Primary_UoM;
row.Remarks_multiline=row.Part_Description.Specification;
//Check Stock Summary
row.Stock_FG_Qty=ifnull(Inventory[Part_No == row.Part_No && Part_Description == row.Part_Description].Available_Qty,0.0);
}
}
if(row.Part_No != null)
{
mat_data = Materials[ID == row.Part_No];
getcustdet = Customer_Pricing_subform[Part_No == row.Part_No && Customer_Name == input.Customer_Name && sf_Status == "Active"];
if(getcustdet.count() > 0)
{
getcustdet = Customer_Pricing_subform[Part_No == row.Part_No && Customer_Name == input.Customer_Name && sf_Status == "Active"];
row.Part_Description=getcustdet.Part_Description;
row.UoM=Materials[ID == getcustdet.Part_No].Primary_UoM;
// row.Rate=getcustdet.Price;
row.Rate=getcustdet.Settled_Price;
row.Tax=getcustdet.Tax;
row.Packing_Std=getcustdet.Packaging;
row.Customer_Part_Code=getcustdet.Customer_Part_Code;
row.HSN_Code=mat_data.HSN_SAC;
row.Classification=mat_data.Classification;
}
if(getcustdet.count() == 0 && input.Sales_Type == "Tooling" || input.Sales_Type == "Research & Development Charges")
{
row.Part_Description=mat_data.ID;
if(input.Place_of_Supply.Inside_India == "Yes")
{
if(input.Place_of_Supply.Short_Name == "UP")
{
row.Tax=row.Part_No.GST_Details;
}
else
{
row.Tax=row.Part_No.IGST_Details;
}
}
//row.Tax=tax_det;
}
row.UoM=row.Part_Description.Primary_UoM;
row.Stock_FG_Qty=ifnull(Inventory[Part_No == row.Part_No].sum(Available_Qty),0.0);
row.Stock_SFG_Qty=ifnull(Semi_Finished_Goods_Summary[Part_No == row.Part_No && Part_Description == row.Part_Description && Warehouse == input.Warehouse].Available_Qty,0.0);
}
else
{
row.Part_Description=null;
row.Remarks_multiline=null;
row.Rate=null;
row.Stock_FG_Qty=0.0;
row.Stock_SFG_Qty=0.0;
}
for each rec in input.Despatch_Schedule
{
if(rec.Part_No == row.Part_No)
{
rec.Part_No=null;
}
}
for each var in input.Item_Details
{
row.Blocke_Qty=Inventory[Part_No == row.Part_No && Part_Description == row.Part_Description].Block_Qty;
}
if(input.Place_of_Supply.Short_Name != "UP")
{
if(row.Tax != null)
{
if(row.Tax.Tax_Name.startswith("G") == True)
{
alert "Tax should be IGST for this customer.Tax configured as " + row.Tax.Tax_Name + " Pls check";
row.Tax=null;
}
}
}
//set the tax percentage since its same for all the line items
input.TaxP = row.Tax;
if(row.Rate != null && row.Qty != null && row.Tax != null)
{
get_tax_value = GST_Details[ID == ifnull(row.Tax,"")].Total_Rate;
Tax_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0) * ifnull(get_tax_value,0.0) / 100;
amount_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0);
row.Sub_Total=ifnull(amount_calc,0.00);
row.Tax_Value=Tax_calc;
row.Total_Amount=ifnull(amount_calc,0.0) + ifnull(Tax_calc,0.0);
tot = 0.0;
totqty = 0.0;
subtot = 0.0;
for each rec1 in Item_Details
{
tot = tot + ifnull(rec1.Total_Amount,0.0);
totqty = totqty + ifnull(rec1.Qty,0.0);
subtot = subtot + ifnull(rec1.Sub_Total,0.0);
}
input.Item_Total = tot;
input.Overall_Total = ifnull(input.Item_Total,0.0) + ifnull(input.Extra_Charge_s_Total,0.0);
//new field calculation starts here - 1/4/2023
input.Total_Quantity = ifnull(totqty,0.0);
input.Gross_Total = ifnull(subtot,0.0);
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0);
if(input.Discount_Amount > 0)
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0) - ifnull(input.Discount_Amount,0.0);
input.Overall_Total = ifnull(input.Overall_Total,0.0) - ifnull(input.Discount_Amount,0.0);
}
else
{
input.Gross_with_Discount = ifnull(input.Gross_with_Discount,0.0);
}
get_tax_value = GST_Details[ID == ifnull(input.TaxP,"")].Total_Rate;
if(get_tax_value == 0)
{
input.Gross_Value_Tax = 0;
}
else
{
Tax_calc = ifnull(input.Gross_with_Discount,0.0) * ifnull(get_tax_value,0.0) / 100;
input.Tax_Total = ifnull(Tax_calc,0.0);
input.Gross_Value_Tax = ifnull(Tax_calc,0.0);
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0) + ifnull(input.Gross_Value_Tax,0.0);
}
if(input.Packing_Forwarding > 0)
{
Tax_calc1 = ifnull(input.Packing_Forwarding,0.0) * ifnull(get_tax_value,0.0) / 100;
input.PF_Tax_value = ifnull(Tax_calc1,0.0);
input.PF_Total_with_tax = ifnull(input.Packing_Forwarding,0.0) + ifnull(input.PF_Tax_value,0.0);
}
input.Grand_Total = ifnull(input.Gross_Total_with_Discount,0.0) + ifnull(input.PF_Total_with_tax,0.0);
//new fields calculation ends
}
if(row.Rate != null && row.Qty != null && row.Tax != null)
{
get_tax_value = GST_Details[ID == row.Tax].Total_Rate;
Tax_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0) * ifnull(get_tax_value,0.0) / 100;
amount_calc = row.Qty * row.Rate;
row.Sub_Total=ifnull(amount_calc,0.00);
row.Tax_Value=Tax_calc;
row.Total_Amount=ifnull(amount_calc,0.0) + ifnull(Tax_calc,0.0);
tot = 0.0;
for each rec in Item_Details
{
tot = tot + ifnull(rec.Total_Amount,0.0);
}
input.Item_Total = tot;
input.Overall_Total = ifnull(input.Item_Total,0.0) + ifnull(input.Extra_Charge_s_Total,0.0);
// // new fields caluclation - 1/4/2023 - stats
// input.Gross_Total = ifnull(input.Gross_Total,0.0) + ifnull(row.Sub_Total,0.0)+ifnull(input.Tax_Total,0.0);
// input.Tax_Total = ifnull(input.Tax_Total,0.0)+ifnull(row.Tax_Value,0.0);
// // new fields calculation ends
}
if(row.Tax == null)
{
row.Tax_Value=0.0;
row.Total_Amount=ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0);
tot1 = 0.0;
for each rec in Item_Details
{
tot1 = tot1 + rec.Total_Amount;
}
input.Item_Total = tot1;
input.Overall_Total = ifnull(input.Item_Total,0.0) + ifnull(input.Extra_Charge_s_Total,0.0);
}
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<meta name="viewport" content="width=device-width, initial-scale=1.0">
<title>Document</title>
</head>
<body>
<h1> CHAI OR CODE </h1>
<button id = "stop ">stop </button>
</body>
<script>
////////////////////***** 1 WAY ***//////////////
setTimeout(function(){
consol.log("HITESH"); ///after 2 sec it will excute
},2000) // only 1 time will excute
////////////////////***** 2 WAY ***//////////////
const sayhitesh = function (){
console.log("tanishq");
}
const changeText = function () {
document.querySelector('h1').innerHTML = "best js course on yt"; // change the h1
};
const changeMe = setTimeout(changeText, 2000); // changeText will execute after 2 seconds
document.querySelector('#stop'). //// function to stop the changetext option
addEventListener('click', function () { // if we press stop button it will stop the excution of changing of h1
clearTimeout(changeMe)
console.log("STOPPED")
})
</script>
</html>
//For Negative validation Check
if(row.Rate < 0 && row.Rate != null)
{
alert "Please enter positive values";
row.Rate=null;
}
else
{
get_tax_value = GST_Details[ID == ifnull(row.Tax,"")].Total_Rate;
Tax_calc = ifnull(row.Qty,0) * ifnull(row.Rate,0) * ifnull(get_tax_value,0) / 100;
amount_calc = ifnull(row.Qty,0) * ifnull(row.Rate,0);
row.Sub_Total=ifnull(amount_calc,0.00);
row.Tax_Value=ifnull(Tax_calc,0);
row.Total_Amount=ifnull(amount_calc,0) + ifnull(Tax_calc,0);
//alert amount_calc + Tax_calc;
tot = 0.0;
subtot = 0.0;
totqty = 0.0;
for each rec in Item_Details
{
tot = tot + ifnull(rec.Total_Amount,0.0);
totqty = totqty + ifnull(rec.Qty,0.0);
subtot = subtot + ifnull(rec.Sub_Total,0.0);
}
input.Item_Total = tot;
input.Overall_Total = tot + ifnull(input.Extra_Charge_s_Total,0.0);
//new field calculation starts here - 1/4/2023
//input.Gross_Total = ifnull(input.Gross_Total,0.0) + ifnull(row.Sub_Total,0.0);
//input.Grand_Total = ifnull(input.Gross_Total,0.0);
input.Total_Quantity = ifnull(totqty,0.0);
input.Gross_Total = ifnull(subtot,0.0);
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0);
if(input.Discount_Amount > 0)
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0) - ifnull(input.Discount_Amount,0.0);
input.Overall_Total = ifnull(input.Overall_Total,0.0) - ifnull(input.Discount_Amount,0.0);
}
else
{
input.Gross_with_Discount = ifnull(input.Gross_with_Discount,0.0);
}
get_tax_value = GST_Details[ID == ifnull(input.TaxP,"")].Total_Rate;
if(get_tax_value == 0)
{
input.Gross_Value_Tax = 0;
// input.Grand_Total = ifnull(input.Gross_Total_after_Discount_PF,0.0);
}
else
{
Tax_calc = ifnull(input.Gross_with_Discount,0.0) * ifnull(get_tax_value,0.0) / 100;
input.Tax_Total = ifnull(Tax_calc,0.0);
input.Gross_Value_Tax = ifnull(Tax_calc,0.0);
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0) + ifnull(input.Gross_Value_Tax,0.0);
// input.Grand_Total = ifnull(input.Gross_Total_after_Discount_PF,0.0) + ifnull(input.Tax_Total,0.0);
}
if(input.Packing_Forwarding > 0)
{
Tax_calc1 = ifnull(input.Packing_Forwarding,0.0) * ifnull(get_tax_value,0.0) / 100;
input.PF_Tax_value = ifnull(Tax_calc1,0.0);
input.PF_Total_with_tax = ifnull(input.Packing_Forwarding,0.0) + ifnull(input.PF_Tax_value,0.0);
}
input.Grand_Total = ifnull(input.Gross_Total_with_Discount,0.0) + ifnull(input.PF_Total_with_tax,0.0);
//new fields calculation ends
}
getsprice = Customer_Pricing_subform[Part_No == row.Part_No && Packaging == row.Packing_Std && Customer_Name == input.Customer_Name && sf_Status == "Active"];
row.Rate=getsprice.Settled_Price;
if(row.Rate != null && row.Qty != null && row.Tax != null)
{
get_tax_value = GST_Details[ID == ifnull(row.Tax,"")].Total_Rate;
Tax_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0) * ifnull(get_tax_value,0.0) / 100;
amount_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0);
row.Sub_Total=ifnull(amount_calc,0.00);
row.Tax_Value=Tax_calc;
row.Total_Amount=ifnull(amount_calc,0.0) + ifnull(Tax_calc,0.0);
tot = 0.0;
totqty = 0.0;
subtot = 0.0;
for each rec in Item_Details
{
tot = tot + ifnull(rec.Total_Amount,0.0);
totqty = totqty + ifnull(rec.Qty,0.0);
subtot = subtot + ifnull(rec.Sub_Total,0.0);
}
input.Item_Total = tot;
input.Overall_Total = ifnull(input.Item_Total,0.0) + ifnull(input.Extra_Charge_s_Total,0.0);
input.Total_Quantity = ifnull(totqty,0.0);
//new field calculation starts here - 1/4/2023
input.Gross_Total = ifnull(subtot,0.0);
if(input.Discount_Amount > 0)
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0) - ifnull(input.Discount_Amount,0.0);
}
else
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0);
}
get_tax_value = GST_Details[ID == ifnull(input.TaxP,"")].Total_Rate;
if(get_tax_value == 0)
{
input.Gross_Value_Tax = 0;
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0);
}
else
{
Tax_calc = ifnull(input.Gross_with_Discount,0.0) * ifnull(get_tax_value,0.0) / 100;
input.Tax_Total = ifnull(Tax_calc,0.0);
input.Gross_Value_Tax = ifnull(Tax_calc,0.0);
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0) + ifnull(input.Gross_Value_Tax,0.0);
}
if(input.Packing_Forwarding > 0)
{
if(get_tax_value == 0)
{
Tax_calc1 = 0;
}
else
{
Tax_calc1 = ifnull(input.Packing_Forwarding,0.0) * ifnull(get_tax_value,0.0) / 100;
}
input.PF_Tax_value = ifnull(Tax_calc1,0.0);
input.PF_Total_with_tax = ifnull(input.Packing_Forwarding,0.0) + ifnull(input.PF_Tax_value,0.0);
}
else
{
input.PF_Total_with_tax = 0;
}
input.Grand_Total = ifnull(input.Gross_Total_with_Discount,0.0) + ifnull(input.PF_Total_with_tax,0.0);
//new fields calculation ends
}
//For Adding subtotal field
if(row.Qty != null && row.Rate != null && row.Tax == null)
{
row.Sub_Total=row.Qty * row.Rate;
}
//rate is null
if(row.Rate == null)
{
row.Sub_Total=null;
row.Tax_Value=null;
row.Total_Amount=null;
}
//For Negative validation Check
for each var in input.Item_Details
{
var.Balance_Qty=var.Qty;
}
if(row.Qty <= 0 && row.Qty != null)
{
alert "Please enter positive values";
row.Qty=null;
}
else
{
if(row.Rate != null && row.Qty != null && row.Tax != null)
{
get_tax_value = GST_Details[ID == ifnull(row.Tax,"")].Total_Rate;
Tax_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0) * ifnull(get_tax_value,0.0) / 100;
amount_calc = ifnull(row.Qty,0.0) * ifnull(row.Rate,0.0);
row.Sub_Total=ifnull(amount_calc,0.00);
row.Tax_Value=Tax_calc;
row.Total_Amount=ifnull(amount_calc,0.0) + ifnull(Tax_calc,0.0);
tot = 0.0;
totqty = 0.0;
subtot = 0.0;
for each rec in Item_Details
{
tot = tot + ifnull(rec.Total_Amount,0.0);
totqty = totqty + ifnull(rec.Qty,0.0);
subtot = subtot + ifnull(rec.Sub_Total,0.0);
}
input.Item_Total = tot;
input.Overall_Total = ifnull(input.Item_Total,0.0) + ifnull(input.Extra_Charge_s_Total,0.0);
input.Total_Quantity = ifnull(totqty,0.0);
//new field calculation starts here - 1/4/2023
input.Gross_Total = ifnull(subtot,0.0);
if(input.Discount_Amount > 0)
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0) - ifnull(input.Discount_Amount,0.0);
}
else
{
input.Gross_with_Discount = ifnull(input.Gross_Total,0.0);
}
get_tax_value = GST_Details[ID == ifnull(input.TaxP,"")].Total_Rate;
if(get_tax_value == 0)
{
input.Gross_Value_Tax = 0;
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0);
}
else
{
Tax_calc = ifnull(input.Gross_with_Discount,0.0) * ifnull(get_tax_value,0.0) / 100;
input.Tax_Total = ifnull(Tax_calc,0.0);
input.Gross_Value_Tax = ifnull(Tax_calc,0.0);
input.Gross_Total_with_Discount = ifnull(input.Gross_with_Discount,0.0) + ifnull(input.Gross_Value_Tax,0.0);
}
if(input.Packing_Forwarding > 0)
{
if(get_tax_value == 0)
{
Tax_calc1 = 0;
}
else
{
Tax_calc1 = ifnull(input.Packing_Forwarding,0.0) * ifnull(get_tax_value,0.0) / 100;
}
input.PF_Tax_value = ifnull(Tax_calc1,0.0);
input.PF_Total_with_tax = ifnull(input.Packing_Forwarding,0.0) + ifnull(input.PF_Tax_value,0.0);
}
else
{
input.PF_Total_with_tax = 0;
}
input.Grand_Total = ifnull(input.Gross_Total_with_Discount,0.0) + ifnull(input.PF_Total_with_tax,0.0);
//new fields calculation ends
}
//For Adding subtotal field
if(row.Qty != null && row.Rate != null && row.Tax == null)
{
row.Sub_Total=row.Qty * row.Rate;
}
fet_deli = Delivery_Schedule[Part_No == row.Part_No];
if(fet_deli.count() >= 1)
{
if(row.Qty > fet_deli.sum(Quantity))
{
fet_deli.Full_Quantity=false;
}
}
}
if(row.Delivery_Date <= zoho.currentdate)
{
alert "Please enter future dates only";
row.Delivery_Date=null;
}
else if(row.Delivery_Date != null)
{
check_same_date = 0;
coun = 1;
for each rec in input.Despatch_Schedule
{
if(rec.Part_No == row.Part_No && rec.Delivery_Date == row.Delivery_Date)
{
check_same_date = check_same_date + 1;
}
}
//alert check_same_date;
if(check_same_date == 2)
{
alert "Already you have chosen the same date for the same item.Please Choose different delivery date";
row.Delivery_Date=null;
}
}
i = 0;
for each rec in input.Product_Details
{
if(rec.S_NO != row.S_NO)
{
i = i + 1;
rec.S_NO=i;
}
}
//Another Deletion of row code for S_No below
for each r in input.Returnable_Packing_Material
{
b = r.S_No - 1;
r.S_No=b;
if(r.S_No < row.S_No)
{
b = b + 1;
r.S_No=b;
}
}
i = 0;
for each rec in input.Returnable_Packing_Material
{
i = i + 1;
row.S_No=i;
}
if(input.Dispatch_Type == "Actual")
{
disp = 0;
disp1 = 0;
bal = 0;
so = Sales_Order[ID == input.Sales_Order_ID];
wo = Work_Order[Sales_Order_Nos.Sale_Order_No == so.Sale_Order_No];
invmain = Invoice[ID == input.Invoice_ID];
invsub = Invoice_Subform[Invoice_Exist_ID == invmain.ID];
if(input.Sales_Type == "Direct Order" || input.Sales_Type == "Tooling")
{
if(so.CWPL_SO_Status == "Dispatch Note Partial")
{
so.CWPL_SO_Status="Invoice Created";
}
}
for each rec in input.Product_Details
{
invsub.Dispatch_Actual_Date_Time=rec.Disp_Actual_Date_Time;
disp = ifNull(rec.Actual_Qty,0) + disp;
rec.Ac_so_far=ifNull(rec.Actual_Qty_so_far,0) + ifNull(rec.Actual_Qty,0);
rec.Balance_Qty=ifNull(rec.Balance_Qty,0) - ifNull(rec.Actual_Qty,0);
rec.Edit_stk_qty=ifNull(rec.Actual_Qty,0);
so = Sales_Order[ID == input.Sales_Order_ID];
bal = ifNull(rec.Balance_Qty,0) + bal;
if(rec.Balance_Qty < 0 || rec.Balance_Qty == rec.Actual_Qty)
{
rec.Balance_Qty=0;
}
if(rec.Actual_Qty == rec.Planned_Qty)
{
rec.Sales_Lost_Qty=0.0;
}
getsosub = Sale_Order_Subform[Sales_Order_Exis_ID == so.ID && Part_No == rec.Product_Code];
if(so.count() > 0)
{
get_inven = Inventory[Part_No == rec.Product_Code && Location_Name.Location__Name == "FG Warehouse"];
getstk = Inventory[Part_No == rec.Product_Code && Location_Name.Location__Name == "FG Warehouse"];
fetwo = Work_Order[Sales_Order_Nos == input.Sales_Order_No];
blksosub = Sale_Order_Subform[Part_No == rec.Product_Code && Sales_Order_Exis_ID.Sale_Order_No == input.Sales_Order_No.Sale_Order_No];
wosub = Work_Order_Subform[Part_No == blksosub.Part_No];
getsoblk = Sales_Order[ID == input.Sales_Order_ID];
if(getsosub.Balance_Qty < 0 || getsosub.Balance_Qty == getsosub.Actual_Qty_So_far)
{
getsosub.Balance_Qty=0;
}
if(get_inven.count() > 0 && get_inven.Available_Qty > 0 && rec.Block_Qty == 0 && getsosub.DQR_Blk_Qty == null || getsosub.DQR_Blk_Qty <= 0 && getsosub.Logistics_Status != "Logistics Confirmed" || getsosub.Logistics_Status == "" || getsosub.Logistics_Status == null)
{
get_inven.Available_Qty=ifNull(get_inven.Available_Qty,0) - rec.Actual_Qty;
get_inven.Total_Qty=ifNull(get_inven.Total_Qty,0) - rec.Actual_Qty;
if(get_inven.Available_Qty < 0)
{
get_inven.Available_Qty=0;
get_inven.Total_Qty=0;
}
}
//Below code is to use the block qty for dispatch, only for the logistics confirmed Sale Order. ---Commented on 06/12/2024
if(getsoblk.count() > 0 && getsosub.DQR_Blk_Qty > 0 && getstk.Block_Qty > 0 && input.Sales_Order_No == fetwo.Sales_Order_Nos && getsosub.Logistics_Status == "Logistics Confirmed")
{
if(getstk.count() > 0 && rec.Product_Code == wosub.Part_No && rec.Actual_Qty <= rec.Block_Qty)
{
getstk.Block_Qty=ifNull(getstk.Block_Qty,0) - ifnull(rec.Actual_Qty,0);
getstk.Total_Qty=ifNull(getstk.Total_Qty,0) - ifnull(rec.Actual_Qty,0);
fetwo.WO_Status="Dispatched";
getsosub.WO_Status_in_sosub="Dispatched";
}
else if(getstk.count() > 0 && rec.Product_Code == wosub.Part_No && rec.Actual_Qty > rec.Block_Qty)
{
balc = rec.Actual_Qty - getstk.Block_Qty;
getstk.Block_Qty=0;
getstk.Available_Qty=ifNull(getstk.Available_Qty,0) - ifnull(balc,0);
getstk.Total_Qty=ifNull(getstk.Total_Qty,0) - ifnull(rec.Actual_Qty,0);
fetwo.WO_Status="Dispatched";
getsosub.WO_Status_in_sosub="Dispatched";
}
sendmail
[
from :zoho.loginuserid
to :"pooja.s@synprosoft.com"
subject :"Dispatch Successful form submission - using Block" + input.Sales_Order_No.Sale_Order_No
message :"Part No " + rec.Product_Code.Part_No + "TOT QTY-" + get_inven.Total_Qty + "AVL QTY-" + get_inven.Available_Qty + "BLK QTY-" + get_inven.Block_Qty + "ID-" + rec.ID + "Actual Qty=" + rec.Actual_Qty
]
}
getsosub.Actual_Qty_So_far=ifNull(getsosub.Actual_Qty_So_far,0) + ifNull(rec.Ac_so_far,0);
if(getsosub.count() > 0)
{
getsosub.Create_Dispatch_Note_Plan_ID=input.ID;
so.Create_Dispatch_Note_REC_ID=input.ID;
getsosub.Balance_Qty=ifnull(getsosub.Balance_Qty,0) - ifnull(rec.Ac_so_far,0);
if(getsosub.Balance_Qty > 0)
{
so.DP_Status=False;
}
getsosub.Planned_Qty_So_far=0;
}
input.Disptach_Status = "Approved";
}
}
//Below For-Each is for utilizing the Block Qty for dispatch
if(rec.Actual_Weight != rec.Product_Weight || rec.Actual_Weight == rec.Product_Weight)
{
thisapp.Books.DispatchEmailTemplate(input.ID);
}
sasub = Sale_Order_Subform[Sales_Order_Exis_ID == so.ID];
solist = List();
solist.addAll(so.Dispatch_Note_No);
solist.add(input.ID);
so.Dispatch_Note_No=solist;
so.Dispatch_Qty=sasub.sum(Actual_Qty_So_far);
so.Balance_Qty=sasub.sum(Balance_Qty);
//so.Dispatch_Qty=ifNull(so.Dispatch_Qty,0) + disp;
so.Shipped_Qty=so.Dispatch_Qty;
//so.Balance_Qty=bal;
openUrl("#Report:Dispatch_Note_Actual","same window");
thisapp.Update_Salesorder_Books(input.Sales_Order_ID,input.Dispatch_Type);
thisapp.DC.DCtoBooks(input.ID);
for each var in input.Returnable_Packing_Material
{
insdc = insert into Create_DC_Subform
[
Qty=var.Qty
Part_Description=var.Part_Name
Part_No=var.Part_No
S_No=var.S_No
Added_User=zoho.loginuser
];
}
//thisapp.Books.Dispatch_Note_Actual_In_Books(input.ID);
// thisapp.Books.Create_invoice_individual(input.ID);
thisapp.Books.Create_Packages(input.ID);
thisapp.Books.Create_Shipment(input.ID);
con = true;
for each sal in Sale_Order_Subform[Sales_Order_Exis_ID == so.ID]
{
if(sal.Balance_Qty > 0 && sal.Planned_Qty_So_far == null || sal.Planned_Qty_So_far == 0)
{
con = false;
}
}
so.DP_Status=con;
}
else if(input.Dispatch_Type == "Actual Edit")
{
dispt = 0;
balan = 0;
for each rec1 in input.Product_Details
{
getso = Sales_Order[ID == input.Sales_Order_ID];
getsosub = Sale_Order_Subform[Sales_Order_Exis_ID == input.Sales_Order_ID && Part_No == rec1.Product_Code];
getsosub.Actual_Qty_So_far=ifNull(getsosub.Actual_Qty_So_far,0) + ifNull(rec1.Actual_Qty,0);
getsosub.Balance_Qty=ifnull(getsosub.Balance_Qty,0) - ifnull(rec1.Actual_Qty,0);
getso = Sales_Order[ID == input.Sales_Order_ID];
balan = ifNull(getsosub.Balance_Qty,0) + balan;
dispt = ifNull(rec1.Actual_Qty,0) + dispt;
if(getsosub.Balance_Qty > 0)
{
so = Sales_Order[ID == input.Sales_Order_ID];
so.DP_Status=False;
}
// get_invent = Inventory[Part_No == rec1.Product_Code];
// if(get_invent.count() > 0)
// {
// if(get_invent.Total_Qty < get_invent.Available_Qty)
// {
// //get_invent.Total_Qty=get_invent.Available_Qty;
// }
// // get_invent.Available_Qty=ifNull(get_invent.Available_Qty,0) - rec1.Actual_Qty;
// // get_invent.Total_Qty=ifNull(get_invent.Total_Qty,0) - rec1.Actual_Qty;
// sendmail
// [
// from :zoho.loginuserid
// to :"parthasarathy.m@synprosoft.com"
// subject :"Edited>Successful form submission>OnSuccess_edited input.Dispatch_Type == Actual Edit"
// message :"PartNo " + get_inven.Part_No.Part_No + "Total Qty is " + get_inven.Total_Qty + "Available Qty.. " + get_inven.Available_Qty
// ]
// }
}
if(rec1.Actual_Weight != rec1.Product_Weight || rec1.Actual_Weight == rec1.Product_Weight)
{
thisapp.Books.DispatchEmailTemplate(input.ID);
}
subsa = Sale_Order_Subform[Sales_Order_Exis_ID == getso.ID];
getso.Dispatch_Qty=subsa.sum(Actual_Qty_So_far);
getso.Balance_Qty=subsa.sum(Balance_Qty);
//getso.Dispatch_Qty=dispt;
getso.Shipped_Qty=getso.Dispatch_Qty;
// getso.Balance_Qty=balan;
openUrl("#Report:Edit_Dispatch_Note_Actual","same window");
thisapp.Books.Edit_discpatch_note_actual_invoice(input.ID);
}
else
{
openUrl("#Report:Order_Gate_Process","same window");
}
fet_dis = Create_Dispatch_Note_Format[ID == input.ID];
insrec = insert into Dispatch_Note_Actual_History
[
Dispatch_Type=fet_dis.Dispatch_Type
Added_User=zoho.loginuser
CDNF_ID=fet_dis.CDNF_ID
Currency_Code=fet_dis.Currency_Code
Dispatch_Note_Date=fet_dis.Dispatch_Note_Date
Customer_Address=fet_dis.Customer_Address
Sales_Type=fet_dis.Sales_Type
Sales_Order_No=fet_dis.Sales_Order_No
Customer_Name=fet_dis.Customer_Name
Incoterms=fet_dis.Incoterms
Incoterms_Location=fet_dis.Incoterms_Location
Product_List=fet_dis.Product_List
Load_Products=fet_dis.Load_Products
Transport_Type=fet_dis.Transport_Type
Transporter_Name=fet_dis.Transporter_Name
Vehicle_No_dup=fet_dis.Vehicle_No_dup
GR_No=fet_dis.GR_No
Driver_Name=fet_dis.Driver_Name
Driver_Mobile_Number=fet_dis.Driver_Mobile_Number
Vehicle_Type=fet_dis.Vehicle_Type
Total_Qty=fet_dis.Total_Qty
Total_Weight=fet_dis.Total_Weight
];
for each recsub in input.Product_Details
{
subins = insert into Dispatch_Note_Actual_History_Subform
[
Added_User=zoho.loginuser
Dispatch_Note_Actual_History_Exis_ID=insrec
S_NO=recsub.S_NO
Product_Code=recsub.Product_Code
Product_Description=recsub.Product_Description
Customer_Product_Code=recsub.Customer_Product_Code
Packing_Details1=recsub.Packing_Details1
UoM=recsub.UoM
Planned_Qty=recsub.Planned_Qty
Plan_Qty_so_far=recsub.Plan_Qty_so_far
Product_Weight=recsub.Product_Weight
Actual_Qty=recsub.Actual_Qty
Ac_so_far=recsub.Ac_so_far
Actual_Qty_so_far=recsub.Actual_Qty_so_far
Actual_Weight=recsub.Actual_Weight
Remarks=recsub.Remarks
Reason=recsub.Reason
Individual=recsub.Individual
Stock_Qty=recsub.Stock_Qty
Ordered_Qty=recsub.Ordered_Qty
Balance_Qty=recsub.Balance_Qty
];
}
for each retmat in input.Returnable_Packing_Material
{
retins = insert into Returnable_Packing_Material_History
[
Qty=retmat.Qty
Part_No=retmat.Part_No
Part_Name=retmat.Part_Name
Added_User=zoho.loginuser
];
}
if(input.Dispatch_Type == "Gate")
{
invmain = Invoice[ID == input.Invoice_ID];
invsub = Invoice_Subform[Invoice_Exist_ID == invmain.ID];
invsub.Vehicle_Gate_in_Time=input.In_Time;
invsub.Vehicle_Gate_out_time=input.Out_Time;
}
if(input.Dispatch_Type == "Plan")
{
input.Plan_Date_Time = zoho.currenttime;
fetso = Sales_Order[ID == input.Sales_Order_ID];
invmain = Invoice[ID == input.Invoice_ID];
invsub = Invoice_Subform[Invoice_Exist_ID == invmain.ID];
if(input.Sales_Type == "Direct Order" || input.Sales_Type == "Tooling")
{
if(fetso.CWPL_SO_Status == "Active")
{
fetso.CWPL_SO_Status="Dispatch Note Partial";
}
}
var = True;
polist = List();
for each rec in input.Product_Details
{
invsub.Dispatch_Plan_Date_time=rec.Disp_Plan_Date_Time;
fetsosub = Sale_Order_Subform[Sales_Order_Exis_ID == fetso.ID && Part_No == rec.Product_Code];
polist.add(rec.Product_Code);
fetsosub.Planned_Qty_So_far=ifNull(rec.Plan_Qty_so_far,0) + ifNull(rec.Planned_Qty,0);
rec.Balance_Qty=ifNull(rec.Planned_Qty,0);
bal = ifnull(fetsosub.Balance_Qty,0.0) - ifnull(rec.Planned_Qty,0.0);
if(bal > 0)
{
var = False;
}
if(bal < 0)
{
fetsosub.Balance_Qty=0;
}
}
for each sorec in Sale_Order_Subform[Sales_Order_Exis_ID == fetso.ID && Part_No not in polist]
{
sobal = ifnull(sorec.Balance_Qty,0.0) - ifnull(sorec.Planned_Qty_So_far,0.0);
if(sobal > 0)
{
var = false;
}
if(sobal < 0)
{
sorec.Balance_Qty=0;
}
}
fetso.DP_Status=var;
if(fetso.DP_Status == True && fetso.CWPL_SO_Status == "Active" || fetso.CWPL_SO_Status == "Dispatch Note Partial")
{
fetso.CWPL_SO_Status="Dispatch Note Plan Completed";
}
input.Disptach_Status = "Plan Closed";
fetci = Check_Inventory[ID == input.Check_Inventory_ID];
if(fetci.count() > 0)
{
fetci.Create_Dispatch_Note_RECID=input.ID;
fetci.Status="Closed";
}
so = Sales_Order[ID == input.Sales_Order_ID];
if(so.count() > 0)
{
getsosub = Sale_Order_Subform[Sales_Order_Exis_ID == so.ID];
if(getsosub.count() > 0)
{
getsosub.Create_Dispatch_Note_Plan_ID=input.ID;
so.Create_Dispatch_Note_REC_ID=input.ID;
}
}
}
getmodule = Module_Master[Module_Name == "Dispatch Note"];
getauto = Auto_Generate_Numbers[Module_Name == getmodule.ID];
input.CDNF_ID = getauto.Module_Short_Name + "-" + getauto.Prefix + "-" + input.Auto_Number;
openUrl("#Form:Alert_Messages?Status=" + "DN1" + "&Value=" + input.CDNF_ID + "&zc_LoadIn=dialog","same window");
// if(input.Sales_Type == "Contract")
// {
clear Product_Details;
fet_so = Sales_Order[ID == input.Sales_Order_ID];
if(input.Load_Products == True)
{
show Product_Details;
show Total_Qty;
show Total_Weight;
sno = 0;
for each var in input.Product_List
{
a1 = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Part_No == var && Balance_Qty > 0];
planvar1 = ifNull(a1.Balance_Qty,0) - ifNull(a1.Planned_Qty_So_far,0);
if(a1.count() > 0)
{
fetch_inven = Inventory[Part_No == a1.Part_No].sum(Available_Qty);
row1 = Create_Dispatch_Note_Format.Product_Details();
row1.Sale_Order_Subform_ID=a1.ID;
row1.Product_Description=a1.Part_Description;
row1.Product_Code=a1.Part_No;
row1.Customer_Product_Code=a1.Customer_Part_Code;
row1.Remarks=a1.Remarks;
row1.UoM=a1.UoM;
row1.Packing_Details1=a1.Packing_Std;
//row1.Planned_Qty=a1.Qty;
row1.Ordered_Qty=a1.Qty;
// row1.Stock_Qty=fetch_inven;
row1.Plan_Qty_so_far=a1.Planned_Qty_So_far;
if(a1.Balance_Qty > 0 && planvar1 > 0)
{
row1.S_NO=sno + 1;
sno = sno + 1;
input.Product_Details.insert(row1);
}
disable Sale_Order_Subform_RECID;
disable Product_Details.S_NO;
disable Product_Details.Product_Code;
disable Product_Details.Product_Description;
}
}
if(input.Dispatch_Type == "Plan")
{
Total1 = 0;
wt = 0;
for each rec in input.Product_Details
{
fet_item = Materials[ID = rec.Product_Code];
salesub = Sale_Order_Subform[Sales_Order_Exis_ID == input.Sales_Order_ID && Part_No == rec.Product_Code];
rec.Planned_Qty=ifNull(salesub.Balance_Qty,0) - ifNull(salesub.Planned_Qty_So_far,0);
// rec.Stock_Qty=fetch_inven;
Total1 = Total1 + rec.Planned_Qty;
rec.Product_Weight=ifNull(fet_item.Final_Weight,0.0) * ifNull(rec.Planned_Qty,0.0);
wt = wt + rec.Product_Weight;
disable Total_Qty;
disable Total_Weight;
}
input.Total_Qty = Total1;
input.Total_Weight = wt;
}
}
//}
disable Product_Details.Ordered_Qty;
disable Product_Details.UoM;
//hide Product_Details.Individual;
hide CDNF_ID;
hide Currency_Code;
hide Actual_Date_Time;
disable Plan_Date_Time;
hide Export_Information_ID;
//hide Disptach_Status;
hide Sale_Order_Subform_RECID;
disable Incoterms;
hide Product_Details.Block_Qty;
disable Incoterms_Location;
hide DN_No;
disable Product_Details.Packing_Details1;
hide Product_Details.Export_Information_Exis_ID;
hide Product_Details.Reason;
hide Sales_Order_ID;
hide Inventory_ID;
hide Create_Dispatch_Note_Plan_ID;
hide Check_Inventory_ID;
hide Unblock_Inventory_ID;
hide Product_Details.Actual_Qty_so_far;
hide Product_Details.Plan_Qty_so_far;
hide Product_Details.Ac_so_far;
hide Product_Details.Stock_Qty;
disable Product_Details.Customer_Product_Code;
disable Product_Details.Product_Weight;
disable Sales_Type;
disable Product_Details.Remarks;
//hide Product_Details.Actual_Qty;
hide Product_Details.Create_Dispatch_Note_Plan_RECID;
hide Disptach_Status;
if(input.Dispatch_Type == "Plan")
{
input.Plan_Date_Time = zoho.currenttime;
hide Transportation_Details;
hide Returnable_Packing_Material;
hide Product_Details.Ordered_Qty;
hide Product_Details.Actual_Qty;
hide Product_Details.Actual_Weight;
}
if(input.Dispatch_Type == "Actual")
{
hide Product_Details.Ordered_Qty;
hide Out_Time;
hide In_Time;
disable Product_Details.Actual_Qty;
}
if(input.Sale_Order_Subform_RECID != null)
{
getSosub = Sale_Order_Subform[ID == input.Sale_Order_Subform_RECID];
input.Sales_Order_ID = getSosub.Sales_Order_Exis_ID;
input.Sales_Order_No = getSosub.Sales_Order_Exis_ID;
disable Sales_Order_No;
so = Sales_Order[ID == getSosub.Sales_Order_Exis_ID];
input.Expected_Shipping_Date = so.Expected_Shipment_Date;
//var = Check_Inventory[ID == input.ID];
fet_so = Sales_Order[ID == input.Sales_Order_ID];
getsosub = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID];
fet_chk = Check_Inventory[Sale_Order_Subform_ID == input.Sale_Order_Subform_RECID];
if(fet_chk.count() > 0)
{
input.Check_Inventory_ID = fet_chk.ID;
}
fet_pro = Proforma_Invoice[Customer_Name == fet_so.Customer_Name && Sales_Order_No == getsosub.Sales_Order_Exis_ID];
//fetch_inve = Inventory[Part_No == getsosub.Part_No];
input.Customer_Name = fet_so.Customer_Name;
input.Customer_Address = fet_so.Shipping_Address;
input.Incoterms = fet_so.Incoterms1;
input.Incoterms_Location = fet_so.Incoterms_Location;
input.Currency_Code = fet_so.Currency_Code;
input.Sales_Type = fet_so.Sales_Type;
input.Packing_Forwarding = fet_so.Packing_Forwarding;
if(input.Sales_Type == "Direct Order" || input.Sales_Type == "Tooling" || input.Sales_Type == "Research & Development Charges")
{
input.Expected_Shipping_Date = so.Expected_Shipment_Date;
hide Product_Details;
hide Total_Qty;
hide Total_Weight;
sublistdo = List();
sosub1 = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Balance_Qty > 0];
for each recsodo in sosub1
{
planvardo = ifNull(recsodo.Balance_Qty,0) - ifNull(recsodo.Planned_Qty_So_far,0);
if(planvardo > 0)
{
sublistdo.add(recsodo.Part_No);
}
}
input.Product_List:ui.add(sublistdo);
if(fet_pro.Proforma_Invoice_Status == "Over Due")
{
alert "Proforma Invoice is in OverDue for this Customer";
}
else if(fet_pro.Proforma_Invoice_Status == "Due")
{
alert "Proforma Invoice is in Due for this Customer";
}
else if(fet_pro.Proforma_Invoice_Status == "Partially Paid")
{
alert "Proforma Invoice is in Partially Paid for this Customer";
}
//input.Invoice_Address = fet_so.Billing_Address.state_province;
// sno = 0;
// for each a1 in fet_so.Item_Details
// {
// fetch_inven = Inventory[Part_No == a1.Part_No].sum(Available_Qty);
// row1 = Create_Dispatch_Note_Format.Product_Details();
// row1.Product_Description=a1.Part_Description;
// row1.Product_Code=a1.Part_No;
// row1.Customer_Product_Code=a1.Customer_Part_Code;
// row1.Remarks=a1.Remarks;
// row1.UoM=a1.UoM;
// row1.Packing_Details1=a1.Packing_Std;
// //row1.Planned_Qty=a1.Qty;
// row1.Ordered_Qty=a1.Qty;
// // row1.Stock_Qty=fetch_inven;
// row1.Plan_Qty_so_far=a1.Planned_Qty_So_far;
// planvar = ifNull(a1.Balance_Qty,0) - ifNull(a1.Planned_Qty_So_far,0);
// if(a1.Balance_Qty > 0 && planvar > 0)
// {
// row1.S_NO=sno + 1;
// sno = sno + 1;
// input.Product_Details.insert(row1);
// }
// disable Sale_Order_Subform_RECID;
// disable Product_Details.S_NO;
// disable Product_Details.Product_Code;
// disable Product_Details.Product_Description;
// }
// if(input.Dispatch_Type == "Plan")
// {
// Tot = 0;
// wt = 0;
// for each rec in input.Product_Details
// {
// rec.Disp_Plan_Date_Time=zoho.currenttime;
// fet_item = Materials[ID = rec.Product_Code];
// salesub = Sale_Order_Subform[Sales_Order_Exis_ID == input.Sales_Order_ID && Part_No == rec.Product_Code];
// rec.Planned_Qty=ifNull(salesub.Balance_Qty,0) - ifNull(salesub.Planned_Qty_So_far,0);
// // rec.Stock_Qty=fetch_inven;
// Tot = Tot + ifNull(rec.Planned_Qty,0);
// rec.Product_Weight=ifNull(fet_item.Final_Weight,0.0) * ifNull(rec.Planned_Qty,0.0);
// wt = wt + rec.Product_Weight;
// disable Total_Qty;
// disable Total_Weight;
// }
// input.Total_Qty = Tot;
// input.Total_Weight = wt;
// }
}
else if(input.Sales_Type == "Contract")
{
hide Product_Details;
hide Total_Qty;
hide Total_Weight;
sublist = List();
sosub = Sale_Order_Subform[Sales_Order_Exis_ID == fet_so.ID && Balance_Qty > 0];
for each recso in sosub
{
planvar1 = ifNull(recso.Balance_Qty,0) - ifNull(recso.Planned_Qty_So_far,0);
if(planvar1 > 0)
{
sublist.add(recso.Part_No);
}
}
input.Product_List:ui.add(sublist);
}
}
/*----------------------------------------------------Level 1------------------------------------------------------------*/
//Checking if row.Level == 1, then run all the levels
if(row.Level == "Level-1")
{
for each cwplrec in input.BoM_Details_CWPL
{
//LEVEL-1
if(cwplrec.Level == "Level-1")
{
for each lis1 in Create_BOM[Part_No == cwplrec.Part_No]
{
for each var in input.BoM_Details_CWPL
{
if(var.Part_No.Part_No == lis1.Material_Details.Part_No.Part_No)
{
var.BoM_Qty=cwplrec.Actual_Qty;
var.Actual_Qty=ifnull(var.BoM_Qty,0.0) * ifnull(var.bom_stk_qty,0.0) - ifnull(var.Stock_Qty,0.0);
var.Plan_Qty=var.Actual_Qty;
}
if(var.Stock_Qty > var.BoM_Qty)
{
var.Blocked_Qty=var.Actual_Qty;
}
if(var.Stock_Qty != 0 && var.Blocked_Qty > var.Stock_Qty || var.Stock_Qty < var.BoM_Qty)
{
var.Blocked_Qty=var.Stock_Qty;
}
//Below Foreach is for General Purchase calculation
for each vargp in input.BoM_Details_General_Purchase
{
row.Tot_BoM_Qty=ifnull(input.MRP_Qty,0) * ifnull(row.bom_stk_qty,0.0);
if(vargp.Part_No.Part_No.startswith("BT") == true || vargp.Part_No.Part_No.startswith("NT") == true || vargp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
vargp.BoM_Qty=ifnull(var.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0) - ifnull(vargp.Stock_Qty,0) >= 0)
{
vargp.Plan_Qty=ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0) - ifnull(vargp.Stock_Qty,0);
}
else
{
vargp.Plan_Qty=ifnull(vargp.Stock_Qty,0) - ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
vargp.Purchase_Qty=ifnull(vargp.Plan_Qty,0);
}
}
else
{
if(vargp.Level == var.Level && vargp.Level == "Level-1")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
vargp.BoM_Qty=var.Actual_Qty;
if(ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0) - ifnull(vargp.Stock_Qty,0) >= 0)
{
vargp.Plan_Qty=ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0) - ifnull(vargp.Stock_Qty,0);
}
else
{
vargp.Plan_Qty=ifnull(vargp.Stock_Qty,0) - ifnull(vargp.BoM_Qty,0) * ifnull(vargp.Org_BoM_Qty,0.0);
}
vargp.Purchase_Qty=vargp.Plan_Qty;
}
}
}
}
}
}
//LEVEL-2
if(cwplrec.Level == "Level-2")
{
info "level2";
info cwplrec.Actual_Qty;
for each lis2 in Create_BOM[Part_No == cwplrec.Part_No]
{
for each var2 in input.BoM_Details_CWPL
{
if(var2.Part_No.Part_No == lis2.Material_Details.Part_No.Part_No)
{
var2.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var2.BoM_Qty=cwplrec.Actual_Qty;
var2.Actual_Qty=ifnull(var2.BoM_Qty,0.0) * ifnull(var2.bom_stk_qty,0.0) - ifnull(var2.Stock_Qty,0.0);
var2.Plan_Qty=var2.Actual_Qty;
}
if(var2.Stock_Qty > var2.BoM_Qty)
{
var2.Blocked_Qty=var2.Actual_Qty;
}
if(var2.Stock_Qty != 0 && var2.Blocked_Qty > var2.Stock_Qty || var2.Stock_Qty < var2.BoM_Qty)
{
var2.Blocked_Qty=var2.Stock_Qty;
}
for each var2gp in input.BoM_Details_General_Purchase
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
if(var2gp.Part_No.Part_No.startswith("BT") == true || var2gp.Part_No.Part_No.startswith("NT") == true || var2gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var2.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var2gp.BoM_Qty=ifnull(var2.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0) >= 0)
{
var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
}
else
{
var2gp.Plan_Qty=ifnull(var2gp.Stock_Qty,0) - ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var2gp.Purchase_Qty=ifnull(var2gp.Plan_Qty,0);
}
}
else
{
if(var2gp.Level == var2.Level && var2gp.Level == "Level-2")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var2gp.BoM_Qty=var2.Actual_Qty;
//var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0) >= 0)
{
var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
}
else
{
var2gp.Plan_Qty=ifnull(var2gp.Stock_Qty,0) - ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0);
}
var2gp.Purchase_Qty=var2gp.Plan_Qty;
}
}
}
}
}
//cwplrec.Plan_Qty=ifnull(cwplrec.BoM_Qty,0.0) * ifnull(cwplrec.bom_stk_qty,0.0) - ifnull(cwplrec.Stock_Qty,0.0);
//cwplrec.Actual_Qty=cwplrec.Plan_Qty;
}
//LEVEL-3
if(cwplrec.Level == "Level-3")
{
for each lis3 in Create_BOM[Part_No == cwplrec.Part_No]
{
for each var3 in input.BoM_Details_CWPL
{
if(var3.Part_No.Part_No == lis3.Material_Details.Part_No.Part_No)
{
var3.Tot_BoM_Qty=ifnull(var3.BoM_Qty,0) * ifnull(var3.bom_stk_qty,0.0);
var3.BoM_Qty=cwplrec.Actual_Qty;
var3.Actual_Qty=ifnull(var3.BoM_Qty,0.0) * ifnull(var3.bom_stk_qty,0.0) - ifnull(var3.Stock_Qty,0.0);
var3.Plan_Qty=var3.Actual_Qty;
}
if(var3.Stock_Qty > var3.BoM_Qty)
{
var3.Blocked_Qty=var3.Actual_Qty;
}
if(var3.Stock_Qty != 0 && var3.Blocked_Qty > var3.Stock_Qty || var3.Stock_Qty < var3.BoM_Qty)
{
var3.Blocked_Qty=var3.Stock_Qty;
}
for each var3gp in input.BoM_Details_General_Purchase
{
if(var3gp.Part_No.Part_No.startswith("BT") == true || var3gp.Part_No.Part_No.startswith("NT") == true || var3gp.Part_No.Part_No.startswith("WS") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var3.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var3gp.BoM_Qty=ifnull(var3.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=ifnull(var3gp.Plan_Qty,0);
}
}
else
{
if(var3gp.Level == var3.Level && var3gp.Level == "Level-3")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var3gp.BoM_Qty=var3.Actual_Qty;
//var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=var3gp.Plan_Qty;
}
}
}
}
}
//cwplrec.Plan_Qty=ifnull(cwplrec.BoM_Qty,0.0) * ifnull(cwplrec.bom_stk_qty,0.0) - ifnull(cwplrec.Stock_Qty,0.0);
//cwplrec.Actual_Qty=cwplrec.Plan_Qty;
}
//LEVEL-4
if(cwplrec.Level == "Level-4")
{
for each lis4 in Create_BOM[Part_No == cwplrec.Part_No]
{
for each var4 in input.BoM_Details_CWPL
{
if(var4.Part_No.Part_No == lis4.Material_Details.Part_No.Part_No)
{
var4.Tot_BoM_Qty=ifnull(var4.Actual_Qty,0) * ifnull(var4.bom_stk_qty,0.0);
var4.BoM_Qty=cwplrec.Actual_Qty;
var4.Actual_Qty=ifnull(var4.BoM_Qty,0.0) * ifnull(var4.bom_stk_qty,0.0) - ifnull(var4.Stock_Qty,0.0);
var4.Plan_Qty=var4.Actual_Qty;
}
if(var4.Stock_Qty > var4.BoM_Qty)
{
var4.Blocked_Qty=var4.Actual_Qty;
}
if(var4.Stock_Qty != 0 && var4.Blocked_Qty > var4.Stock_Qty || var4.Stock_Qty < var4.BoM_Qty)
{
var4.Blocked_Qty=var4.Stock_Qty;
}
for each var4gp in input.BoM_Details_General_Purchase
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
if(var4gp.Part_No.Part_No.startswith("BT") == true || var4gp.Part_No.Part_No.startswith("NT") == true || var4gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var4.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var4gp.BoM_Qty=ifnull(var4.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=ifnull(var4gp.Plan_Qty,0);
}
}
else
{
if(var4gp.Level == var4.Level && var4gp.Level == "Level-4")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4gp.BoM_Qty=var4.Actual_Qty;
// var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=var4gp.Plan_Qty;
}
}
}
}
}
//cwplrec.Plan_Qty=ifnull(cwplrec.BoM_Qty,0.0) * ifnull(cwplrec.bom_stk_qty,0.0) - ifnull(cwplrec.Stock_Qty,0.0);
//cwplrec.Actual_Qty=cwplrec.Plan_Qty;
}
//LEVEL-5
if(cwplrec.Level == "Level-5")
{
for each lis5 in Create_BOM[Part_No == cwplrec.Part_No]
{
for each var5 in input.BoM_Details_CWPL
{
if(var5.Part_No.Part_No == lis5.Material_Details.Part_No.Part_No)
{
var5.Tot_BoM_Qty=ifnull(var5.Actual_Qty,0) * ifnull(var5.bom_stk_qty,0.0);
var5.BoM_Qty=cwplrec.Actual_Qty;
var5.Actual_Qty=ifnull(var5.BoM_Qty,0.0) * ifnull(var5.bom_stk_qty,0.0) - ifnull(var5.Stock_Qty,0.0);
var5.Plan_Qty=var5.Actual_Qty;
}
for each var5gp in input.BoM_Details_General_Purchase
{
if(var5gp.Level == var5.Level && var5gp.Level == "Level-5")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5gp.BoM_Qty=var5.Actual_Qty;
// var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=var5gp.Plan_Qty;
}
}
}
}
//cwplrec.Plan_Qty=ifnull(cwplrec.BoM_Qty,0.0) * ifnull(cwplrec.bom_stk_qty,0.0) - ifnull(cwplrec.Stock_Qty,0.0);
//cwplrec.Actual_Qty=cwplrec.Plan_Qty;
}
}
//Foreach Ends
}
//Level1 checking close
/*----------------------------------------------------Level 2------------------------------------------------------------*/
//Checking if row.Level == 2, then run all the levels >=2
if(row.Level == "Level-2")
{
for each cwplrec2 in input.BoM_Details_CWPL
{
//LEVEL-2
if(cwplrec2.Level == "Level-2")
{
for each lis2 in Create_BOM[Part_No == cwplrec2.Part_No]
{
for each var2 in input.BoM_Details_CWPL
{
if(var2.Part_No.Part_No == lis2.Material_Details.Part_No.Part_No)
{
var2.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var2.BoM_Qty=cwplrec2.Actual_Qty;
var2.Actual_Qty=ifnull(var2.BoM_Qty,0.0) * ifnull(var2.bom_stk_qty,0.0) - ifnull(var2.Stock_Qty,0.0);
var2.Plan_Qty=var2.Actual_Qty;
}
for each var2gp in input.BoM_Details_General_Purchase
{
if(var2gp.Part_No.Part_No.startswith("BT") == true || var2gp.Part_No.Part_No.startswith("NT") == true || var2gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var2.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var2gp.BoM_Qty=ifnull(var2.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0) >= 0)
{
var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
}
else
{
var2gp.Plan_Qty=ifnull(var2gp.Stock_Qty,0) - ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var2gp.Purchase_Qty=ifnull(var2gp.Plan_Qty,0);
}
}
else
{
if(var2gp.Level == var2.Level && var2gp.Level == "Level-2")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var2gp.BoM_Qty=var2.Actual_Qty;
//var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0) >= 0)
{
var2gp.Plan_Qty=ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0) - ifnull(var2gp.Stock_Qty,0);
}
else
{
var2gp.Plan_Qty=ifnull(var2gp.Stock_Qty,0) - ifnull(var2gp.BoM_Qty,0) * ifnull(var2gp.Org_BoM_Qty,0.0);
}
var2gp.Purchase_Qty=var2gp.Plan_Qty;
}
}
}
}
}
//cwplrec2.Plan_Qty=ifnull(cwplrec2.BoM_Qty,0.0) * ifnull(cwplrec2.bom_stk_qty,0.0) - ifnull(cwplrec2.Stock_Qty,0.0);
//cwplrec2.Actual_Qty=cwplrec2.Plan_Qty;
}
//LEVEL-3
if(cwplrec2.Level == "Level-3")
{
for each lis3 in Create_BOM[Part_No == cwplrec2.Part_No]
{
for each var3 in input.BoM_Details_CWPL
{
if(var3.Part_No.Part_No == lis3.Material_Details.Part_No.Part_No)
{
var3.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var3.BoM_Qty=cwplrec2.Actual_Qty;
var3.Actual_Qty=ifnull(var3.BoM_Qty,0.0) * ifnull(var3.bom_stk_qty,0.0) - ifnull(var3.Stock_Qty,0.0);
var3.Plan_Qty=var3.Actual_Qty;
}
for each var3gp in input.BoM_Details_General_Purchase
{
if(var3gp.Part_No.Part_No.startswith("BT") == true || var3gp.Part_No.Part_No.startswith("NT") == true || var3gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var3.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var3gp.BoM_Qty=ifnull(var3.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=ifnull(var3gp.Plan_Qty,0);
}
}
else
{
if(var3gp.Level == var3.Level && var3gp.Level == "Level-3")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var3gp.BoM_Qty=var3.Actual_Qty;
//var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=var3gp.Plan_Qty;
}
}
}
}
}
//cwplrec2.Plan_Qty=ifnull(cwplrec2.BoM_Qty,0.0) * ifnull(cwplrec2.bom_stk_qty,0.0) - ifnull(cwplrec2.Stock_Qty,0.0);
//cwplrec2.Actual_Qty=cwplrec2.Plan_Qty;
}
//LEVEL-4
if(cwplrec2.Level == "Level-4")
{
for each lis4 in Create_BOM[Part_No == cwplrec2.Part_No]
{
for each var4 in input.BoM_Details_CWPL
{
if(var4.Part_No.Part_No == lis4.Material_Details.Part_No.Part_No)
{
var4.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4.BoM_Qty=cwplrec2.Actual_Qty;
var4.Actual_Qty=ifnull(var4.BoM_Qty,0.0) * ifnull(var4.bom_stk_qty,0.0) - ifnull(var4.Stock_Qty,0.0);
var4.Plan_Qty=var4.Actual_Qty;
}
for each var4gp in input.BoM_Details_General_Purchase
{
if(var4gp.Part_No.Part_No.startswith("BT") == true || var4gp.Part_No.Part_No.startswith("NT") == true || var4gp.Part_No.Part_No.startswith("WS") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var4.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var4gp.BoM_Qty=ifnull(var4.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=ifnull(var4gp.Plan_Qty,0);
}
}
else
{
if(var4gp.Level == var4.Level && var4gp.Level == "Level-4")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4gp.BoM_Qty=var4.Actual_Qty;
// var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=var4gp.Plan_Qty;
}
}
}
}
}
//cwplrec2.Plan_Qty=ifnull(cwplrec2.BoM_Qty,0.0) * ifnull(cwplrec2.bom_stk_qty,0.0) - ifnull(cwplrec2.Stock_Qty,0.0);
//cwplrec2.Actual_Qty=cwplrec2.Plan_Qty;
}
//LEVEL-5
if(cwplrec2.Level == "Level-5")
{
for each lis5 in Create_BOM[Part_No == cwplrec2.Part_No]
{
for each var5 in input.BoM_Details_CWPL
{
if(var5.Part_No.Part_No == lis5.Material_Details.Part_No.Part_No)
{
var5.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5.BoM_Qty=cwplrec2.Actual_Qty;
var5.Actual_Qty=ifnull(var5.BoM_Qty,0.0) * ifnull(var5.bom_stk_qty,0.0) - ifnull(var5.Stock_Qty,0.0);
var5.Plan_Qty=var5.Actual_Qty;
}
for each var5gp in input.BoM_Details_General_Purchase
{
if(var5gp.Part_No.Part_No.startswith("BT") == true || var5gp.Part_No.Part_No.startswith("NT") == true || var5gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var5.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var5gp.BoM_Qty=ifnull(var5.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=ifnull(var5gp.Plan_Qty,0);
}
}
else
{
if(var5gp.Level == var5.Level && var5gp.Level == "Level-5")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5gp.BoM_Qty=var5.Actual_Qty;
// var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=var5gp.Plan_Qty;
}
}
}
}
}
//cwplrec2.Plan_Qty=ifnull(cwplrec2.BoM_Qty,0.0) * ifnull(cwplrec2.bom_stk_qty,0.0) - ifnull(cwplrec2.Stock_Qty,0.0);
//cwplrec2.Actual_Qty=cwplrec2.Plan_Qty;
}
}
}
//Level 2 checking close
/*----------------------------------------------------Level 3------------------------------------------------------------*/
////Checking if row.Level == 3, then run all the levels >=3
if(row.Level == "Level-3")
{
for each cwplrec3 in input.BoM_Details_CWPL
{
//LEVEL-3
if(cwplrec3.Level == "Level-3")
{
for each lis3 in Create_BOM[Part_No == cwplrec3.Part_No]
{
for each var3 in input.BoM_Details_CWPL
{
if(var3.Part_No.Part_No == lis3.Material_Details.Part_No.Part_No)
{
var3.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var3.BoM_Qty=cwplrec3.Actual_Qty;
var3.Actual_Qty=ifnull(var3.BoM_Qty,0.0) * ifnull(var3.bom_stk_qty,0.0) - ifnull(var3.Stock_Qty,0.0);
var3.Plan_Qty=var3.Actual_Qty;
}
for each var3gp in input.BoM_Details_General_Purchase
{
if(var3gp.Part_No.Part_No.startswith("BT") == true || var3gp.Part_No.Part_No.startswith("NT") == true || var3gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var3.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var3gp.BoM_Qty=ifnull(var3.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=ifnull(var3gp.Plan_Qty,0);
}
}
else
{
if(var3gp.Level == var3.Level && var3gp.Level == "Level-3")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var3gp.BoM_Qty=var3.Actual_Qty;
//var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0) >= 0)
{
var3gp.Plan_Qty=ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0) - ifnull(var3gp.Stock_Qty,0);
}
else
{
var3gp.Plan_Qty=ifnull(var3gp.Stock_Qty,0) - ifnull(var3gp.BoM_Qty,0) * ifnull(var3gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var3gp.Purchase_Qty=var3gp.Plan_Qty;
}
}
}
}
}
//cwplrec3.Plan_Qty=ifnull(cwplrec3.BoM_Qty,0.0) * ifnull(cwplrec3.bom_stk_qty,0.0) - ifnull(cwplrec3.Stock_Qty,0.0);
//cwplrec3.Actual_Qty=cwplrec3.Plan_Qty;
}
//LEVEL-4
if(cwplrec3.Level == "Level-4")
{
for each lis4 in Create_BOM[Part_No == cwplrec3.Part_No]
{
for each var4 in input.BoM_Details_CWPL
{
if(var4.Part_No.Part_No == lis4.Material_Details.Part_No.Part_No)
{
var4.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4.BoM_Qty=cwplrec3.Actual_Qty;
var4.Actual_Qty=ifnull(var4.BoM_Qty,0.0) * ifnull(var4.bom_stk_qty,0.0) - ifnull(var4.Stock_Qty,0.0);
var4.Plan_Qty=var4.Actual_Qty;
}
for each var4gp in input.BoM_Details_General_Purchase
{
if(var4gp.Part_No.Part_No.startswith("BT") == true || var4gp.Part_No.Part_No.startswith("NT") == true || var4gp.Part_No.Part_No.startswith("WS") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var4.Part_No.Part_No.contains("_UP") == true)
{
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var4gp.BoM_Qty=ifnull(var4.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=ifnull(var4gp.Plan_Qty,0);
}
}
else
{
if(var4gp.Level == var4.Level && var4gp.Level == "Level-4")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4gp.BoM_Qty=var4.Actual_Qty;
// var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=var4gp.Plan_Qty;
}
}
}
}
}
//cwplrec3.Plan_Qty=ifnull(cwplrec3.BoM_Qty,0.0) * ifnull(cwplrec3.bom_stk_qty,0.0) - ifnull(cwplrec3.Stock_Qty,0.0);
//cwplrec3.Actual_Qty=cwplrec3.Plan_Qty;
}
//LEVEL-5
if(cwplrec3.Level == "Level-5")
{
for each lis5 in Create_BOM[Part_No == cwplrec3.Part_No]
{
for each var5 in input.BoM_Details_CWPL
{
if(var5.Part_No.Part_No == lis5.Material_Details.Part_No.Part_No)
{
var5.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5.BoM_Qty=cwplrec3.Actual_Qty;
var5.Actual_Qty=ifnull(var5.BoM_Qty,0.0) * ifnull(var5.bom_stk_qty,0.0) - ifnull(var5.Stock_Qty,0.0);
var5.Plan_Qty=var5.Actual_Qty;
}
for each var5gp in input.BoM_Details_General_Purchase
{
if(var5gp.Part_No.Part_No.startswith("BT") == true || var5gp.Part_No.Part_No.startswith("NT") == true || var5gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var5.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var5gp.BoM_Qty=ifnull(var5.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=ifnull(var5gp.Plan_Qty,0);
}
}
else
{
if(var5gp.Level == var5.Level && var5gp.Level == "Level-5")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5gp.BoM_Qty=var5.Actual_Qty;
// var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=var5gp.Plan_Qty;
}
}
}
}
}
//cwplrec3.Plan_Qty=ifnull(cwplrec3.BoM_Qty,0.0) * ifnull(cwplrec3.bom_stk_qty,0.0) - ifnull(cwplrec3.Stock_Qty,0.0);
//cwplrec3.Actual_Qty=cwplrec3.Plan_Qty;
}
}
}
//Level 3 checking close
/*----------------------------------------------------Level 4------------------------------------------------------------*/
//Checking if row.Level == 4, then run all the levels >=4
if(row.Level == "Level-4")
{
for each cwplrec4 in input.BoM_Details_CWPL
{
//LEVEL-4
if(cwplrec4.Level == "Level-4")
{
for each lis4 in Create_BOM[Part_No == cwplrec4.Part_No]
{
for each var4 in input.BoM_Details_CWPL
{
if(var4.Part_No.Part_No == lis4.Material_Details.Part_No.Part_No)
{
var4.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4.BoM_Qty=cwplrec4.Actual_Qty;
var4.Actual_Qty=ifnull(var4.BoM_Qty,0.0) * ifnull(var4.bom_stk_qty,0.0) - ifnull(var4.Stock_Qty,0.0);
var4.Plan_Qty=var4.Actual_Qty;
}
for each var4gp in input.BoM_Details_General_Purchase
{
if(var4gp.Part_No.Part_No.startswith("BT") == true || var4gp.Part_No.Part_No.startswith("NT") == true || var4gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var4.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var4gp.BoM_Qty=ifnull(var4.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=ifnull(var4gp.Plan_Qty,0);
}
}
else
{
if(var4gp.Level == var4.Level && var4gp.Level == "Level-4")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var4gp.BoM_Qty=var4.Actual_Qty;
// var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0) >= 0)
{
var4gp.Plan_Qty=ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0) - ifnull(var4gp.Stock_Qty,0);
}
else
{
var4gp.Plan_Qty=ifnull(var4gp.Stock_Qty,0) - ifnull(var4gp.BoM_Qty,0) * ifnull(var4gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var4gp.Purchase_Qty=var4gp.Plan_Qty;
}
}
}
}
}
//cwplrec4.Plan_Qty=ifnull(cwplrec4.BoM_Qty,0.0) * ifnull(cwplrec4.bom_stk_qty,0.0) - ifnull(cwplrec4.Stock_Qty,0.0);
//cwplrec4.Actual_Qty=cwplrec4.Plan_Qty;
}
//LEVEL-5
if(cwplrec4.Level == "Level-5")
{
for each lis5 in Create_BOM[Part_No == cwplrec4.Part_No]
{
for each var5 in input.BoM_Details_CWPL
{
if(var5.Part_No.Part_No == lis5.Material_Details.Part_No.Part_No)
{
var5.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5.BoM_Qty=cwplrec4.Actual_Qty;
var5.Actual_Qty=ifnull(var5.BoM_Qty,0.0) * ifnull(var5.bom_stk_qty,0.0) - ifnull(var5.Stock_Qty,0.0);
var5.Plan_Qty=var5.Actual_Qty;
}
for each var5gp in input.BoM_Details_General_Purchase
{
if(var5gp.Part_No.Part_No.startswith("BT") == true || var5gp.Part_No.Part_No.startswith("NT") == true || var5gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var5.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var5gp.BoM_Qty=ifnull(var5.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=ifnull(var5gp.Plan_Qty,0);
}
}
else
{
if(var5gp.Level == var5.Level && var5gp.Level == "Level-5")
{
var5gp.BoM_Qty=var5.Actual_Qty;
// var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=var5gp.Plan_Qty;
}
}
}
}
}
//cwplrec4.Plan_Qty=ifnull(cwplrec4.BoM_Qty,0.0) * ifnull(cwplrec4.bom_stk_qty,0.0) - ifnull(cwplrec4.Stock_Qty,0.0);
//cwplrec4.Actual_Qty=cwplrec4.Plan_Qty;
}
}
}
//Level 4 checking close
/*----------------------------------------------------Level 5------------------------------------------------------------*/
//Checking if row.Level == 5, then run all the levels >=5
if(row.Level == "Level-5")
{
for each cwplrec5 in input.BoM_Details_CWPL
{
//LEVEL-5
if(cwplrec5.Level == "Level-5")
{
for each lis5 in Create_BOM[Part_No == cwplrec5.Part_No]
{
for each var5 in input.BoM_Details_CWPL
{
if(var5.Part_No.Part_No == lis5.Material_Details.Part_No.Part_No)
{
var5.Tot_BoM_Qty=ifnull(row.Actual_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5.BoM_Qty=cwplrec5.Actual_Qty;
var5.Actual_Qty=ifnull(var5.BoM_Qty,0.0) * ifnull(var5.bom_stk_qty,0.0) - ifnull(var5.Stock_Qty,0.0);
var5.Plan_Qty=var5.Actual_Qty;
}
if(var5.Stock_Qty > var5.BoM_Qty)
{
var5.Blocked_Qty=var5.Actual_Qty;
}
if(var5.Stock_Qty != 0 && var5.Blocked_Qty > var5.Stock_Qty || var5.Stock_Qty < var5.BoM_Qty)
{
var5.Blocked_Qty=var5.Stock_Qty;
}
for each var5gp in input.BoM_Details_General_Purchase
{
if(var5gp.Part_No.Part_No.startswith("BT") == true || var5gp.Part_No.Part_No.startswith("NT") == true || var5gp.Part_No.Part_No.startswith("WS") == true)
{
//If the CWPL is RIM, Corresponding General Pruchase is BT,NT,WS -->So this line is written to check the General Purchase.
if(var5.Part_No.Part_No.contains("_UP") == true)
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
//If RIM means, var.Actual_qty should be passed to this BOM_Qty
var5gp.BoM_Qty=ifnull(var5.Actual_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=ifnull(var5gp.Plan_Qty,0);
}
}
else
{
if(var5gp.Level == var5.Level && var5gp.Level == "Level-5")
{
row.Tot_BoM_Qty=ifnull(row.BoM_Qty,0) * ifnull(row.bom_stk_qty,0.0);
var5gp.BoM_Qty=var5.Actual_Qty;
// var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
//Below ifelse is to check negative value
if(ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0) >= 0)
{
var5gp.Plan_Qty=ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0) - ifnull(var5gp.Stock_Qty,0);
}
else
{
var5gp.Plan_Qty=ifnull(var5gp.Stock_Qty,0) - ifnull(var5gp.BoM_Qty,0) * ifnull(var5gp.Org_BoM_Qty,0.0);
}
//Above ifelse ends here
var5gp.Purchase_Qty=var5gp.Plan_Qty;
}
}
}
}
}
//cwplrec5.Plan_Qty=ifnull(cwplrec5.BoM_Qty,0.0) * ifnull(cwplrec5.bom_stk_qty,0.0) - ifnull(cwplrec5.Stock_Qty,0.0);
//cwplrec5.Actual_Qty=cwplrec5.Plan_Qty;
}
}
}
//Level 5 checking close
for each rec in input.BoM_Details_CWPL
{
if(rec.Actual_Qty < 0)
{
rec.Actual_Qty=0;
rec.Plan_Qty=0;
rec.BoM_Qty=0;
}
if(rec.Blocked_Qty < 0)
{
rec.Blocked_Qty=0;
}
if(rec.Stock_Qty > rec.BoM_Qty)
{
rec.Blocked_Qty=rec.Actual_Qty;
}
if(rec.Stock_Qty != 0 && rec.Blocked_Qty > rec.Stock_Qty || rec.Stock_Qty < rec.BoM_Qty)
{
rec.Blocked_Qty=rec.Stock_Qty;
}
}
for each rec1 in input.BoM_Details_General_Purchase
{
if(rec1.Blocked_Qty < 0)
{
rec1.Blocked_Qty=0;
}
if(rec1.Purchase_Qty < 0 || rec1.BoM_Qty < 0)
{
rec1.Purchase_Qty=0;
rec1.Plan_Qty=0;
rec1.BoM_Qty=0;
}
if(rec1.Stock_Qty > rec1.BoM_Qty)
{
rec1.Blocked_Qty=rec1.Purchase_Qty;
}
if(rec1.Stock_Qty != 0 && rec1.Blocked_Qty > rec1.Stock_Qty || rec1.Stock_Qty < rec1.BoM_Qty)
{
rec1.Blocked_Qty=rec1.Stock_Qty;
}
}
try
{
var = 0;
fet_wosub = Work_Order_Subform[ID == input.Work_Order_Subform_ID];
fet_wo = Work_Order[ID == fet_wosub.Work_Order_Exis_ID];
fetsosub = Sale_Order_Subform[Work_Order_RECID == fet_wo.ID];
fet_wosub.MRP_ID=input.ID;
fet_wr = Warehouse[ID != null];
if(isBlank(input.MRP_No.trim()))
{
var = 1;
input.MRP_No = thisapp.Common.Number_Function_New("Material Resource Planning");
}
if(input.Process_to_Submit = "Draft")
{
input.MRP_Status = "Draft";
fet_wo.WO_Status="MRP Draft";
fet_wosub.Work_Order_Status="MRP Draft";
if(fetsosub.count() > 0)
{
fetsosub.WO_Status_in_sosub="MRP Draft";
}
indnthead = "No";
indsno = 0;
for each rec in input.BoM_Details_General_Purchase
{
if(rec.Draft_Indent == true && input.Process_to_Submit == "Draft" && rec.Purchase_Qty > 0)
{
indsno = indsno + 1;
thisapp.routing.RoutingFunction(input.ID);
str1 = thisapp.Common.Number_Function_New("Purchase Requisition");
if(indnthead == "No" && rec.Purchase_Qty > 0)
{
fet_emp = Employee_Details[Employee_Email == zoho.loginuserid];
//Check for the Part No is already exists in the Indent without generation the purchase order.
chkpartno = Indent_Sub_Form[Part_No == rec.Part_No && Status == "Indent against WO" && Purpose_of_Indent == "For MRP"];
if(chkpartno.count() == 0)
{
insrec = insert into Indent
[
Indent_Request_Date=zoho.currentdate
Request_Raised_By=fet_emp.ID
Indent_No=str1
Material_Type="Standard"
Department=fet_emp.Department_Name
Approval_Status="Approved"
Indent_Type="System Generated - Planning"
Status="Indent against WO"
Remarks="For Production Process"
MRP_ID=input.ID
Added_User=zoho.loginuser
];
indnthead = "Yes";
}
}
if(chkpartno.count() == 0)
{
subins = insert into Indent_Sub_Form
[
Added_User=zoho.loginuser
Indent_Form_RECID=insrec
S_No=indsno
Part_No=rec.Part_No
Part_Description=rec.Part_Name
UoM=rec.UoM
Required_Qty=rec.Purchase_Qty
Purpose_of_Indent="For MRP"
Indent_No=str1
Status="Indent against WO"
Work_Order_No_ms=input.Work_Order_ID
];
}
else
{
wonolist = List();
wonolist.addall(chkpartno.Work_Order_No_ms);
wonolist.add(input.Work_Order_No1);
chkpartno.Work_Order_No_ms=wonolist;
chkpartno.Required_Qty=ifnull(rec.Purchase_Qty,0) + ifnull(chkpartno.Required_Qty,0);
}
thisapp.MRP.Indent_Email_MRP(input.ID);
}
}
}
else if(input.Process_to_Submit = "Send for Approval")
{
input.MRP_Status = "Waiting for Approval";
input.Approval = "Pending";
}
else if(input.Process_to_Submit = "Submit")
{
input.Approval = "Approved";
input.MRP_Status = "MRP Done";
fet_wo.WO_Status="MRP Done";
if(fetsosub.count() > 0)
{
fetsosub.WO_Status_in_sosub="MRP Done";
}
}
if(fet_wosub.Work_Order_Status == "MRP Rejected")
{
fet_wosub.Work_Order_Status="WO Created";
}
if(input.Auto_Approval == "Yes")
{
input.MRP_Status = "MRP Done";
fet_wo.MRP_Status="MRP Done";
fet_wosub.Work_Order_Status="MRP Done";
input.Approval = "Approved";
for each blk in input.BoM_Details_CWPL
{
fet_inv = Inventory[Part_No == blk.Part_No && Available_Qty > 0] sort by Available_Qty desc;
if(fet_inv.count() > 0)
{
if(blk.Block_Qty = True)
{
balqty = 0;
i = 1;
for each invcwplrec in fet_inv
{
//blocked Quantiy is less inventory available qty
if(blk.Blocked_Qty <= invcwplrec.Available_Qty && i == 1)
{
//info "issued qty is less than total qty";
invcwplrec.Available_Qty=ifnull(invcwplrec.Available_Qty,0.0) - ifnull(blk.Blocked_Qty,0.0);
invcwplrec.Block_Qty=ifnull(blk.Blocked_Qty,0) + ifnull(invcwplrec.Block_Qty,0);
}
//blocked Quantiy is more than inventory available qty
else if(blk.Blocked_Qty > invcwplrec.Available_Qty && i == 1)
{
//info "issued qty is more than total qty";
balqty = ifnull(blk.Blocked_Qty,0.0) - ifnull(invcwplrec.Available_Qty,0.0);
invcwplrec.Available_Qty=0;
invcwplrec.Block_Qty=ifnull(blk.Blocked_Qty,0) + ifnull(invcwplrec.Block_Qty,0);
}
//for first time it should not get inside the loop
if(balqty > 0 && i > 1)
{
//info "balance qty is more than zero";
//Balance Qty is less
if(balqty <= invcwplrec.Available_Qty)
{
//info "balance qty is less than total qty";
invcwplrec.Available_Qty=ifnull(invcwplrec.Available_Qty,0.0) - ifnull(balqty,0.0);
invcwplrec.Block_Qty=ifnull(blk.Blocked_Qty,0) + ifnull(invcwplrec.Block_Qty,0);
balqty = 0;
}
//----Balance Qty is More------
else if(balqty >= invcwplrec.Available_Qty)
{
//info "balance qty is greater than total qty";
balqty = ifnull(balqty,0.0) - ifnull(invcwplrec.Available_Qty,0.0);
invcwplrec.Available_Qty=0;
invcwplrec.Block_Qty=ifnull(balqty,0) + ifnull(invcwplrec.Block_Qty,0);
}
}
if(balqty == 0)
{
break;
}
i = i + 1;
}
if(blk.Blocked_Qty > 0)
{
insblock = insert into Block_Quantity
[
Part_No=blk.Part_No
Part_Name=blk.Part_Name
Form_Type="MRP"
Block_Qty=blk.Blocked_Qty
MRP_RECID=input.ID
WO_No=fet_wo.ID
Status="Blocked from MRP"
Added_User=zoho.loginuser
];
}
}
}
}
for each blk1 in input.BoM_Details_General_Purchase
{
fet_virstk = Inventory[Part_No == blk1.Part_No && Available_Qty > 0] sort by Available_Qty desc;
if(fet_virstk.count() > 0)
{
if(blk1.Block_Qty = True)
{
balqty = 0;
i1 = 1;
for each invgprec in fet_virstk
{
// info balqty;
// info i1;
//if(input.MRP_Qty >= fet_inv.Available_Qty && input.MRP_Qty >= fet_inv.Total_Qty)
if(blk1.Blocked_Qty <= invgprec.Available_Qty && i1 == 1)
{
//info "blocked qty is less than total qty";
invgprec.Block_Qty=ifnull(blk1.Blocked_Qty,0) + ifnull(invgprec.Block_Qty,0);
invgprec.Available_Qty=ifnull(invgprec.Available_Qty,0) - ifnull(blk1.Blocked_Qty,0);
}
else if(blk1.Blocked_Qty > invgprec.Available_Qty && i == 1)
{
//info "blocked qty is more than available qty";
balqty = ifnull(blk1.Blocked_Qty,0.0) - ifnull(invgprec.Available_Qty,0.0);
invgprec.Available_Qty=0;
invgprec.Block_Qty=ifnull(blk1.Blocked_Qty,0) + ifnull(invgprec.Block_Qty,0);
}
if(balqty > 0 && i > 1)
{
//info "balaance qty is more than zero";
//Balance Qty is less
if(balqty <= invgprec.Available_Qty)
{
// info "balance qty is less than available qty";
invgprec.Available_Qty=ifnull(invgprec.Available_Qty,0.0) - ifnull(balqty,0.0);
invgprec.Block_Qty=ifnull(blk1.Blocked_Qty,0) + ifnull(invgprec.Block_Qty,0);
balqty = 0;
}
//Balance Qty is More
else if(balqty >= invgprec.Available_Qty)
{
//info "balance qty is greater than available qty";
balqty = ifnull(balqty,0.0) - ifnull(invgprec.Available_Qty,0.0);
invgprec.Available_Qty=0;
invgprec.Block_Qty=ifnull(blk1.Blocked_Qty,0) + ifnull(invgprec.Block_Qty,0);
}
}
if(balqty == 0)
{
//info "before break";
break;
}
i = i + 1;
}
}
}
if(blk1.Blocked_Qty > 0)
{
insblock = insert into Block_Quantity
[
Part_No=blk1.Part_No
Part_Name=blk1.Part_Name
Form_Type="MRP"
Block_Qty=blk1.Blocked_Qty
MRP_RECID=input.ID
MRP_No=input.MRP_No
WO_No=fet_wo.ID
Status="Blocked from MRP"
Added_User=zoho.loginuser
];
}
}
}
else if(input.Process_to_Submit == "Submit" && input.Auto_Approval == "Yes" || input.Auto_Approval == "No")
{
input.MRP_Status = "MRP Done";
fet_wo.MRP_Status="MRP Done";
fet_wosub.Work_Order_Status="MRP Done";
input.Approval = "Approved";
if(fetsosub.count() > 0)
{
fetsosub.WO_Status_in_sosub="MRP Done";
}
for each blkcwpl in input.BoM_Details_CWPL
{
fet_inve = Inventory[Part_No == blkcwpl.Part_No && Available_Qty > 0] sort by Available_Qty desc;
if(fet_inve.count() > 0)
{
if(blkcwpl.Block_Qty = True)
{
balqty = 0;
i = 1;
for each invcwplrec1 in fet_inve
{
//blocked Quantiy is less inventory available qty
if(blkcwpl.Blocked_Qty <= invcwplrec1.Available_Qty && i == 1)
{
// info "issued qty is less than total qty";
invcwplrec1.Available_Qty=ifnull(invcwplrec1.Available_Qty,0.0) - ifnull(blkcwpl.Blocked_Qty,0.0);
invcwplrec1.Block_Qty=ifnull(blkcwpl.Blocked_Qty,0) + ifnull(invcwplrec1.Block_Qty,0);
}
//blocked Quantiy is more than inventory available qty
else if(blkcwpl.Blocked_Qty > invcwplrec1.Available_Qty && i == 1)
{
//info "issued qty is more than total qty";
balqty = ifnull(blkcwpl.Blocked_Qty,0.0) - ifnull(invcwplrec1.Available_Qty,0.0);
invcwplrec1.Available_Qty=0;
invcwplrec1.Block_Qty=ifnull(blkcwpl.Blocked_Qty,0) + ifnull(invcwplrec1.Block_Qty,0);
}
//for first time it should not get inside the loop
if(balqty > 0 && i > 1)
{
//info "balance qty is more than zero";
//Balance Qty is less
if(balqty <= invcwplrec1.Available_Qty)
{
//info "balance qty is less than total qty";
invcwplrec1.Available_Qty=ifnull(invcwplrec1.Available_Qty,0.0) - ifnull(balqty,0.0);
invcwplrec1.Block_Qty=ifnull(blkcwpl.Blocked_Qty,0) + ifnull(invcwplrec1.Block_Qty,0);
balqty = 0;
}
//----Balance Qty is More------
else if(balqty >= invcwplrec1.Available_Qty)
{
//info "balance qty is greater than total qty";
balqty = ifnull(balqty,0.0) - ifnull(invcwplrec1.Available_Qty,0.0);
invcwplrec1.Available_Qty=0;
invcwplrec1.Block_Qty=ifnull(balqty,0) + ifnull(invcwplrec1.Block_Qty,0);
}
}
if(balqty == 0)
{
break;
}
i = i + 1;
}
if(blkcwpl.Blocked_Qty > 0)
{
insblock = insert into Block_Quantity
[
Part_No=blkcwpl.Part_No
Part_Name=blkcwpl.Part_Name
Form_Type="MRP"
Block_Qty=blkcwpl.Blocked_Qty
WO_No=fet_wo.ID
MRP_RECID=input.ID
Status="Blocked from MRP"
Added_User=zoho.loginuser
];
}
}
}
}
for each blkgp in input.BoM_Details_General_Purchase
{
fet_virstk1 = Inventory[Part_No == blkgp.Part_No && Available_Qty > 0] sort by Available_Qty desc;
if(fet_virstk1.count() > 0)
{
if(blkgp.Block_Qty = True)
{
balqty = 0;
i1 = 1;
for each invgprec1 in fet_virstk1
{
// info balqty;
// info i1;
//if(input.MRP_Qty >= fet_inve.Available_Qty && input.MRP_Qty >= fet_inv.Total_Qty)
if(blkgp.Blocked_Qty <= invgprec1.Available_Qty && i1 == 1)
{
//info "blocked qty is less than total qty";
invgprec1.Block_Qty=ifnull(blkgp.Blocked_Qty,0) + ifnull(invgprec1.Block_Qty,0);
invgprec1.Available_Qty=ifnull(invgprec1.Available_Qty,0) - ifnull(blkgp.Blocked_Qty,0);
}
else if(blkgp.Blocked_Qty > invgprec1.Available_Qty && i1 == 1)
{
//info "blocked qty is more than available qty";
balqty = ifnull(blkgp.Blocked_Qty,0.0) - ifnull(invgprec1.Available_Qty,0.0);
invgprec1.Available_Qty=0;
invgprec1.Block_Qty=ifnull(blkgp.Blocked_Qty,0) + ifnull(invgprec1.Block_Qty,0);
}
if(balqty > 0 && i1 > 1)
{
//info "balaance qty is more than zero";
//Balance Qty is less
if(balqty <= invgprec1.Available_Qty)
{
// info "balance qty is less than available qty";
invgprec1.Available_Qty=ifnull(invgprec1.Available_Qty,0.0) - ifnull(balqty,0.0);
invgprec1.Block_Qty=ifnull(blkgp.Blocked_Qty,0) + ifnull(invgprec1.Block_Qty,0);
balqty = 0;
}
//Balance Qty is More
else if(balqty >= invgprec1.Available_Qty)
{
// info "balance qty is greater than available qty";
balqty = ifnull(balqty,0.0) - ifnull(invgprec1.Available_Qty,0.0);
invgprec1.Available_Qty=0;
invgprec1.Block_Qty=ifnull(blkgp.Blocked_Qty,0) + ifnull(invgprec1.Block_Qty,0);
}
}
if(balqty == 0)
{
//info "before break";
break;
}
i1 = i1 + 1;
}
}
}
if(blkgp.Blocked_Qty > 0)
{
insblock = insert into Block_Quantity
[
Part_No=blkgp.Part_No
Part_Name=blkgp.Part_Name
Form_Type="MRP"
Block_Qty=blkgp.Blocked_Qty
MRP_RECID=input.ID
WO_No=fet_wo.ID
Status="Blocked from MRP"
Added_User=zoho.loginuser
];
}
}
}
openUrl("#Form:Alert_Messages?Status=" + "MATRES" + "&Value=" + input.MRP_No + "&zc_LoadIn=dialog","same window");
}
catch (e)
{
sendmail
[
from :"erp@carrierwheels.com"
to :"parthasarathy.m@synprosoft.com"
subject :"MRP Created Or Edited Successful Form Submission try & catch" + input.MRP_No
message :e
]
}
//Last Corectly Made changes in ->Check the below version
//Version 73.7
//01-Jul-2024 18:25:55
hide Reset1;
hide MRP_No;
fet_pref = Preferences[Module_Name = "MRP"];
input.Auto_Approval = fet_pref.Auto_Approval;
if(input.Work_Order_Subform_ID != null)
{
fet_wosub = Work_Order_Subform[ID == input.Work_Order_Subform_ID];
fet_wo = Work_Order[ID == fet_wosub.Work_Order_Exis_ID];
if(fet_wo.Form_Mode == "Direct WO")
{
hide Sales_Order_No;
hide Customer_Name;
}
input.Sales_Order_No = fet_wo.Sales_Order_Nos;
input.Customer_Name = fet_wo.Customer_Name;
input.Work_Order_Date = fet_wo.Work_Order_Date;
input.Part_No = fet_wosub.Part_No;
input.Part_Name = fet_wosub.Part_Description;
input.Category = fet_wo.Category;
input.Sub_Category = fet_wo.Sub_Category;
input.MRP_Qty = fet_wosub.WO_Qty;
input.Work_Order_No1 = fet_wo.ID;
fet_bom = Create_BOM[Part_No == input.Work_Order_Subform_ID.Part_No && Status == "Active"];
level1 = BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == input.Part_No && BOM_FG_Exis_ID.Status == "Active"];
inside_gplevel1 = 0;
inside_gplevel2 = 0;
inside_gplevel3 = 0;
inside_gplevel4 = 0;
inside_gplevel5 = 0;
for each levellist1 in level1
{
level2 = BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist1.Part_No && BOM_FG_Exis_ID.Status == "Active"];
if(levellist1.Material_Item_Type.Material_Type == "CWPL Products" || levellist1.Material_Item_Type.Material_Type == "HR Coils and Sheets")
{
cwplrow = MRP.BoM_Details_CWPL();
inven1 = Inventory[Part_No == levellist1.Part_No].sum(Available_Qty);
cwplrow.Part_No=levellist1.Part_No;
cwplrow.Part_Name=levellist1.Part_Description;
cwplrow.UoM=levellist1.UoM;
cwplrow.Work_Order_No=fet_wo.ID;
cwplrow.Stock_Qty=inven1.round(0);
cwplrow.Material_Item_Type=levellist1.Material_Item_Type;
cwplrow.bom_stk_qty=ifnull(levellist1.Qty,0.0);
cwplrow.Level="Level-1";
cwplrow.test_level="Level-1";
cwplrow.Create_BoM_RECID=fet_bom.ID;
cwplrow.Tot_BoM_Qty=ifnull(input.MRP_Qty,0) * ifnull(cwplrow.bom_stk_qty,0.0);
//CALCULATION PART
if(cwplrow.Stock_Qty >= input.MRP_Qty)
{
cwplrow.Actual_Qty=0;
cwplrow.Plan_Qty=0;
cwplrow.BoM_Qty=ifnull(input.MRP_Qty,0);
//cwplrow.BoM_Qty=0;
}
else if(cwplrow.Stock_Qty < input.MRP_Qty)
{
cwplrow.Actual_Qty=ifnull(input.MRP_Qty,0) * ifnull(cwplrow.bom_stk_qty,0.0) - ifnull(cwplrow.Stock_Qty,0);
cwplrow.BoM_Qty=ifnull(input.MRP_Qty,0);
cwplrow.Plan_Qty=ifnull(input.MRP_Qty,0) * ifnull(cwplrow.bom_stk_qty,0.0) - ifnull(cwplrow.Stock_Qty,0);
}
else if(cwplrow.Stock_Qty > input.MRP_Qty)
{
cwplrow.BoM_Qty=ifnull(input.MRP_Qty,0);
cwplrow.Actual_Qty=0;
cwplrow.Plan_Qty=0;
}
input.BoM_Details_CWPL.insert(cwplrow);
}
for each abc in BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == input.Part_No && BOM_FG_Exis_ID.Status == "Active" && Material_Item_Type.Material_Type == "General Purchase"]
{
if(inside_gplevel1 == 0)
{
if(abc.Material_Item_Type.Material_Type == "General Purchase")
{
fetind = Indent_Sub_Form[Part_No == abc.Part_No].sum(Required_Qty);
dprsub = DPR_General_Purchase_Stock_Qty[Part_No == abc.Part_No];
gprow = MRP.BoM_Details_General_Purchase();
inven = Inventory[Part_No == abc.Part_No].sum(Available_Qty);
gprow.Part_No=abc.Part_No;
gprow.Part_Name=abc.Part_Description;
gprow.UoM=abc.UoM;
gprow.Work_Order_No=fet_wo.ID;
gprow.Material_Item_Type=abc.Material_Item_Type;
gprow.Org_BoM_Qty=ifnull(abc.Qty,0.0);
gprow.Stock_Qty=inven.round(0);
gprow.Indent_Qty=fetind;
gprow.Level="Level";
gprow.test_level="Level-1";
gprow.Create_BoM_RECID=fet_bom.ID;
gprow.BoM_Qty=ifnull(input.MRP_Qty,0);
gprow.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//CALCULATION PART
//Below ifelse is to check negative value
if(gprow.Material_Center_Qty == 0)
{
if(ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Stock_Qty,0) >= 0)
{
gprow.Tot_BoM_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
gprow.Plan_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Stock_Qty,0);
}
else if(ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Stock_Qty,0) < 0)
{
gprow.Tot_BoM_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
gprow.Plan_Qty=ifnull(gprow.Stock_Qty,0) - ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
}
gprow.Purchase_Qty=ifnull(gprow.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow);
}
else if(gprow.Material_Center_Qty > 0)
{
if(ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Material_Center_Qty,0) >= 0)
{
gprow.Tot_BoM_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
gprow.Plan_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Material_Center_Qty,0);
}
else if(ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0) - ifnull(gprow.Material_Center_Qty,0) < 0)
{
gprow.Tot_BoM_Qty=ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
gprow.Plan_Qty=ifnull(gprow.Material_Center_Qty,0) - ifnull(gprow.BoM_Qty,0) * ifnull(gprow.Org_BoM_Qty,0.0);
}
gprow.Purchase_Qty=ifnull(gprow.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow);
}
}
}
}
inside_gplevel1 = 1;
cnt = 0;
for each levellist2 in level2
{
crtbom = Create_BOM[BoM_FG_Subform_ID == levellist2.ID && Status == "Active"];
cnt = cnt + 1;
level3 = BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist2.Part_No && BOM_FG_Exis_ID.Status == "Active"];
if(levellist2.Material_Item_Type.Material_Type == "CWPL Products" || levellist2.Material_Item_Type.Material_Type == "HR Coils and Sheets")
{
cwplrow2 = MRP.BoM_Details_CWPL();
inven1 = Inventory[Part_No == levellist2.Part_No].sum(Available_Qty);
cwplrow2.Part_No=levellist2.Part_No;
cwplrow2.Part_Name=levellist2.Part_Description;
cwplrow2.UoM=levellist2.UoM;
cwplrow2.Work_Order_No=fet_wo.ID;
cwplrow2.Stock_Qty=inven1.round(0);
cwplrow2.Material_Item_Type=levellist2.Material_Item_Type;
cwplrow2.bom_stk_qty=ifnull(levellist2.Qty,0.0);
cwplrow2.Level="Level-2";
cwplrow2.test_level="Level1." + cnt;
cwplrow2.Create_BoM_RECID=crtbom.ID;
cwplrow2.BoM_Qty=cwplrow.Actual_Qty;
cwplrow2.Tot_BoM_Qty=ifnull(cwplrow2.BoM_Qty,0.0) * ifnull(cwplrow2.bom_stk_qty,0.0);
//CALCULATION PART
planqty = 0.0;
stkqty = 0.0;
if(cwplrow2.Stock_Qty >= cwplrow2.Tot_BoM_Qty)
{
cwplrow2.Actual_Qty=0;
//cwplrow2.BoM_Qty=0;
cwplrow2.Plan_Qty=0;
}
if(cwplrow2.Stock_Qty < cwplrow2.Tot_BoM_Qty && cwplrow2.BoM_Qty != null)
{
planqty = ifnull(cwplrow2.BoM_Qty,0.0) * ifnull(cwplrow2.bom_stk_qty,0.0);
stkqty = planqty - ifnull(cwplrow2.Stock_Qty,0.0);
cwplrow2.Actual_Qty=stkqty;
cwplrow2.Plan_Qty=stkqty;
}
input.BoM_Details_CWPL.insert(cwplrow2);
}
for each abc2 in BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist1.Part_No && Material_Item_Type.Material_Type == "General Purchase" && BOM_FG_Exis_ID.Status == "Active"]
{
if(inside_gplevel2 == 0)
{
if(abc2.Material_Item_Type.Material_Type == "General Purchase")
{
fetind = Indent_Sub_Form[Part_No == abc2.Part_No].sum(Required_Qty);
dprsub = DPR_General_Purchase_Stock_Qty[Part_No == abc2.Part_No];
gprow2 = MRP.BoM_Details_General_Purchase();
inven = Inventory[Part_No == abc2.Part_No].sum(Available_Qty);
gprow2.Part_No=abc2.Part_No;
gprow2.Part_Name=abc2.Part_Description;
gprow2.UoM=abc2.UoM;
gprow2.Work_Order_No=fet_wo.ID;
gprow2.Material_Item_Type=abc2.Material_Item_Type;
gprow2.Org_BoM_Qty=ifnull(abc2.Qty,0.0);
gprow2.Stock_Qty=inven.round(0);
gprow2.Indent_Qty=fetind;
gprow2.Level="Level-1";
gprow2.test_level="Level1." + cnt;
gprow2.Create_BoM_RECID=crtbom.ID;
//CALCULATION PART
gprow2.BoM_Qty=ifnull(cwplrow.Actual_Qty,0);
gprow2.Tot_BoM_Qty=ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0);
gprow2.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//Below ifelse is to check negative value
if(gprow2.Material_Center_Qty == 0)
{
if(ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0) - ifnull(gprow2.Stock_Qty,0) >= 0)
{
gprow2.Plan_Qty=ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0) - ifnull(gprow2.Stock_Qty,0);
}
else
{
gprow2.Plan_Qty=ifnull(gprow2.Stock_Qty,0) - ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0);
}
gprow2.Purchase_Qty=ifnull(gprow2.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow2);
}
else if(gprow2.Material_Center_Qty > 0)
{
if(ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0) - ifnull(gprow2.Material_Center_Qty,0) >= 0)
{
gprow2.Tot_BoM_Qty=ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0);
gprow2.Plan_Qty=ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0) - ifnull(gprow2.Material_Center_Qty,0);
}
else if(ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0) - ifnull(gprow2.Material_Center_Qty,0) < 0)
{
gprow2.Tot_BoM_Qty=ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0);
gprow2.Plan_Qty=ifnull(gprow2.Material_Center_Qty,0) - ifnull(gprow2.BoM_Qty,0) * ifnull(gprow2.Org_BoM_Qty,0.0);
}
gprow2.Purchase_Qty=ifnull(gprow2.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow2);
}
}
}
}
inside_gplevel2 = 1;
cnt1 = 0;
for each levellist3 in level3
{
crtbom1 = Create_BOM[BoM_FG_Subform_ID == levellist3.ID && Status == "Active"];
cnt1 = cnt1 + 1;
level4 = BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist3.Part_No && BOM_FG_Exis_ID.Status == "Active"];
if(levellist3.Material_Item_Type.Material_Type == "CWPL Products" || levellist3.Material_Item_Type.Material_Type == "HR Coils and Sheets")
{
cwplrow3 = MRP.BoM_Details_CWPL();
inven1 = Inventory[Part_No == levellist3.Part_No].sum(Available_Qty);
cwplrow3.Part_No=levellist3.Part_No;
cwplrow3.Part_Name=levellist3.Part_Description;
cwplrow3.UoM=levellist3.UoM;
cwplrow3.Work_Order_No=fet_wo.ID;
cwplrow3.Stock_Qty=inven1.round(0);
cwplrow3.Material_Item_Type=levellist3.Material_Item_Type;
cwplrow3.bom_stk_qty=ifnull(levellist3.Qty,0.0);
cwplrow3.Level="Level-3";
cwplrow3.test_level="Level-1.1" + "." + cnt1;
cwplrow3.Create_BoM_RECID=crtbom1.ID;
cwplrow3.BoM_Qty=cwplrow2.Actual_Qty;
cwplrow3.Tot_BoM_Qty=ifnull(cwplrow3.BoM_Qty,0.0) * ifnull(cwplrow3.bom_stk_qty,0.0);
//CALCULATION PART
planqty = 0.0;
stkqty = 0.0;
if(cwplrow3.Stock_Qty >= cwplrow3.Tot_BoM_Qty)
{
cwplrow3.Actual_Qty=0;
// cwplrow3.BoM_Qty=0;
cwplrow3.Plan_Qty=0;
}
if(cwplrow3.Stock_Qty < cwplrow3.Tot_BoM_Qty && cwplrow3.Tot_BoM_Qty != null)
{
planqty = ifnull(cwplrow3.BoM_Qty,0.0) * ifnull(cwplrow3.bom_stk_qty,0.0);
stkqty = planqty - ifnull(cwplrow3.Stock_Qty,0.0);
cwplrow3.Actual_Qty=stkqty;
cwplrow3.Plan_Qty=stkqty;
}
input.BoM_Details_CWPL.insert(cwplrow3);
}
for each abc3 in BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist2.Part_No && Material_Item_Type.Material_Type == "General Purchase" && BOM_FG_Exis_ID.Status == "Active"]
{
if(inside_gplevel3 == 0)
{
if(abc3.Material_Item_Type.Material_Type == "General Purchase")
{
fetind = Indent_Sub_Form[Part_No == abc3.Part_No].sum(Required_Qty);
dprsub = DPR_General_Purchase_Stock_Qty[Part_No == abc3.Part_No];
gprow3 = MRP.BoM_Details_General_Purchase();
inven = Inventory[Part_No == abc3.Part_No].sum(Available_Qty);
gprow3.Part_No=abc3.Part_No;
gprow3.Part_Name=abc3.Part_Description;
gprow3.UoM=abc3.UoM;
gprow3.Work_Order_No=fet_wo.ID;
gprow3.Material_Item_Type=abc3.Material_Item_Type;
gprow3.Org_BoM_Qty=ifnull(abc3.Qty,0.0);
gprow3.Stock_Qty=inven.round(0);
gprow3.Indent_Qty=fetind;
gprow3.Level="Level-2";
gprow3.test_level="Level-1.1" + "." + cnt1;
gprow3.Create_BoM_RECID=crtbom1.ID;
gprow3.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//CALCULATION PART
gprow3.BoM_Qty=ifnull(cwplrow2.Actual_Qty,0);
gprow3.Tot_BoM_Qty=ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0);
gprow3.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//Below ifelse is to check negative value
if(gprow3.Material_Center_Qty == 0)
{
if(ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0) - ifnull(gprow3.Stock_Qty,0) >= 0)
{
gprow3.Plan_Qty=ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0) - ifnull(gprow3.Stock_Qty,0);
}
else
{
gprow3.Plan_Qty=ifnull(gprow3.Stock_Qty,0) - ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0);
}
gprow3.Purchase_Qty=ifnull(gprow3.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow3);
}
else if(gprow3.Material_Center_Qty > 0)
{
if(ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0) - ifnull(gprow3.Material_Center_Qty,0) >= 0)
{
gprow3.Tot_BoM_Qty=ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0);
gprow3.Plan_Qty=ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0) - ifnull(gprow3.Material_Center_Qty,0);
}
else if(ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0) - ifnull(gprow3.Material_Center_Qty,0) < 0)
{
gprow3.Tot_BoM_Qty=ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0);
gprow3.Plan_Qty=ifnull(gprow3.Material_Center_Qty,0) - ifnull(gprow3.BoM_Qty,0) * ifnull(gprow3.Org_BoM_Qty,0.0);
}
gprow3.Purchase_Qty=ifnull(gprow3.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow3);
}
}
}
}
inside_gplevel3 = 1;
cnt2 = 0;
for each levellist4 in level4
{
crtbom2 = Create_BOM[BoM_FG_Subform_ID == levellist4.ID && Status == "Active"];
level5 = BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist4.Part_No && BOM_FG_Exis_ID.Status == "Active"];
cnt2 = cnt2 + 1;
if(levellist4.Material_Item_Type.Material_Type == "CWPL Products" || levellist4.Material_Item_Type.Material_Type == "HR Coils and Sheets")
{
cwplrow4 = MRP.BoM_Details_CWPL();
inven1 = Inventory[Part_No == levellist4.Part_No].sum(Available_Qty);
cwplrow4.Part_No=levellist4.Part_No;
cwplrow4.Part_Name=levellist4.Part_Description;
cwplrow4.UoM=levellist4.UoM;
cwplrow4.Work_Order_No=fet_wo.ID;
cwplrow4.Stock_Qty=inven1.round(0);
cwplrow4.Material_Item_Type=levellist4.Material_Item_Type;
cwplrow4.bom_stk_qty=ifnull(levellist4.Qty,0.0);
cwplrow4.Level="Level-4";
cwplrow4.test_level="Level-1.1" + "." + cnt1 + "." + cnt2;
cwplrow4.Create_BoM_RECID=crtbom2.ID;
cwplrow4.BoM_Qty=cwplrow3.Actual_Qty;
cwplrow4.Tot_BoM_Qty=ifnull(cwplrow4.bom_stk_qty,0.0) * ifnull(cwplrow4.BoM_Qty,0.0);
//CALCULATION PART
planqty = 0.0;
stkqty = 0.0;
if(cwplrow4.Stock_Qty >= cwplrow4.Tot_BoM_Qty)
{
cwplrow4.Actual_Qty=0;
//cwplrow4.BoM_Qty=0;
cwplrow4.Plan_Qty=0;
}
if(cwplrow4.Stock_Qty < cwplrow4.Tot_BoM_Qty && cwplrow4.Tot_BoM_Qty != null)
{
planqty = ifnull(cwplrow4.BoM_Qty,0.0) * ifnull(cwplrow4.bom_stk_qty,0.0);
stkqty = planqty - ifnull(cwplrow4.Stock_Qty,0.0);
cwplrow4.Actual_Qty=stkqty;
cwplrow4.Plan_Qty=stkqty;
}
input.BoM_Details_CWPL.insert(cwplrow4);
}
for each abc4 in BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist3.Part_No && Material_Item_Type.Material_Type == "General Purchase" && BOM_FG_Exis_ID.Status == "Active"]
{
if(inside_gplevel4 == 0)
{
if(abc4.Material_Item_Type.Material_Type == "General Purchase")
{
fetind = Indent_Sub_Form[Part_No == abc4.Part_No].sum(Required_Qty);
dprsub = DPR_General_Purchase_Stock_Qty[Part_No == abc4.Part_No];
gprow4 = MRP.BoM_Details_General_Purchase();
inven = Inventory[Part_No == abc4.Part_No].sum(Available_Qty);
gprow4.Part_No=abc4.Part_No;
gprow4.Part_Name=abc4.Part_Description;
gprow4.UoM=abc4.UoM;
gprow4.Work_Order_No=fet_wo.ID;
gprow4.Material_Item_Type=abc4.Material_Item_Type;
gprow4.Org_BoM_Qty=ifnull(abc4.Qty,0.0);
gprow4.Stock_Qty=inven.round(0);
gprow4.Indent_Qty=fetind;
gprow4.Level="Level-3";
gprow4.test_level="Level-1.1" + "." + cnt1 + "." + cnt2;
gprow4.Create_BoM_RECID=crtbom2.ID;
gprow4.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//CALCULATION PART
gprow4.BoM_Qty=ifnull(cwplrow3.Actual_Qty,0);
gprow4.Tot_BoM_Qty=ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0);
//Below ifelse is to check negative value
if(gprow4.Material_Center_Qty == 0)
{
if(ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0) - ifnull(gprow4.Stock_Qty,0) >= 0)
{
gprow4.Plan_Qty=ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0) - ifnull(gprow4.Stock_Qty,0);
}
else
{
gprow4.Plan_Qty=ifnull(gprow4.Stock_Qty,0) - ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0);
}
gprow4.Purchase_Qty=ifnull(gprow4.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow4);
}
else if(gprow4.Material_Center_Qty > 0)
{
if(ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0) - ifnull(gprow4.Material_Center_Qty,0) >= 0)
{
gprow4.Tot_BoM_Qty=ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0);
gprow4.Plan_Qty=ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0) - ifnull(gprow4.Material_Center_Qty,0);
}
else if(ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0) - ifnull(gprow4.Material_Center_Qty,0) < 0)
{
gprow4.Tot_BoM_Qty=ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0);
gprow4.Plan_Qty=ifnull(gprow4.Material_Center_Qty,0) - ifnull(gprow4.BoM_Qty,0) * ifnull(gprow4.Org_BoM_Qty,0.0);
}
gprow4.Purchase_Qty=ifnull(gprow4.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow4);
}
}
}
}
inside_gplevel4 = 1;
cnt3 = 0;
for each levellist5 in level5
{
crtbom3 = Create_BOM[BoM_FG_Subform_ID == levellist5.ID && Status == "Active"];
cnt3 = cnt3 + 1;
if(levellist5.Material_Item_Type.Material_Type == "CWPL Products" || levellist5.Material_Item_Type.Material_Type == "HR Coils and Sheets")
{
cwplrow5 = MRP.BoM_Details_CWPL();
inven1 = Inventory[Part_No == levellist5.Part_No].sum(Available_Qty);
cwplrow5.Part_No=levellist5.Part_No;
cwplrow5.Part_Name=levellist5.Part_Description;
cwplrow5.UoM=levellist5.UoM;
cwplrow5.Work_Order_No=fet_wo.ID;
cwplrow5.Stock_Qty=inven1.round(0);
cwplrow5.Material_Item_Type=levellist5.Material_Item_Type;
cwplrow5.bom_stk_qty=ifnull(levellist5.Qty,0.0);
cwplrow5.Level="Level-5";
cwplrow5.test_level="Level1.1" + "." + cnt1 + "." + cnt2 + "." + cnt3;
cwplrow5.Create_BoM_RECID=crtbom3.ID;
cwplrow5.BoM_Qty=cwplrow4.Actual_Qty;
cwplrow5.Tot_BoM_Qty=ifnull(cwplrow5.BoM_Qty,0.0) * ifnull(cwplrow5.bom_stk_qty,0.0);
//CALCULATION PART
planqty = 0.0;
stkqty = 0.0;
if(cwplrow5.Stock_Qty >= cwplrow5.Tot_BoM_Qty)
{
cwplrow5.Actual_Qty=0;
//cwplrow5.BoM_Qty=0;
cwplrow5.Plan_Qty=0;
}
if(cwplrow5.Stock_Qty < cwplrow5.BoM_Qty && cwplrow5.Tot_BoM_Qty != null)
{
planqty = ifnull(cwplrow5.BoM_Qty,0.0) * ifnull(cwplrow5.bom_stk_qty,0.0);
stkqty = planqty - ifnull(cwplrow5.Stock_Qty,0.0);
cwplrow5.Actual_Qty=stkqty;
cwplrow5.Plan_Qty=stkqty;
}
input.BoM_Details_CWPL.insert(cwplrow5);
}
for each abc5 in BoM_FG_Subform[BOM_FG_Exis_ID.Part_No == levellist4.Part_No && Material_Item_Type.Material_Type == "General Purchase" && BOM_FG_Exis_ID.Status == "Active"]
{
if(inside_gplevel5 == 0)
{
if(abc5.Material_Item_Type.Material_Type == "General Purchase")
{
fetind = Indent_Sub_Form[Part_No == abc5.Part_No].sum(Required_Qty);
dprsub = DPR_General_Purchase_Stock_Qty[Part_No == abc5.Part_No];
gprow5 = MRP.BoM_Details_General_Purchase();
inven = Inventory[Part_No == abc5.Part_No].sum(Available_Qty);
gprow5.Part_No=abc5.Part_No;
gprow5.Part_Name=abc5.Part_Description;
gprow5.UoM=abc5.UoM;
gprow5.Work_Order_No=fet_wo.ID;
gprow5.Material_Item_Type=abc5.Material_Item_Type;
gprow5.Org_BoM_Qty=ifnull(abc5.Qty,0.0);
gprow5.Stock_Qty=inven.round(0);
gprow5.Indent_Qty=fetind;
gprow5.Level="Level-4";
gprow5.test_level="Level1.1" + "." + cnt1 + "." + cnt2 + "." + cnt3;
gprow5.Create_BoM_RECID=crtbom3.ID;
//CALCULATION PART
gprow5.BoM_Qty=ifnull(cwplrow4.Actual_Qty,0);
gprow5.Tot_BoM_Qty=ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0);
gprow5.Material_Center_Qty=ifnull(dprsub.GP_Balance_Qty,0);
//Below ifelse is to check negative value
if(gprow5.Material_Center_Qty == 0)
{
if(ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0) - ifnull(gprow5.Stock_Qty,0) >= 0)
{
gprow5.Plan_Qty=ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0) - ifnull(gprow5.Stock_Qty,0);
}
else
{
gprow5.Plan_Qty=ifnull(gprow5.Stock_Qty,0) - ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0);
}
gprow5.Purchase_Qty=ifnull(gprow5.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow5);
}
else if(gprow5.Material_Center_Qty > 0)
{
if(ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0) - ifnull(gprow5.Material_Center_Qty,0) >= 0)
{
gprow5.Tot_BoM_Qty=ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0);
gprow5.Plan_Qty=ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0) - ifnull(gprow5.Material_Center_Qty,0);
}
else if(ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0) - ifnull(gprow5.Material_Center_Qty,0) < 0)
{
gprow5.Tot_BoM_Qty=ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0);
gprow5.Plan_Qty=ifnull(gprow5.Material_Center_Qty,0) - ifnull(gprow5.BoM_Qty,0) * ifnull(gprow5.Org_BoM_Qty,0.0);
}
gprow5.Purchase_Qty=ifnull(gprow5.Plan_Qty,0);
input.BoM_Details_General_Purchase.insert(gprow5);
}
}
}
}
inside_gplevel5 = 1;
}
}
}
}
}
//Test
for each testrec in input.BoM_Details_General_Purchase
{
// if(testrec.S_No == 1)
// {
// testrec.Stock_Qty=1;
// }
// if(testrec.S_No == 2)
// {
// testrec.Stock_Qty=8;
// }
// if(testrec.S_No == 3)
// {
// testrec.bom_stk_qty=5;
// }
// if(testrec.S_No == 4)
// {
// testrec.Stock_Qty=50;
// }
// if(testrec.S_No == 5)
// {
// testrec.Stock_Qty=1;
// }
// if(testrec.S_No == 6)
// {
// testrec.Stock_Qty=4;
// }
// if(testrec.S_No == 7)
// {
// testrec.Stock_Qty=200;
// }
// if(testrec.S_No == 8)
// {
// testrec.Stock_Qty=50;
// }
}
for each cwplrec in input.BoM_Details_CWPL
{
if(cwplrec.Stock_Qty < cwplrec.Tot_BoM_Qty)
{
cwplrec.Blocked_Qty=cwplrec.Stock_Qty;
}
if(cwplrec.Tot_BoM_Qty < cwplrec.Stock_Qty)
{
cwplrec.Blocked_Qty=cwplrec.Tot_BoM_Qty;
}
if(cwplrec.Tot_BoM_Qty == cwplrec.Stock_Qty)
{
cwplrec.Blocked_Qty=cwplrec.Stock_Qty;
}
if(cwplrec.Stock_Qty <= 0)
{
cwplrec.Blocked_Qty=0;
}
if(cwplrec.Blocked_Qty > 0)
{
cwplrec.Block_Qty=true;
}
}
for each gprec in input.BoM_Details_General_Purchase
{
if(gprec.Stock_Qty < gprec.Tot_BoM_Qty)
{
gprec.Blocked_Qty=gprec.Stock_Qty;
}
else if(gprec.Tot_BoM_Qty <= gprec.Stock_Qty)
{
gprec.Plan_Qty=0;
gprec.Purchase_Qty=0;
gprec.Blocked_Qty=gprec.Tot_BoM_Qty;
//info "if2";
}
// else if(gprec.Tot_BoM_Qty > gprec.Stock_Qty)
// {
// gprec.Purchase_Qty=gprec.Plan_Qty;
// }
else if(gprec.Stock_Qty <= 0)
{
gprec.Blocked_Qty=0;
//info "if3";
}
else if(gprec.Tot_BoM_Qty == gprec.Stock_Qty)
{
gprec.Blocked_Qty=gprec.Stock_Qty;
}
if(gprec.Blocked_Qty > 0)
{
gprec.Block_Qty=true;
}
if(gprec.Purchase_Qty > 0)
{
gprec.Draft_Indent=true;
}
}
//SNo for MRP-Subforms
slno = 0;
for each snrec in input.BoM_Details_CWPL
{
slno = slno + 1;
if(snrec.Part_No != null)
{
snrec.S_No=slno;
}
}
gslno = 0;
for each snrecgp in input.BoM_Details_General_Purchase
{
gslno = gslno + 1;
if(snrecgp.Part_No != null)
{
snrecgp.S_No=gslno;
}
}
}
//End
check the url below
sudo apt update
sudo apt install -y zsh
it will ask a question for config opt 2
zsh --version
which zsh
whereis zsh
sudo chsh -s /usr/bin/zsh
sh -c "$(curl -fsSL https://raw.githubusercontent.com/ohmyzsh/ohmyzsh/master/tools/install.sh)"
git clone https://github.com/zsh-users/zsh-autosuggestions ${ZSH_CUSTOM:-~/.oh-my-zsh/custom}/plugins/zsh-autosuggestions
git clone https://github.com/zsh-users/zsh-syntax-highlighting.git ${ZSH_CUSTOM:-~/.oh-my-zsh/custom}/plugins/zsh-syntax-highlighting
plugins=(git zsh-autosuggestions zsh-syntax-highlighting jsontools dirhistory)
Created or Edited -> User input of Item Details.Part_Description -> ItemDeatils_PartDesc_Validations
Tue Jan 07 2025 14:24:34 GMT+0000 (Coordinated Universal Time)
star
photo_camera
Tue Jan 07 2025 10:48:23 GMT+0000 (Coordinated Universal Time) https://bluevps.com/blog/how-to-install-oh-my-zsh-on-ubuntu-2204
Save snippets that work with our extensions
