1Use dfClient.pkg 2Use DataDict.pkg 3Use dfEntry.pkg 4Use Vendor.DD 5Use Invt.DD 6 7DEFERRED_VIEW Activate_oInventoryView FOR ; 8; 9Object oInventoryView is a dbView 10 Set Border_Style to Border_Thick 11 Set Label to "Inventory Item View" 12 Set Location to 5 8 13 Set Size to 151 305 14 Set piMaxSize to 115 350 15 Set piMinSize to 151 270 16 17 Object Vendor_DD is a Vendor_DataDictionary 18 End_Object // Vendor_DD 19 20 Object Invt_DD is a Invt_DataDictionary 21 Set DDO_Server to Vendor_DD 22 End_Object // Invt_DD 23 24 Set Main_DD to Invt_DD 25 Set Server to Invt_DD 26 27 Object oDbCont is a dbContainer3d 28 Set Size to 140 295 29 Set Location to 5 4 30 Set peAnchors to anAll 31 Object oInvt_Item_ID is a dbForm 32 Entry_Item Invt.Item_ID 33 Set Label to "Invt. Item ID:" 34 Set Size to 13 60 35 Set Location to 10 70 36 Set peAnchors to anTopLeft 37 Set Label_Col_Offset to 2 38 Set Label_Justification_Mode to jMode_Right 39 End_Object // oInvt_Item_Id 40 41 Object oInvt_Description is a dbForm 42 Entry_Item Invt.Description 43 Set Label to "Invt. Description:" 44 Set Size to 13 210 45 Set Location to 25 70 46 Set peAnchors to anTopLeftRight 47 Set Label_Col_Offset to 2 48 Set Label_Justification_Mode to jMode_Right 49 End_Object // oInvt_Description 50 51 Object oVendorGroup is a dbGroup 52 Set Size to 58 271 53 Set Location to 41 9 54 Set peAnchors to anAll 55 Set Label to "Vendor" 56 Object oInvt_Vendor_ID is a dbForm 57 Entry_Item Vendor.ID 58 Set Label to "Vendor ID:" 59 Set Size to 13 42 60 Set Location to 9 61 61 Set peAnchors to anTopLeft 62 Set Label_Col_Offset to 2 63 Set Label_Justification_Mode to jMode_Right 64 End_Object // oInvt_Vendor_Id 65 66 Object oVendor_Name is a dbForm 67 Entry_Item Vendor.Name 68 Set Label to "Vendor Name:" 69 Set Size to 13 180 70 Set Location to 24 61 71 Set peAnchors to anTopLeftRight 72 Set Label_Col_Offset to 2 73 Set Label_Justification_Mode to jMode_Right 74 End_Object // oVendor_Name 75 76 Object oInvt_Vendor_Part_ID is a dbForm 77 Entry_Item Invt.Vendor_Part_ID 78 Set Label to "Vendor Part ID:" 79 Set Size to 13 90 80 Set Location to 39 61 81 Set peAnchors to anTopLeft 82 Set Label_Col_Offset to 2 83 Set Label_Justification_Mode to jMode_Right 84 End_Object // oInvt_Vendor_Part_ID 85 86 End_Object // oVendorGroup 87 88 Object oUnitGroup is a dbGroup 89 Set Size to 28 271 90 Set Location to 101 9 91 Set peAnchors to anAll 92 Object oInvt_Unit_Price is a dbForm 93 Entry_Item Invt.Unit_Price 94 Set Label to "Unit Price:" 95 Set Size to 13 48 96 Set Location to 10 61 97 Set peAnchors to anTopLeft 98 Set Label_Col_Offset to 2 99 Set Label_Justification_Mode to jMode_Right 100 End_Object // oInvt_Unit_Price 101 102 Object oInvt_On_Hand is a dbForm 103 Entry_Item Invt.On_Hand 104 Set Label to "On Hand:" 105 Set Size to 13 36 106 Set Location to 10 205 107 Set peAnchors to anTopRight 108 Set Label_Col_Offset to 2 109 Set Label_Justification_Mode to jMode_Right 110 End_Object // oInvt_On_Hand 111 112 End_Object // oUnitGroup 113 114 End_Object // oDbCont 115 116CD_End_Object // oInventoryView