frmdivide.h

来自「这是一个工厂的生产线的仓库管理.有计划,实绩,库存等」· C头文件 代码 · 共 599 行 · 第 1/3 页

			this->label4->Anchor = (*__try_cast<__box System::Windows::Forms::AnchorStyles *  >(resources->GetObject(S"label4.Anchor")));
			this->label4->AutoSize = (*__try_cast<__box System::Boolean *  >(resources->GetObject(S"label4.AutoSize")));
			this->label4->Dock = (*__try_cast<__box System::Windows::Forms::DockStyle *  >(resources->GetObject(S"label4.Dock")));
			this->label4->Enabled = (*__try_cast<__box System::Boolean *  >(resources->GetObject(S"label4.Enabled")));
			this->label4->Font = (__try_cast<System::Drawing::Font *  >(resources->GetObject(S"label4.Font")));
			this->label4->Image = (__try_cast<System::Drawing::Image *  >(resources->GetObject(S"label4.Image")));
			this->label4->ImageAlign = (*__try_cast<__box System::Drawing::ContentAlignment *  >(resources->GetObject(S"label4.ImageAlign")));
			this->label4->ImageIndex = (*__try_cast<__box System::Int32 *  >(resources->GetObject(S"label4.ImageIndex")));
			this->label4->ImeMode = (*__try_cast<__box System::Windows::Forms::ImeMode *  >(resources->GetObject(S"label4.ImeMode")));
			this->label4->Location = (*__try_cast<__box System::Drawing::Point *  >(resources->GetObject(S"label4.Location")));
			this->label4->Name = S"label4";
			this->label4->RightToLeft = (*__try_cast<__box System::Windows::Forms::RightToLeft *  >(resources->GetObject(S"label4.RightToLeft")));
			this->label4->Size = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"label4.Size")));
			this->label4->TabIndex = (*__try_cast<__box System::Int32 *  >(resources->GetObject(S"label4.TabIndex")));
			this->label4->Text = resources->GetString(S"label4.Text");
			this->label4->TextAlign = (*__try_cast<__box System::Drawing::ContentAlignment *  >(resources->GetObject(S"label4.TextAlign")));
			this->label4->Visible = (*__try_cast<__box System::Boolean *  >(resources->GetObject(S"label4.Visible")));
			// 
			// frmDivide
			// 
			this->AccessibleDescription = resources->GetString(S"$this.AccessibleDescription");
			this->AccessibleName = resources->GetString(S"$this.AccessibleName");
			this->AutoScaleBaseSize = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.AutoScaleBaseSize")));
			this->AutoScroll = (*__try_cast<__box System::Boolean *  >(resources->GetObject(S"$this.AutoScroll")));
			this->AutoScrollMargin = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.AutoScrollMargin")));
			this->AutoScrollMinSize = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.AutoScrollMinSize")));
			this->BackgroundImage = (__try_cast<System::Drawing::Image *  >(resources->GetObject(S"$this.BackgroundImage")));
			this->ClientSize = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.ClientSize")));
			this->Controls->Add(this->textBox1);
			this->Controls->Add(this->label4);
			this->Controls->Add(this->dbGridDiv);
			this->Controls->Add(this->txtQty);
			this->Controls->Add(this->txtProName);
			this->Controls->Add(this->txtProCode);
			this->Controls->Add(this->label1);
			this->Controls->Add(this->label2);
			this->Controls->Add(this->cmdPrint);
			this->Controls->Add(this->lbl_Title);
			this->Controls->Add(this->button3);
			this->Controls->Add(this->label3);
			this->Enabled = (*__try_cast<__box System::Boolean *  >(resources->GetObject(S"$this.Enabled")));
			this->Font = (__try_cast<System::Drawing::Font *  >(resources->GetObject(S"$this.Font")));
			this->Icon = (__try_cast<System::Drawing::Icon *  >(resources->GetObject(S"$this.Icon")));
			this->ImeMode = (*__try_cast<__box System::Windows::Forms::ImeMode *  >(resources->GetObject(S"$this.ImeMode")));
			this->Location = (*__try_cast<__box System::Drawing::Point *  >(resources->GetObject(S"$this.Location")));
			this->MaximumSize = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.MaximumSize")));
			this->MinimumSize = (*__try_cast<__box System::Drawing::Size *  >(resources->GetObject(S"$this.MinimumSize")));
			this->Name = S"frmDivide";
			this->RightToLeft = (*__try_cast<__box System::Windows::Forms::RightToLeft *  >(resources->GetObject(S"$this.RightToLeft")));
			this->StartPosition = (*__try_cast<__box System::Windows::Forms::FormStartPosition *  >(resources->GetObject(S"$this.StartPosition")));
			this->Text = resources->GetString(S"$this.Text");
			this->Load += new System::EventHandler(this, frmDivide_Load);
			(__try_cast<System::ComponentModel::ISupportInitialize *  >(this->dbGridDiv))->EndInit();
			this->ResumeLayout(false);

		}		
	private: System::Void frmDivide_Load(System::Object *  sender, System::EventArgs *  e)
			 {
				 this->StartPosition = FormStartPosition::CenterScreen;
               begin();
				 txtProCode->Enabled = false;
				 
				 txtProCode->Text = strProcode;
				 
				 txtQty->Text = strNumFrom;

				 textBox1->Text= strLot;

				 txtProName->Text = ProductResultInput::strGetProName(txtProCode->Text,infClsDivide->intLang,dbDivide)	;

				 FillGrid(infClsDivide->intLang);				 

			 }

	private: System::Void txtProCode_Leave(System::Object *  sender, System::EventArgs *  e)
			 {
				 //if ((txtProCode->Text)->Trim()->CompareTo(S"")==0) {

				 //}				 

			 }

