Search
Topics
  Create an account Home  ·  Topics  ·  Downloads  ·  Your Account  ·  Submit News  ·  Top 10  
Modules
· Home
· Downloads
· FAQ
· Forums
· Journal
· Recommend Us
· Search
· Send Emails
· Send Messages
· Statistics
· Submit News
· Surveys
· Top 10
· Topics
· Web Links
· Your Account

Who's Online
There are currently, 3 guest(s) and 0 member(s) that are online.

You are Anonymous user. You can register for free by clicking here

AdSense



Customizable Apparel Business Software

The Apparel Business Software, StyleY powered by Microsot SQL Server 2005.

Link: www.PalPark.com/StyleY

Daily Sales Gross Profit Reports available.

Desktop version of StyleY using Microsoft Jet Engine is not supported any more since January, 2008.
 
No Microsoft Access .MDB database files are used anymore.

Post your valuable messages on our Forum here.

Email: Master@StyleY.com

Tel: 201.906.0917  Fax: 201.781.7103

Function for On-Hand Inventory Open Orders - qOpenOrder_OH
StyleY SELECT     dbo.tOrder.Custno, dbo.tLine.Style, dbo.tLine.Color, dbo.tLine.Size, dbo.tLine.OrdQty, dbo.tOrder.Ordno, dbo.tLine.OrdQty * dbo.tLine.Price AS Amount,
                      dbo.tCustomer.State, dbo.tOrder.OrdDate, dbo.tOrder.SPID, dbo.tLine.Style + '  ' + dbo.tLine.Color AS Item, dbo.tLine.Price, dbo.tCustomer.Company,
                      dbo.tOrder.OrderTerms, dbo.tCustomer.Phone1, dbo.tCustomer.Contact, dbo.tLine.ShipQty, dbo.tInventory.QtyOH, dbo.tCustomer.Street1,
                      dbo.tCustomer.Street2, dbo.tCustomer.City, dbo.tCustomer.Zip, dbo.tCustomer.TermsID, dbo.tCustomer.Oldno, dbo.tShipTo.ShipName,
                      dbo.tShipTo.ShipStreet1, dbo.tShipTo.ShipStreet2, dbo.tShipTo.ShipCity, dbo.tShipTo.ShipState, dbo.tShipTo.ShipZip, dbo.tShipTo.ShipAttn,
                      dbo.tOrder.ShipVia, dbo.tOrder.PoNo, dbo.tOrder.ShipDate, dbo.tOrder.ReqDate, dbo.tOrder.CanDate, dbo.tOrder.ShipToID, dbo.tOrder.Freight,
                      dbo.tOrder.Dept, dbo.tOrder.FOB, dbo.tOrder.OE, dbo.tOrder.CSHIPNO, dbo.tCustomer.FactorID, dbo.tLine.OrdQty - dbo.tLine.ShipQty AS OpenQty,
                      '(______)' AS Pick, dbo.tLine.LineDescription, dbo.tLine.DC, dbo.tLine.Ln
FROM         dbo.tLine INNER JOIN
                      dbo.tOrder INNER JOIN
                      dbo.tCustomer ON dbo.tOrder.Custno = dbo.tCustomer.Custno ON dbo.tLine.Ordno = dbo.tOrder.Ordno INNER JOIN
                      dbo.tInventory ON dbo.tLine.Style = dbo.tInventory.Style AND dbo.tLine.Color = dbo.tInventory.Color AND
                      dbo.tLine.Size = dbo.tInventory.Size LEFT OUTER JOIN
                      dbo.tShipTo ON dbo.tOrder.ShipToID = dbo.tShipTo.ShipToID AND dbo.tOrder.Custno = dbo.tShipTo.Custno
WHERE     (dbo.tLine.OrdQty > 0) AND (dbo.tOrder.OrdDate BETWEEN @DateFrom AND @DateTo) AND (dbo.tInventory.QtyOH > @QtyOH)
Posted by styley on Thursday, May 08 @ 23:03:54 CDT (211 reads)
(Read More... | 39 comments | Score: 0)



