#include <ButtonConstants.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TreeViewConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Program Files (x86)\AutoIt3\SciTE\Koda\Forms\PEDIGREE.kxf
Global $PEDIGREE = GUICreate("Lot Pedigree Entry", 747, 506, 192, 125)
Global $GROUP1 = GUICtrlCreateGroup("", 8, 4, 725, 41)
Global $LABEL1 = GUICtrlCreateLabel("Receipt No", 16, 18, 58, 17)
Global $RECEIPTNO = GUICtrlCreateInput("ReceiptNo", 80, 16, 113, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", 0, 0, 1, 1)
GUICtrlCreateGroup("", 0, 0, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $ITEMTREE = GUICtrlCreateTreeView(8, 52, 257, 410, BitOR($GUI_SS_DEFAULT_TREEVIEW, $TVS_TRACKSELECT, $WS_HSCROLL, $WS_VSCROLL, $WS_BORDER), $WS_EX_CLIENTEDGE)
Global $PEDENTRY = GUICtrlCreateButton("Ped Entry", 645, 471, 61, 21)
Global $PEDINFO = GUICtrlCreateGroup("Pedigree Information", 276, 52, 457, 410)
Global $L_ITEM = GUICtrlCreateLabel("Item Code", 292, 72, 52, 17)
Global $L_LOT = GUICtrlCreateLabel("Lot Number", 292, 123, 59, 17)
Global $P_ITEMCD = GUICtrlCreateInput("", 356, 70, 89, 21)
Global $P_ITEMDESC = GUICtrlCreateInput("", 450, 70, 241, 21)
Global $LABEL2 = GUICtrlCreateLabel("Warehouse", 292, 98, 59, 17)
Global $P_WHS = GUICtrlCreateInput("", 356, 93, 49, 21)
Global $P_LOT = GUICtrlCreateInput("", 356, 117, 89, 21)
Global $PEDVENDOR = GUICtrlCreateGroup("", 276, 136, 457, 325)
Global $LABEL3 = GUICtrlCreateLabel("Sequence", 292, 158, 53, 17)
Global $LABEL4 = GUICtrlCreateLabel("Vendor Name", 292, 216, 69, 17)
Global $LABEL5 = GUICtrlCreateLabel("Address", 292, 244, 45, 17)
Global $LABEL7 = GUICtrlCreateLabel("City, State Zip", 292, 301, 70, 17)
Global $LABEL8 = GUICtrlCreateLabel("PO Ref", 292, 329, 39, 17)
Global $LABEL9 = GUICtrlCreateLabel("PO Ref Date", 292, 357, 65, 17)
Global $LABEL10 = GUICtrlCreateLabel("DEA License", 292, 385, 66, 17)
Global $LABEL11 = GUICtrlCreateLabel("State License", 292, 413, 69, 17)
Global $P_VAUTHDIST = GUICtrlCreateCheckbox("Auth Distributor", 292, 188, 105, 17, BitOR($GUI_SS_DEFAULT_CHECKBOX, $BS_RIGHTBUTTON))
Global $P_VNAME = GUICtrlCreateInput("", 384, 214, 289, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VADDR1 = GUICtrlCreateInput("", 384, 242, 289, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VADDR2 = GUICtrlCreateInput("", 384, 270, 289, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VCITY = GUICtrlCreateInput("", 384, 298, 149, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VST = GUICtrlCreateInput("", 540, 298, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VZIP = GUICtrlCreateInput("", 580, 298, 125, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VPOREF = GUICtrlCreateInput("", 384, 327, 289, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VPOREFDATE = GUICtrlCreateDate("", 384, 357, 125, 21, $DTS_SHOWNONE)
Global $P_VDEALICENSE = GUICtrlCreateInput("", 384, 383, 189, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VSTATELICENSE = GUICtrlCreateInput("", 384, 411, 189, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_UPPERCASE))
Global $P_VSEQUENCE = GUICtrlCreateInput("", 384, 156, 57, 21)
Global $ADD = GUICtrlCreateButton("Add", 642, 365, 61, 21)
Global $CLEAR = GUICtrlCreateButton("Clear", 642, 387, 61, 21)
Global $DONE = GUICtrlCreateButton("Done", 642, 410, 61, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $PROCESS = GUICtrlCreateButton("Process", 582, 471, 61, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $test_dt

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $P_VPOREFDATE
			$test_dt = GUICtrlRead($P_VPOREFDATE)
			MsgBox(0, "Test Date Data", "<" & $test_dt & ">")

	EndSwitch
WEnd