home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-387-Vol-3of3.iso
/
s
/
sbt25sm4.zip
/
ZIPSMC02.EXE
/
SYVALR._XP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1993-02-11
|
10KB
|
201 lines
TYPE("lc_dbvtype") = "C"
TYPE("ln_minamt") = "N"
lc_dbvtype $ "CIV"
GN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
EMLL_CUST
OCLL_INVT
LL_VEND
YLC_DBVTYPEL_CREDBV
EL_BLDDBV
TYPE("ll_cust") = "L"
TYPE("ll_invt") = "L"
TYPE("ll_vend") = "L"
TYPE("ln_minamt") = "N"
Selecting Inventory History Records
a_icitem//
a_iciloc//
item1
a_ichist//
a_ichist
Calculating Summary Totals
Building Index to Inventory File
Ranking Items by Dollar Amounts
Calculating Cumulative Values
Selecting Customer History Records
a_archst//
custno
a_archst
Calculating Summary Totals
Building Index to Customer File
Updating from Customer File
Ranking Customers by Dollar Amounts
Calculating Cumulative Values
Selecting Vendor History Records
a_apvhst//
vendno
a_apvhst
Calculating Summary Totals
Building Index to Vendor File
Updating from Vendor File
Ranking Vendors by Dollar Amounts
Calculating Accumulated Values
GN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
EMLN_OPNFL
CLL_INVT
G_DSPST
YGN_MSGLINELN_OPNITEMG_OPNFL
EGF_ICITEMFLN_OPNILOCGF_ICILOCFGF_ICHISTFITEM
TA_ICITEM
TLOCTID
TA_ICILOC
GC_IDRVTMPGC_TMPF1
GC_EXTDBF
ESLS3
GSLS6
GSLS7
GLINESLS10
SLS11
SLS12
GSQTY1
PSQTY2
SQTY3
SQTY4
SQTY5
SQTY6
SQTY7
SQTY8
SQTY9
SQTY10
SQTY11
SQTY12
RLSALE
LN_MINAMT
STKCODE
FLC_TYPE
LD_BDATE
FITMCLSS
PLC_BCLASS
LC_ECLASS
LC_BLOC
ELC_ELOC
PA_ICHIST
A_TMPF2
SGLINERCOUNT
YTDSLS
YTDQTY
DLN_YTDSLS
LN_YTDQTY
LN_RCOUNT
SPCNT
PQPCNT
GC_TMPF2
PGC_EXTNDX
MCUMSPCNT
MCUMQPCNT
MCUMRCPCNTCUMSPCNT
CUMQPCNT
CUMRCPCNT
LL_CUST
TGF_ARCHSTFCUSTNO
A_ARCUST
LC_CTYPE
INDUST
TLC_INDUST
SALESMN
TLC_SALESMNTERR
TLC_TERR
LC_CODE
SEA_ARCHST
COMPANY
ELDATE
SLL_VEND
NTGF_APVHSTFVENDNO
OLDA_APVEND
EPUR1
GPUR6
2PUR8
VENDFPUR9
PUR10
PUR11
PUR12
CTYPE
BUYER
LC_BUYER
NA_APVHST
DYTDPUR
INELN_YTDPUR
LRECDATE
TYPE("ll_cust") = "L"
TYPE("ll_invt") = "L"
TYPE("ll_vend") = "L"
Creating Temporary File for Report
a_tmpf1e/
RCOUNT
RCPCNT
CUMRCPCNT
CUSTNO
VENDNO
BUYER
CTYPE
COMPANY
LOCTID
ITMCLSS
DESCRIP
LSALE
YTDSLS
SPCNT
CUMSPCNT
YTDQTY
QPCNT
CUMQPCNT
SQTY1
SQTY2
SQTY3
SQTY4
SQTY5
SQTY6
SQTY7
SQTY8
SQTY9
SQTY10
SQTY11
SQTY12
SLS10
SLS11
SLS12
LDATE
PUR10
PUR11
PUR12
LRECDATE
YTDPUR
SPCNT
CUMSPCNT
GN_TRACE
E_TRACE
GL_ASSERT
E_ASSRT
EMG_DSPST
CGN_MSGLINEA_SYSDAT
YGC_IDRVTMPGC_TMPF1
MGC_EXTDBF
G_OPNFL
MFFIELD_NAMEFIELD_TYPEFIELD_LEN
FIELD_DEC
LL_CUST
LL_VEND
LL_INVT
GC_TMPF2
PA_TMPF2
PL_BLDDBV
L_CREDBV
C:\SMDISK\
C:\SMDISK\SYVALR.PRG
SYVALR.FXP