SQL and VB Programmer Wanted
StyleY Microsoft SQL Server 2005 and Visual Basic programmer wanted.

Location: North New Jersey

Contact: Jobs@StyleY.com
Posted by styley on Saturday, April 26 @ 00:29:58 CDT (131 reads)
(Read More... | 15 comments | Score: 0)



StyleY Technical Background
StyleY henry writes "Database Engine: Microsoft SQL Server 2005
User Interface: Microsoft Access 2007
DB Interface: ADO
Coding: Microsoft Visual Basic and VBA
Platform: Microsoft Windows XP SP2 or later & .NET Frame 2.0 or later
Tools: Microsoft SQL Server Management Studio 2005

Suitable for 10 users thru 100 users." "
Posted by styley on Wednesday, April 16 @ 23:19:09 CDT (151 reads)
(Read More... | 15 comments | Score: 0)



Packing for All Orders ( zStyles)
StyleY henry writes "Convert(varchar, OrdDate, 112)"
Posted by styley on Wednesday, April 16 @ 19:11:12 CDT (162 reads)
(Read More... | 15 comments | Score: 0)



Sales Profits for Non Active Inventory
StyleY henry writes "
Yearly sales profits for customer does not count Active and non-active inventory.

--------------------------------

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go


ALTER PROCEDURE [dbo].[spm_zProfit]
(
 @DateFrom datetime, @DateTo datetime
)
AS
DECLARE @PCT float

IF OBJECT_ID('zProfit') IS NOT NULL
BEGIN
 drop Table zProfit
END

SELECT CONVERT(varchar, dbo.tInvoice.InvDate, 101) AS InvDate, dbo.tLines.Invno, dbo.tLines.Ordno, dbo.tLines.Crdno, dbo.tLines.Style, dbo.tLines.Color,
        dbo.tLines.Size, dbo.tLines.LineDescription, dbo.tLines.Price, dbo.tLines.ShipQty, dbo.tStyle.Cost, (dbo.tLines.Price - dbo.tStyle.Cost)
        * dbo.tLines.ShipQty AS Profit, dbo.tInvoice.Custno, dbo.tLines.Price * dbo.tLines.ShipQty AS InvAmt, dbo.tInvoice.Freight,
        (dbo.tLines.Price - dbo.tStyle.COST) * 100 / dbo.tStyle.COST AS Pct,
  (CASE WHEN dbo.tStyle.Cost = 0 THEN dbo.tLines.Price ELSE dbo.tStyle.Cost END)
        * dbo.tLines.ShipQty AS CostAmt, dbo.tInvoice.OrderTerms
INTO    dbo.zProfit
FROM    dbo.tLines INNER JOIN dbo.tInvoice
ON  dbo.tLines.Invno = dbo.tInvoice.Invno INNER JOIN dbo.tStyle
ON  dbo.tLines.Style = dbo.tStyle.Style
WHERE (CONVERT(varchar, dbo.tInvoice.InvDate, 101) BETWEEN @DateFrom AND @DateTo)
  and tStyle.Cost > 0 and tInvoice.InvAmt > abs(0.1)
-- and tStyle.Active = 'Y'
  and tLines.Price > 0.1

SELECT TOP (100) PERCENT Invno, InvDate, SUM(ShipQty) AS ShipQty,
 SUM(Profit) AS Profit, MIN(DISTINCT Custno) AS Custno, SUM(InvAmt) AS InvAmt,
 SUM(CostAmt) AS CostAmt, @PCT AS Pct,
 MIN(DISTINCT OrderTerms) AS Terms
INTO #T
FROM dbo.zProfit
WHERE InvAmt <> 0 and CostAmt <> 0 and InvAmt <> 0
GROUP BY InvDate, Invno
ORDER BY InvDate, Invno

UPDATE #T
SET  PCT = (INVAMT - COSTAMT) * 100 / INVAMT
WHERE ABS(InvAmt) > 0.1

IF OBJECT_ID('zzProfit') IS NOT NULL
BEGIN
 drop table zzProfit
END
SELECT * INTO zzProfit FROM #T