private: System::Void button3_Click(System::Object *  sender, System::EventArgs *  e)
		 {	
			 this->Close();
		 }

private: System::Void dbGridDiv_MouseUp(System::Object *  sender, System::Windows::Forms::MouseEventArgs *  e)
		 {
			 try 
			 {
				 this->dbGridDiv->Select(dbGridDiv->CurrentRowIndex);
			 }
			 catch (...) {
			 }

		 }

private: System::Void cmdPrint_Click(System::Object *  sender, System::EventArgs *  e)
		 {
			 DataGridCell dCell1;	//child procode
			 DataGridCell dCell2;   //chile num
			 /*DataGridCell dCell3;*/

			 String *strCPro;		//child procode
			 String *strCNum;		//chile num
			 int i;

			 strNum = txtQty->Text;

//			 if (!( infClass::blnIsNum(strNum) )) {
//				 MessageBox::Show(S"请输入数字！！");
//				 return;
/*			 }
			 else*/ if (Single::Parse(strNum) > Single::Parse(strNumFrom)) {
				 MessageBox::Show(abc[2]);
				 return;
			 }
			
			 CurrencyManager* cm =  __try_cast<CurrencyManager*>(this->BindingContext->get_Item(dbGridDiv->DataSource)); 

			 int rowCount = cm->Count;

			 //strNumFrom

			 try{
			 
				dbDivide->blnCnnOpen();
				dbDivide->blnBeginTrans();
			 }
			 
			 catch (...) {
				 MessageBox::Show(abc[0]);
				 return;
			 }

			 //parent deliver
			 if (!InstDeliver(infClsDivide->strFactoryCode,infClsDivide->strProcess,infClass::gCstrDivide,
				 strProcode,S"",Single::Parse(strNum),0,(DateTime::Now).ToString(S"yyyy/MM/dd"),infClsDivide->strShift,strLot))
			 	return;

			 //Parent stock data
			 if (!(InstStock(strProcode,S"",strNum,intCParent))){
				 dbDivide->blnRollBack();
				 dbDivide->blnCnnClose();
				 MessageBox::Show(abc[1],S"Error");
				 return;
				}
			 
			 //child deliver

			 dCell1.ColumnNumber = 0;

			 dCell2.ColumnNumber = 2;

			 for (i=0;i<rowCount;i++) 
			 {

				 dCell1.RowNumber = i;

				 dCell2.RowNumber = i;

				 strCPro = Convert::ToString(dbGridDiv->Item[dCell1]);

				 strCNum = Convert::ToString(dbGridDiv->Item[dCell2]);
				
				 if (!InstDeliver(infClsDivide->strFactoryCode,infClass::gCstrDivide,infClsDivide->strProcess,
					 strCPro,S"",(Single::Parse(strCNum)) * (Single::Parse(strNum)) ,0,(DateTime::Now).ToString(S"yyyy/MM/dd"),infClsDivide->strShift,S""))
					 return;
				 

				 //child stock data

				 if (!(InstStock(strCPro,
								S"",
								((Single::Parse(strCNum)) * (Single::Parse(strNum))).ToString(),
								intCChild)))
				 {

					 dbDivide->blnRollBack();
					 dbDivide->blnCnnClose();
					 MessageBox::Show(abc[1],S"Error");
					 return;
				 }

			 } 

			 dbDivide->blnCommit();
			 MessageBox::Show(abc[3]);

			 this->Close();
		 }

private: System::Void lbl_Title_Click(System::Object *  sender, System::EventArgs *  e)
		 {
		 }

};
}