[INFO] NAZWA_SZABLONU=Sap Business One Towary TYP_POLACZENIA=ADO [TABELE_SEKAFI] TAB001=MODELE_URZADZEN TAB002=GRUPY TAB003=GRUPY_POWIAZANIA [TABELE_OBCE] OITM=SELECT * FROM OITM WHERE INVNTITEM = 'Y' AND ITEMCODE NOT LIKE '+%' OITB=SELECT * FROM OITB WHERE ITMSGRPCOD = :ITMSGRPCOD [TABELE_OBCE_POWIAZANIA] OITB=OITM [ILOSC_REOKORDOW] ILOSC=SELECT COUNT(*) FROM OITM WHERE INVNTITEM = 'Y' AND ITEMCODE NOT LIKE '+%' [OBLICZENIA] INT001=GETID(GEN_MODELE_URZADZEN) INT002=GETID(GEN_GRUPY) INT003=GETID(GEN_GRUPY_POWIAZANIA) [TAB001] DATASET=-1 SQL_INSERT=INSERT INTO MODELE_URZADZEN(%s) VALUES(%s) SQL_UPDATE=UPDATE MODELE_URZADZEN SET %s WHERE MODEL_ID = %d NAZWA_POLA_ID=MODEL_ID MODEL_ID=(G)INT001 KATEGORIA_ID=(FUN)GETKATID(:OITB.ITMSGRPNAM:, (FUN)WARUNEKIF([:OITM.QRYGROUP49:], Y, T, N)) JM=OITM.SALUNITMSR ZAWARTOSC=OITM.NUMINSALE JM_ZAWARTOSC=OITM.SALUNITMSR KOD_KRESK_FAB=OITM.ITEMCODE NAZWA=OITM.ITEMNAME WALUTA_ID=(QI)SELECT WALUTA_ID FROM WALUTY WHERE UPPER(SYMBOL COLLATE PXW_PLK) = :OITM.LASTPURCUR: WALUTA_SYMBOL=OITM.LASTPURCUR CENA_K=(F)0 CENA_S=(F)0 VAT_K=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 1) VAT_S=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 1) VAT_K_KOD=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 2) VAT_S_KOD=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 2) CENA_KBRUTTO=(F)0 CENA_SBRUTTO=(F)0 PKWIU=OITM.SWW AKTYWNE=(S)N CZY_PRODUKT=(S)N CZY_KOSZT=(S)N CZY_EWIDENCJA=(FUN)WARUNEKIF([106, 107, 109], :OITB.ITMSGRPCOD:, T, N) CZY_SPRZEDAZ=(FUN)WARUNEKIF([:OITM.SELLITEM:], Y, T, N) CZY_MAGAZYN=(FUN)WARUNEKIF([:OITM.INVNTITEM:], Y, T, N) CZY_NAPRAWIALNE=(FUN)WARUNEKIF([106, 107, 109], :OITB.ITMSGRPCOD:, T, N) CZY_UPRAWNIENIA=(S)N CZY_TERMIN=(S)N CZY_OPAKOWANIE=(S)N CZY_LEGALIZACJA=(S)N KTO_UTWORZYL=(S)SAPTOSE DATA_UTWORZ=(FUN)GETDATE() STANOWISKO=(FUN)STANOWISKO() CZY_LICZNIK=(S)N KONTROLA_NRSERYJNY=(S)N CZY_FIRMWARE=(S)N MOZNA_PRZEDLUZYC_GWAR=(S)N CZY_MODEL_FISKALNY=(S)N MOZNA_PRZEDLUZYC_GWAR_ZAKUPU=(S)N CZY_TOWAR_WWW=(S)N ZAZNACZ=(S)N [TAB001_WARUNKI] TST001=LENGTH(OITM.ITEMCODE) WAR001=SELECT COUNT(*) FROM MODELE_URZADZEN WHERE UPPER(KOD_KRESK_FAB COLLATE PXW_PLK) = :OITM.ITEMCODE: EDT001=SELECT MODEL_ID FROM MODELE_URZADZEN WHERE UPPER(KOD_KRESK_FAB COLLATE PXW_PLK) = :OITM.ITEMCODE: UPDGEN=INT001 [TAB002] DATASET=OITB SQL_INSERT=INSERT INTO GRUPY(%s) VALUES(%s) SQL_UPDATE=NO NAZWA_POLA_ID=GRUPA_ID TYP=(S)TOWAR GRUPA_ID=(G)INT002 NAZWA=OITB.ITMSGRPNAM KTO_UTWORZYL=(S)SAPTOSE DATA_UTWORZ=(FUN)GETDATE() STANOWISKO=(FUN)STANOWISKO() [TAB002_WARUNKI] TST001=LENGTH(OITB.ITMSGRPNAM) WAR001=SELECT COUNT(*) FROM GRUPY WHERE UPPER(NAZWA COLLATE PXW_PLK) = :OITB.ITMSGRPNAM: EDT001=NO UPDGEN=NO [TAB003] DATASET=OITB SQL_INSERT=INSERT INTO GRUPY_POWIAZANIA(%s) VALUES(%s) SQL_UPDATE=NO NAZWA_POLA_ID=GP_ID GP_ID=(G)INT003 TYP=(S)TOWAR GRUPA_ID=(QI)SELECT GRUPA_ID FROM GRUPY WHERE TYP='TOWAR' AND NAZWA = :OITB.ITMSGRPNAM: POLE_ID=(O)INT001 KTO_UTWORZYL=(S)SAPTOSE DATA_UTWORZ=(FUN)GETDATE() STANOWISKO=(FUN)STANOWISKO() [TAB003_WARUNKI] TST001=LENGTH(OITB.ITMSGRPNAM) WAR001=SELECT COUNT(*) FROM GRUPY_POWIAZANIA GP, GRUPY G WHERE G.GRUPA_ID = GP.GRUPA_ID AND GP.TYP = 'TOWAR' AND GP.POLE_ID = :(O)INT001: AND G.NAZWA = :OITB.ITMSGRPNAM: EDT001=NO UPDGEN=NO