-- select * from zProfit
-- select * from zzProfit
RETURN

"
Posted by styley on Wednesday, April 16 @ 19:11:02 CDT (128 reads)
(Read More... | 16 comments | Score: 0)



Stored Procedure for BTS
StyleY henry writes "set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON

go

ALTER PROCEDURE [dbo].[sp_BTS]

(

@StyleFrom varchar(50), @StyleTo varchar(50)
)

AS

SELECT dbo.zzPoT.Style, dbo.zzPoT.Color, dbo.zzPoT.Size, dbo.zzPoT.OrdQty / 12 AS OrdQty, (dbo.zzPoT.Received - dbo.zzPoT.Adjust) / 12 AS Received,
dbo.zzPoT.SO / 12 AS SO, dbo.zzPoT.Ship / 12 AS Ship, (dbo.zzPoT.Received - dbo.zzPoT.Ship) / 12 AS QtyOH,
(dbo.zzPoT.OrdQty - dbo.zzPoT.Received + dbo.zzPoT.Adjust) / 12 AS PoBalance,


CASE WHEN (dbo.zzPoT.OrdQty - dbo.zzPoT.Received) > 0 THEN (dbo.zzPoT.Received - dbo.zzPoT.Ship - dbo.zzPoT.SO) / 12 + (dbo.zzPoT.OrdQty - dbo.zzPoT.Received) / 12
ELSE (dbo.zzPoT.Received - dbo.zzPoT.Ship - dbo.zzPoT.SO) / 12 END AS BTS,

dbo.zzPoT.PO1, dbo.zzPoT.PO2, dbo.zzPoT.PO3, dbo.zzPoT.PO4,

-- dbo.zzPoT.ETD1 + Isnull(ShipAir,'') AS ETD1,

-- dbo.zzPoT.ETD1,

-- Convert(varchar, FormatDateTime(ETD1, 'MM/DD/YY')) + ShipAir AS ETD1,

Left(Convert(varchar, ETD1, 101), 6) + Substring(Convert(varchar, ETD1, 101), 9, 2) +

CASE ShipAir1 WHEN null THEN '' ELSE ShipAir1 END AS ETD1,

Left(Convert(varchar, ETD2, 101), 6) + Substring(Convert(varchar, ETD2, 101), 9, 2) +

CASE ShipAir2 WHEN null THEN '' ELSE ShipAir2 END AS ETD2,

Left(Convert(varchar, ETD3, 101), 6) + Substring(Convert(varchar, ETD3, 101), 9, 2) +

CASE ShipAir3 WHEN null THEN '' ELSE ShipAir1 END AS ETD3,

Left(Convert(varchar, ETD4, 101), 6) + Substring(Convert(varchar, ETD4, 101), 9, 2) +

CASE ShipAir4 WHEN null THEN '' ELSE ShipAir1 END AS ETD4,

(dbo.zzPoT.SO + dbo.zzPoT.Ship) / 12 AS SS

FROM dbo.zzPoT INNER JOIN dbo.zStyle

ON dbo.zzPoT.Style = dbo.zStyle.Style

WHERE (dbo.zzPoT.Style BETWEEN @StyleFrom AND @StyleTo)

RETURN

-- select * from zzPOT where shipair =''

"
Posted by styley on Monday, April 14 @ 23:10:51 CDT (163 reads)
(Read More... | 52 comments | Score: 0)



Multi PO's for BTS
StyleY henry writes "set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON

go


ALTER PROCEDURE [dbo].[spu_PO2]

AS

DECLARE @ETD1 datetime, @ETD2 datetime, @ETD3 datetime, @ETD4 datetime,

@ShipAir1 varchar(1), @ShipAir2 varchar(1), @ShipAir3 varchar(1), @ShipAir4 varchar(1)

-- SELECT * FROM ZZPOt DROP TABLE #PO

SELECT TOP 100 PERCENT Style, Color, [Size], Pono, OrdQty, Style + Color + [Size] AS Item

INTO #PO

FROM dbo.zzPO

GROUP BY Style, Color, [Size], Style + Color + [Size], Pono, OrdQty

