impinw4.spr impkont4.spr import4.spr import4.spr imppar4.spr P_TYP IMPINW4 IMPKONT4 IMPORT4 IMPPAR4 CLEARRIB _curobj=objnum(m.exiterr) _curobj=objnum(m.exitok) magazyny.dbf magazyny.dbf ewreman TALKz COMPATIBLEz _r6a0x27nc Import remanentu _r6a0x27nc Ostatni remanent Na dzieF Na dzieF BieF cy remanent @KL 99 @*RVN DopisaF dane;Zamieni dane @*HT Wykonaj @*HT Zaniechaj Katalog Subiekta 4: _r6a0x27nc RIBBON aliGDZIES4 ()DZIEN mag_ILEMAG ORDMAGAZYNY .TEMP1 n =DBFSPATH SET ORF10 MIESIACE oKREMAN m.NOTICE s =S4PATH GETS4DBF MAGS _MG_KOD tMG_NAZWA MG_ID MAGAZYN LESHUTOPEN AMAINPATH PODM EWREMAN CURRAREA TTALKSTAT COMPSTAT _R6A0X27NCFULLYEAR CROKNR TWTWODIG MIESNR _R6A0X285CDOPISZ _R6A0X289TEXITOK AN)_R6A0X28EBEXITERR OLD_REM EN_R6A0X28LWCZEKAJ COPENBASE / / # 9999/12/31/# OB_ID DO_DATAWST OB_DOID RO_ROZCHID Remanent SELECT TW_NAZWA, TW_KOD , TW_SWW , TW_GRUPA , TW_VATPROC, TW_VATID , SUM(OB_ILOSCMA) AS MA_STAN , OB_CENAMA AS MA_CENAZN, TW_CENA1N , TW_CENA2N , TW_CENA3N , TW_CENA1B , TW_CENA2B , TW_CENA3B , TW_CENAEWN, TW_CENAEWB, TW_JM FROM tRem,TOWARY INTO Cursor Remanent WHERE (tRem.OB_TWID = TOWARY.TW_ID) AND (tRem.OB_ILOSCMA <>0) GROUP BY OB_TWID, OB_CENAMA &OrderBy SELECT TW_NAZWA, TW_KOD , TW_DOSTKOD, TW_SWW , TW_GRUPA , TW_VATPROC, TW_VATID , SUM(MAGAZYN.MA_STAN) AS MA_STAN , MA_CENAZN , TW_CENA1N , TW_CENA2N , TW_CENA3N , TW_CENA1B , TW_CENA2B , TW_CENA3B , TW_CENAEWN, TW_CENAEWB, TW_JM FROM MAGAZYN,TOWARY INTO Cursor Remanent WHERE ((MA_ID = p_MaId)OR( p_MaId = 0)) AND (MAGAZYN.MA_TWID =TOWARY.TW_ID)AND (MAGAZYN.MA_STAN >0)AND (m.przetwGrupy OR (NOT m.przetwGrupy AND (TW_GRUPA = p_nazwaGrupy))) GROUP BY TW_ID, MA_CENAZN &OrderBy P_OKRESTYPP_MAID ()P_DATAK g_P_UPORZADKDOK_ALIAS DOK_ORD =DOK_RECN )MAG_ALIAS MAG_ORD MAG_RECN oOBR_ALIAS OBR_ORD =OBR_RECN TOW_ALIAS TOW_ORD )TOW_RECN _NPARAM tOLDNEAR DATAMIN DATAMAX LEORDERBY INPATH OBID PRZETWGRUPOBWARTMAG OBWARTMAGMDODAJDOSTASETTYPUPORTREMBUILD COB_ID TWOB_TWID DOKUMENT SETRECNO DO_DATAWSTDO_ID 289TOBROTY AN)OB_DOID ROZCHOD RO_ROZCHIDDO_STATUS DO_MAID CZMIENSTNMADO_TYP TP_DATAM STP_WARTMAGMWARTMAGM NOB_TWTYP MSETOBROTMNROIL HIDRO_ILOSC _RODOSTID RO_DOSTWIDOB_MAID IDOB_ILOSCMAOB_IDOJCA STPOKOR2AROB_CENAMA STANMAGCNTTW_ID MA_STAN MAMA_CENAZN REMANENT MAGAZYN YPTOWARY POPRZSTANBP_WARTMAG TW_CENA1N TW_CENA2N TW_CENA3N TW_CENA1B TW_CENA2B TW_CENA3B TW_CENAEWNTW_CENAEWBA_WARTCENAX_TRNOK ORDER BY TW_NAZWA, TW_KOD ORDER BY TW_KOD, TW_NAZWA ORDER BY TW_GRUPA, TW_KOD, TW_NAZWA P_UPORZADKRET A_NAZWYCENX_NAZCEN1 X_NAZCEN2 X_NAZCEN3 Nazwami Kodami Grupami A_NAZWYUPO P_CNAME POCNAME YUPONPARAM OB_ID DO_TYP OB_DOID =OB_TWID )OB_MAID OB_ILOSCMAOB_CENAMA OB_IDOJCA P_OB_DOID OLD_ALIAS DOKUMENT DO_DATAWST DO_ID OB_IDOJCA MA_OBID P_DATAM P_DATAK NPARAM DATADKOBR DOKUMENT TDO_ID OBROTY )OB_IDOJCA OSCMADO_TYP OB_ID DATADKOBROOB_DOID OB_CENAMA MAGAZYN MAG_ALIAS MAG_ORD tMAG_RECN SETRECNO MA_OBID LEMA_CENAZN POPRZSTANBDOK_ALIAS DOK_ORD UPDOK_RECN OBR_ALIAS OBR_ORD TAOBR_RECN P_DATAK P_WARTMAG DOK_ALIAS DOK_ORD DOK_RECN TOBR_ALIAS OBR_ORD )OBR_RECN DOKUMENT ASETRECNO OBROTY STANMAGCNTTREM OB_ILOSCMAOB_CENAMA POPRZSTANBDO_ID OB_TWID DODAJDOSTATRE_ALIAS TRE_ORD TRE_RECN DOSTASETRECNO OB_TWID )OBROTY DO_TYP STAOB_ILOSCMAPOPRZSTANB OB_TWID m.tRemOrd TREMORD TAZMNSTAN OBROTY OB_ILOSCMATREM DOSTAOB_TWID OB_MAID )DOKUMENT DO_MAID P_CZYNNOSCP_TYPDOKUMP_TYPOPERA? P_TYPDOKUMOBROTMNOZNU p_oldOrd P_OLDALIASP_OLDORD NP_OLDRECN PodaF y dzie DZIEN LIASMAXDAY NMIESNR LDRECN Nie podano katalogu Subiekta magazyny.dbf magazyny.dbf GDZIES4 ASTEMP1 NONEMAG DBFSPATH GETS4DBF AEXITERR NOTICE )MAGS ILEMAG TAMAGAZYNY ANBMG_KOD AMG_NAZWA MG_ID AMAGAZYN dokument.dbf obroty.dbf rozchod.dbf towary.dbf magazyn.dbf dokument obroty rozchod towary magazyn ewreman Liczba zaimportowanych pozycji FF info4.spr OLD_REM ASMAKEDATA NDZIEN MIESNR ROKNR ATEKST )MG_ID X_MGID TANULL AX_TRNOK NBDATAREM AMAGAZYNY MAGAZYN ADBFSPATH NOTICE BMAINPATH CZEKAJ DOKUMENT EOBROTY ROZCHOD BTOWARY STANMAGAZYTREM REMANENT MA_STAN ADOPISZ REWREMAN KODTOW CNAZWA TWILOSC UMENT CENA TW_KOD TTW_NAZWA TTW_JM )MA_CENAZN SCALREM INFO4 HIDSPR TATUS _R6A0X27NC CURRWIND S_R6A0X27NCFULLYEAR ROKNR OLD_REM ASTANMAGAZY SETTYPUPOR CREAARNWCE CREAARNWUP TREMBUILD DATADKOBRO STANMAGCNT WARTMAGM STPOKOR2AR ZMNIEJSZST SETRECNO ZMIENSTNMA SETOBROTMN POPRZSTANB _R6A0X285C _R6A0X289T _R6A0X28EB _R6A0X28LW _curobj=objnum(m.exiterr) _curobj=objnum(m.exitok) magazyny.dbf magazyny.dbf Import danych sprzedaF y do ewidencji impsv Import danych zakupF w do ewidencji impzv ewsrtr ewsrtr ewamort ewamort ewprac ewwypl ewwypos ewumowy import query TALKz COMPATIBLEz _r6b0vxovu _r6b0vxovu Od daty: Do daty: BieF cy import : Wykonano import z dni: Katalog Subiekta 4: @KL 99 @KL 99 @*C PojedyF czy magazyn @*HN Wykonaj @*HT Zaniechaj @ 2,5 GET m.nic PICTURE "@&N" FROM query SIZE 9,28 DEFAULT 1 MESSAGE ribbon[1]+ribbon[11]+ribbon[8]+ribbon[3] COLOR SCHEME 13 _r6b0vxovu ewsrtr ewsrtr ewamort ewamort ewprac ewwypl ewwypos ewumowy RIBBON ODKIEDY DOKIEDY OD_DZIEN DO_DZIEN TITLE GDZIES3 ONEMAG MAGAZYNY MAGAZYN ILEMAG QUERY ODOKR DOOKR TEMP1 TEMP2 TEMPDAT GDZIES4 S4PATH TEMPPATH DBFSPATH GETS4DBF NOTICE MG_KOD MG_NAZWA MG_ID MIESIACE KSVFK KSVRK MAINPATH lauseIMPORT MKZVFK 1KZVRK EWPRAC EWWYPL aEWWYPOS OEWUMOWY .DATA MIESNR ROKNR MAXDAY iFOUND MAKEDATA CURRAREA *TALKSTAT *COMPSTAT s_R6B0VXOVUFULLYEAR UTWODIG ed(_R6B0VXQR8_R6B0VXQTB_R6B0VXQVR_R6B0VXQY0EXITOK _R6B0VXR2OEXITERR Od_R6B0VXR8Y_R6B0VXR90SHUTOPEN ALIAS PodaF y dzie OD_DZIEN MAXDAY MIESNR PodaF y dzie DO_DZIEN MAXDAY MIESNR ONEMAG MAGAZYN Nie podano katalogu Subiekta magazyny.dbf magazyny.dbf GDZIES4 TEMPPATH ONEMAG DBFSPATH GETS4DBF EXITERR NOTICE ILEMAG MAGAZYNY MG_KOD MG_NAZWA MG_ID MAGAZYN NiewF ciwa data NiewF ciwa data dokument.dbf vat.dbf firmy.dbf dokument firmy ident ident ewzvf ewzvr ewzvfk ewzvrk ewsvf ewsvr ewsvfk ewsvrk go_imp4.prg OD_DZIEN MAXDAY MIESNR DZIEN DO_DZIEN DBFSPATH NOTICE GDZIES4 CLOSBASE DOKUMENT FIRMY SHUTOPEN MAINPATH EWZVF EWZVR EWZVFK EWZVRK EWSVF EWSVR EWSVFK EWSVRK ODKIEDY D2DATA ROKNR DOKIEDY ONEMAG MG_ID MAGAZYNY MAGAZYN GO_IMP4 OPENBASE ONEMAG MAGAZYN _R6B0VXOVU CURRWIND _R6B0VXOVUFULLYEAR ROKNR _R6B0VXQR8 _R6B0VXQTB _R6B0VXQVR _R6B0VXQY0 _R6B0VXR2O _R6B0VXR8Y _R6B0VXR90 Import kontrahentF _curobj = objnum(m.exiterr) _curobj = objnum(m.exitok) TALKz COMPATIBLEz _r280q4ul6 _r280q4ul6 @*HN Wykonaj @*HT Zaniechaj Katalog Subiekta 4: _r280q4ul6 TYTUL rigiGDZIES4 <><><<IDENT <