home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 March
/
Dpcb0399.iso
/
MONEY
/
Capital
/
SETUP.2
/
REPORTS
/
PLACCENQ.REP
< prev
next >
Wrap
Text File
|
1995-12-11
|
19KB
|
580 lines
VERSION 2.00
Begin Report PLACCENQ.REP
Caption = "PLACCENQ.REP"
Width = 11175
Height = 16395
Reportheader = 945
Header = 2490
Transaction = 1605
SubTotal = 3150
Footer = 0
Pagefooter = 15690
Replicate = 360
Style = 1
Query = "PLTRAN PTCODE=>^@0 & PTCODE<=^@1 ORDER BY PTCODE"
Macro = "1LU:Select from PLNAME where PLNAME.PNCODE=PLTRAN.PTCODE"
Macro = "1OF:@REPVARS.REPTOT(0) = 0"
Macro = "1OF:@REPVARS.REPTOT(1) = 0"
Macro = "1OF:@REPVARS.REPTOT(2) = 0"
Macro = "1OF:@REPVARS.REPTOT(3) = 0"
Macro = "1OF:@REPVARS.REPTOT(4) = 0"
Macro = "2OF:@REPVARS.REPTOT(0) = @REPVARS.REPTOT(0)+PLTRAN.PTOUTSTAND"
Macro = "2OF:@REPVARS.REPTOT(1) = PERIOD(DATE(),PLTRAN.PTTXNDATE)"
Macro = "2CD:When PLTRAN.PTTXNTYPE="P" & PLTRAN.PTALLOC=" " then REPTOT(1)=-1"
Macro = "2CD:When REPTOT(1)=-1 then REPTOT(6)=REPTOT(6)+PLTRAN.PTOUTSTAND"
Macro = "2CD:When REPTOT(1)=0 then REPTOT(2)=REPTOT(2)+PLTRAN.PTOUTSTAND"
Macro = "2CD:When REPTOT(1)=1 then REPTOT(3)=REPTOT(3)+PLTRAN.PTOUTSTAND"
Macro = "2CD:When REPTOT(1)=2 then REPTOT(4)=REPTOT(4)+PLTRAN.PTOUTSTAND"
Macro = "2CD:When REPTOT(1)=3 then REPTOT(5)=REPTOT(5)+PLTRAN.PTOUTSTAND"
Macro = "3PP:@REPVARS.REPTOT(0) = 0"
Macro = "3PP:@REPVARS.REPTOT(1) = 0"
Macro = "3PP:@REPVARS.REPTOT(2) = 0"
Macro = "3PP:@REPVARS.REPTOT(3) = 0"
Macro = "3PP:@REPVARS.REPTOT(4) = 0"
Macro = "3PP:@REPVARS.REPTOT(5) = 0"
Macro = "3PP:@REPVARS.REPTOT(6) = 0"
BreakOn = "PLTRAN.PTCODE"
End
Begin Control LABEL
Type = "Label"
Style = 4
Caption = "Supplier Account Enquiry"
Font = "-315|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Reportheader Block"
Height = 420
Left = 135
Top = 540
Width = 10890
End
Begin Control LABEL
Type = "Label"
Style = 9
Caption = "DTOC(DATE())"
Font = "-165|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Reportheader Block"
Height = 285
Left = 135
Top = 720
Width = 1800
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = ""Page "+PAGENUM()"
Font = "-165|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Reportheader Block"
Height = 285
Left = 9210
Top = 705
Width = 1800
End
Begin Control LABEL
Type = "Label"
Style = 12
Caption = "TRIM(SYSTEM.COMPNAME)"
Font = "-195|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Reportheader Block"
Height = 420
Left = 135
Top = 135
Width = 10890
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Date"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 270
Top = 2160
Width = 1140
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Reference"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 3060
Top = 2160
Width = 1140
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Debit"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 5700
Top = 2160
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Balance"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 8895
Top = 2160
Width = 1275
End
Begin Control PNNAME
Type = "Text"
Style = 0
Fieldname = "PNNAME"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 270
Width = 2700
End
Begin Control PNADD1
Type = "Text"
Style = 0
Fieldname = "PNADD1"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 540
Width = 2700
End
Begin Control PNADD2
Type = "Text"
Style = 0
Fieldname = "PNADD2"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 810
Width = 2700
End
Begin Control PNADD3
Type = "Text"
Style = 0
Fieldname = "PNADD3"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 1080
Width = 2700
End
Begin Control PNADD4
Type = "Text"
Style = 0
Fieldname = "PNADD4"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 1350
Width = 2700
End
Begin Control PNPOSTCODE
Type = "Text"
Style = 0
Fieldname = "PNPOSTCODE"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 270
Top = 1620
Width = 2700
End
Begin Control PNCODE
Type = "Text"
Style = 0
Fieldname = "PNCODE"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 4860
Top = 270
Width = 1350
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Supplier ID:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 3780
Top = 270
Width = 945
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Turnover:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 7965
Top = 540
Width = 1080
End
Begin Control PNTURNOVER
Type = "Text"
Style = 0
Fieldname = "PNTURNOVER"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 9180
Top = 540
Width = 1350
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Credit Limit:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 7965
Top = 945
Width = 1215
End
Begin Control PNDEBIT
Type = "Text"
Style = 0
Fieldname = "PNDEBIT"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 9180
Top = 945
Width = 1350
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Type"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 1845
Top = 2160
Width = 870
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Credit"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 7320
Top = 2160
Width = 1410
End
Begin Control PNPHONE
Type = "Text"
Style = 0
Fieldname = "PNPHONE"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 4590
Top = 810
Width = 1890
End
Begin Control PNFAX
Type = "Text"
Style = 0
Fieldname = "PNFAX"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 4590
Top = 1215
Width = 1890
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Tel:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 3780
Top = 810
Width = 675
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Fax:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 3780
Top = 1215
Width = 675
End
Begin Control PNCONTACT
Type = "Text"
Style = 0
Fieldname = "PNCONTACT"
Filename = "PLNAME"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 4590
Top = 1620
Width = 2565
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Contact:"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 270
Left = 3780
Top = 1620
Width = 810
End
Begin Control LABEL
Type = "Label"
Style = 1
Caption = "Status"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Header Block"
Height = 285
Left = 4275
Top = 2160
Width = 1140
End
Begin Control PTTXNDATE
Type = "Text"
Style = 0
Fieldname = "PTTXNDATE"
Filename = "PLTRAN"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 270
Left = 270
Top = 60
Width = 1410
End
Begin Control PTREF
Type = "Text"
Style = 0
Fieldname = "PTREF"
Filename = "PLTRAN"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 270
Left = 3060
Top = 60
Width = 1275
End
Begin Control LABEL
Type = "Label"
Style = 9
Caption = "MID(" InvCrnPayAdjDscRfd",INSTR("ICPADF",PLTRAN.PTTXNTYPE)*3+1,3)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 270
Left = 1890
Top = 75
Width = 1080
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "CORD(PLTRAN.PTVALUE,10,2,-1)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 285
Left = 5700
Top = 75
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "CORD(PLTRAN.PTVALUE,10,2,1)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 285
Left = 7320
Top = 75
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "IF(PLTRAN.PTVALUE>0 & PLTRAN.PTVALUE<>PLTRAN.PTOUTSTAND,CORD(PLTRAN.PTOUTSTAND,10,2,1),"")"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 285
Left = 8805
Top = 75
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 9
Caption = "if(PLTRAN.PTDISP="D","Disputed",MID(" Paid Allocated",INSTR("PA",PLTRAN.PTALLOC)*9+1,9))"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Transaction Block"
Height = 270
Left = 4320
Top = 75
Width = 1350
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(0),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 8805
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Balance"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 8640
Top = 495
Width = 1485
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(5),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 435
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(2),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 5295
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(3),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 3675
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(4),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 2055
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Current"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 5265
Top = 495
Width = 1485
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "1 Month"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 3645
Top = 495
Width = 1485
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "2 Months"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 2025
Top = 495
Width = 1485
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "3 Months +"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 405
Top = 495
Width = 1485
End
Begin Control LABEL
Type = "Label"
Style = 10
Caption = "STR(@REPVARS.REPTOT(6),10,2)"
Font = "-180|0|0|0|400|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 285
Left = 6915
Top = 765
Width = 1410
End
Begin Control LABEL
Type = "Label"
Style = 2
Caption = "Unallocated"
Font = "-165|0|0|0|700|0|0|0|0|3|2|1|34|Arial"
Location = "Subtotal Block"
Height = 270
Left = 6885
Top = 495
Width = 1485
End