ORDER BY Style, Color, [Size], Pono

SELECT TOP 100 PERCENT Style, Color, [Size], MIN(DISTINCT Pono) AS MinPono,

Style + Color + [Size] AS Item, @ETD1 AS ETD1

INTO #PO1

FROM dbo.zzPO

GROUP BY Style, Color, [Size]

ORDER BY Style, Color, [Size]

--UPDATE #PO1

--SET ETD1 = ETD

--FROM #PO1 INNER JOIN tPO

--ON tPO.Pono = #PO1.MinPono

delete #PO

from #PO, #PO1

where #PO.item = #PO1.Item and #PO.Pono = #PO1.MinPono

SELECT TOP 100 PERCENT Style, Color, [Size], MIN(DISTINCT Pono) AS MinPono,

Style + Color + [Size] AS Item, @ETD2 AS ETD2

INTO #PO2

FROM #PO

GROUP BY Style, Color, [Size]

ORDER BY Style, Color, [Size]

--UPDATE #PO2

--SET ETD2 = ETD

--FROM #PO2 INNER JOIN tPO

--ON tPO.Pono = #PO2.MinPono

delete #PO

from #PO, #PO2

where #PO.item = #PO2.Item and #PO.Pono = #PO2.MinPono

SELECT TOP 100 PERCENT Style, Color, [Size], MIN(DISTINCT Pono) AS MinPono,

Style + Color + [Size] AS Item, @ETD3 AS ETD3

INTO #PO3

FROM #PO

GROUP BY Style, Color, [Size]

ORDER BY Style, Color, [Size]

--UPDATE #PO3

--SET ETD3 = ETD

--FROM #PO3 INNER JOIN tPO

--ON tPO.Pono = #PO3.MinPono

delete #PO

from #PO, #PO3

where #PO.item = #PO3.Item and #PO.Pono = #PO3.MinPono

SELECT TOP 100 PERCENT Style, Color, [Size], MIN(DISTINCT Pono) AS MinPono,

Style + Color + [Size] AS Item, @ETD4 AS ETD4

INTO #PO4

FROM #PO

GROUP BY Style, Color, [Size]

ORDER BY Style, Color, [Size]

--UPDATE #PO4

--SET ETD4 = ETD

--FROM #PO4 INNER JOIN tPO

--ON tPO.Pono = #PO4.MinPono

UPDATE zzPoT

SET zzPoT.Pono1 = #PO1.MinPono

FROM zzPoT

inner join #PO1

ON #PO1.Style = zzPoT.Style and #PO1.Color = zzPoT.Color and #PO1.[Size] = zzPoT.[Size]

UPDATE zzPoT

SET zzPoT.Pono2 = #PO2.MinPono

FROM zzPoT

inner join #PO2

ON #PO2.Style = zzPoT.Style and #PO2.Color = zzPoT.Color and #PO2.[Size] = zzPoT.[Size]

UPDATE zzPoT

SET zzPoT.Pono3 = #PO3.MinPono

FROM zzPoT

inner join #PO3

ON #PO3.Style = zzPoT.Style and #PO3.Color = zzPoT.Color and #PO3.[Size] = zzPoT.[Size]

UPDATE zzPoT

SET zzPoT.Pono4 = #PO4.MinPono

FROM zzPoT

inner join #PO4

ON #PO4.Style = zzPoT.Style and #PO4.Color = zzPoT.Color and #PO4.[Size] = zzPoT.[Size]

UPDATE zzPoT

SET zzPoT.PO1 = tLinePO.OrdQty

FROM zzPoT

inner join tLinePO

ON tLinePO.Style = zzPoT.Style and tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]
and zzPoT.Pono1 = tLinePO.Pono

UPDATE zzPoT

SET zzPoT.PO2 = tLinePO.OrdQty

FROM zzPoT

inner join tLinePO

ON tLinePO.Style = zzPoT.Style and tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]
and zzPoT.Pono2 = tLinePO.Pono

UPDATE zzPoT

SET zzPoT.PO3 = tLinePO.OrdQty

