home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 February
/
CHIP_2_98.iso
/
software
/
testsoft
/
vatman
/
vatman.lzh
/
OBR.DOK
< prev
next >
Wrap
Text File
|
1997-07-17
|
2KB
|
45 lines
#DEFINICJE
dn =dtoc(date())
Od =dtoc(obr[M->lpd,1])
Do =dtoc(obr[M->lpd,2])
Sp =transform(obr[M->lpd,3],"@E 9999.9")
Mm =transform(obr[M->lpd,4],"@E 9999.9")
Ro =transform(obr[M->lpd,5],"@E 9999.9")
Rz =transform(obr[M->lpd,6],"@E 9999.9")
Cz =transform(obr[M->lpd,7],"@E 99999.99")
Cs =transform(obr[M->lpd,8],"@E 99999.99")
Spi=transform(obr[M->lpd,9],"@E 99999")
Il =transform(slownik('STANY',KOD_MAGAZ+KOD_TOWARU,'ILOSC'),"@E 99999.9")
Ilr=transform(STANY->ILOSC_REZ,"@E 99999.9")
Ilo=transform(STANY->ILOSC_ZO,"@E 99999.9")
Ild=transform(STANY->ILOSC_ZD,"@E 99999.9")
Ils=transform(STANY->ILOSC-STANY->ILOSC_REZ-STANY->ILOSC_ZO+STANY->ILOSC_ZD,"@E 99999.9")
#NAGLOWEK
A N A L I Z A T O W A R O W A z dnia:[dn ]
Dla: [KOD_MAGAZ]/[KOD_TOWARU] [slownik('INDEKS',KOD_TOWARU)]
┌─────────────────┬──────────────┬──────┬──────┬───────┬─────────────────┐
│ Za okres │Sprzeda╛ iloÿå│ │ │ │Tendencje cenowe │
├────────┬────────┼────────┬─────┤ │Inne │ ├────────┬────────┤
│Od │Do │towarów │dokum│ Mm- │rozch.│ Razem │ zakup │ sprzed.│
├────────┼────────┼────────┼─────┼──────┼──────┼───────┼────────┼────────┤
#POZYCJE
│[Od ]│[Do ]│ [Sp ]│[Spi]│[Mm ]│[Ro ]│ [Rz ]│[Cz ]│[Cs ]│
#SUMY
ùred├────────┼────────┼────────┼─────┼──────┼──────┼───────┼────────┼────────┤
nio:│[Od ]│[Do ]│ [Sp ]│[Spi]│[Mm ]│[Ro ]│ [Rz ]│[Cz ]│[Cs ]│
└────────┴────────┴────────┴─────┴──────┴──────┴───────┴────────┴────────┘
┌────────────────────────────────────────┬───────┐
│ Stan magazynu: │[Il ]│
│ - iloÿå zarezerwowana │[Ilr ]│
│ - iloÿå zmówiona przez odbiorców│[Ilo ]│
│ + zamówienia u dostawców │[Ild ]│
├────────────────────────────────────────┼───────┤
│ Stan po zamówieniach │[Ils ]│
└────────────────────────────────────────┴───────┘
[M->ADR]
[M->ADR1]
NIP: [M->NIP ]
#KONIEC