1. Download the facing.zip file
2. Copy the “Facing Slip.txt” file to the C:\Program Files\AccuZIP6 5.0\Commands folder.
3. Copy the other 2 Report files to the C:\Program Files\AccuZIP6 5.0\Reports folder.
4. Presort the list as normal.
5. In the Print Presort screen, Click the Print Labels icon
6. In the Print Settings screen, click on the Output pull down menu and choose Disk File, then click "Continue".
7. In the Export Setup window, check the Export All Fields box beneath the field list. Click on Export Format and choose AccuZIP6 5.x Database. Click Export. Leave the file name as disk file.dbf and choose where you want to save the file, then click Save.
8. Close the Export Setup window, the Print Settings window, and Print Presort. Close your database as well.
9. Pull down the File menu and choose Open Database. Open the disk file.dbf.
10. Pull down the Edit menu and choose Command. From the Command Statement pull down menu, choose the Facing Slips command. Click Run, then close the Command window.
NOTE: If you're presorting a Packages on Pallets mailing, run this command instead:
Code: Select all
ON ERROR COM_MESSAGE=MESSAGE()
SET SAFETY OFF
COM_ALIAS=ALIAS()
SELECT(COM_ALIAS)
ALTER TABLE ALIAS() ADD COLUMN PIECE C(8)
SELECT PALLET_ID,MAX(GPB_ID) AS PIECE ;
FROM (COM_ALIAS) GROUP BY 1 INTO TABLE C:\PIECE.DBF
USE
USE ("C:\PIECE.DBF") IN 0 ALIAS "PIECE"
SELECT ("PIECE")
INDEX ON ALLT(PALLET_ID) TAG MYTAG
SELECT(COM_ALIAS)
INDEX ON ALLT(PALLET_ID) TAG MYTAG
REPLACE PIECE WITH PIECE.PIECE FOR SEEK(ALLT(PALLET_ID) ,"PIECE")
REPLACE ALL PIECE WITH TRANSFORM(VAL(PIECE))
USE IN IIF(USED("PIECE"),SELECT("PIECE"),0)
**REMAINING
COM_ALIAS=ALIAS()
SELECT(COM_ALIAS)
ALTER TABLE ALIAS() ADD COLUMN PIECE C(8)
SELECT CONT_ID,MAX(GPB_ID) AS PIECE ;
FROM (COM_ALIAS) GROUP BY 1 INTO TABLE C:\PIECE.DBF
USE
USE ("C:\PIECE.DBF") IN 0 ALIAS "PIECE"
SELECT ("PIECE")
INDEX ON ALLT(CONT_ID) TAG MYTAG
SELECT(COM_ALIAS)
INDEX ON ALLT(CONT_ID) TAG MYTAG
REPLACE PIECE WITH PIECE.PIECE FOR EMPTY(PALLET_ID) AND SEEK(ALLT(CONT_ID) ,"PIECE")
REPLACE ALL PIECE WITH TRANSFORM(VAL(PIECE))
USE IN IIF(USED("PIECE"),SELECT("PIECE"),0)