FROM zzPoT

inner join tLinePO

ON tLinePO.Style = zzPoT.Style and tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]
and zzPoT.Pono3 = tLinePO.Pono

UPDATE zzPoT

SET zzPoT.PO4 = tLinePO.OrdQty

FROM zzPoT inner join tLinePO

ON tLinePO.Style = zzPoT.Style and tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]
and zzPoT.Pono4 = tLinePO.Pono

UPDATE zzPoT

SET PO1 = isnull(PO1,0) /12, PO2 = isnull(PO2,0) /12, PO3 = isnull(PO3,0)/12, PO4 = isnull(PO4,0)/12

FROM zzPoT

UPDATE zzPoT

SET ETD1 = ETD, zzPoT.ShipAir1 = tLinePO.ShipAir

FROM zzPoT INNER JOIN tLinePO

ON tLinePO.Pono = zzPoT.Pono1
and tLinePO.Style = zzPoT.Style and

tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]

WHERE PO1 > 0

UPDATE zzPoT

SET ETD2 = ETD, ShipAir2 = tLinePO.ShipAir

FROM zzPoT INNER JOIN tLinePO

ON tLinePO.Pono = zzPoT.Pono2
and tLinePO.Style = zzPoT.Style and

tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]

WHERE PO2 > 0

UPDATE zzPoT

SET ETD3 = ETD, ShipAir3 = tLinePO.ShipAir

FROM zzPoT INNER JOIN tLinePO

ON tLinePO.Pono = zzPoT.Pono3
and tLinePO.Style = zzPoT.Style and

tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]

WHERE PO3 > 0

UPDATE zzPoT

SET ETD4 = ETD, ShipAir4 = tLinePO.ShipAir

FROM zzPoT INNER JOIN tLinePO

ON tLinePO.Pono = zzPoT.Pono4
and tLinePO.Style = zzPoT.Style and

tLinePO.Color = zzPoT.Color and tLinePO.[Size] = zzPoT.[Size]

WHERE PO4 > 0

-- SELECT * from zzpot where style='ab831'

RETURN

"
Posted by styley on Monday, April 14 @ 23:09:25 CDT (173 reads)
(Read More... | 52 comments | Score: 0)



Reset Shipment Process
StyleY henry writes "
Dim SQL As String
Dim Resp As Integer
    
Resp = MsgBox("Reset Shipment?", vbYesNoCancel, "StyleY")
    
If Resp = vbYes Then
ElseIf Resp = vbNo Then
    DoCmd.SetWarnings True
    Exit Sub
Else
    DoCmd.SetWarnings True
    Exit Sub
End If
    
SQL = "DELETE FROM tShipment"
CurrentProject.Connection.Execute SQL
    
SQL = "DELETE FROM tLineShip"
CurrentProject.Connection.Execute SQL

MsgBox ("Shipment Process Cleared. Make sure the starting Invoice#.")
"
Posted by styley on Monday, April 14 @ 23:05:47 CDT (174 reads)
(Read More... | 52 comments | Score: 0)



Welcome to StyleY
StyleY Anonymous writes "Welcome to StyleY Business Software powered by SQL Server 2005.

Henry Yook
"
Posted by styley on Monday, April 14 @ 22:13:29 CDT (173 reads)
(Read More... | 52 comments | Score: 0)



Login
Nickname

Password

Don't have an account yet? You can create one. As a registered user you have some advantages like theme manager, comments configuration and post comments with your name.

Ads by StyleY
 NWC
 Mega USA
 Justin Apparel
 Mama Fashion
 Impression
 DJ Unicell
 New Century
 Tee Fashion
 Koreana
 POSmen

Survey
How do you like your current business software?

Excellent
Good
Fair
Poor
Terrible



Results
Polls

Votes: 18
Comments: 75

AdSense




 
StyleY
PO Box 23, Norwood, NJ 07648
Fax: 201.781.7103


PHP-Nuke Copyright © 2005 by Francisco Burzi. This is free software, and you may redistribute it under the GPL. PHP-Nuke comes with absolutely no warranty, for details, see the license.