[INFO] NAZWA_SZABLONU=Sap Business One Usługi TYP_POLACZENIA=ADO [TABELE_SEKAFI] TAB001=KATALOG_USLUG TAB002=GRUPY TAB003=GRUPY_POWIAZANIA [TABELE_OBCE] OITM=SELECT * FROM OITM WHERE INVNTITEM = 'N' 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 = 'N' AND ITEMCODE NOT LIKE '+%' [OBLICZENIA] INT001=GETID(GEN_KATALOG_USLUG) INT002=GETID(GEN_GRUPY) INT003=GETID(GEN_GRUPY_POWIAZANIA) [TAB001] DATASET=-1 SQL_INSERT=INSERT INTO KATALOG_USLUG(%s) VALUES(%s) SQL_UPDATE=UPDATE KATALOG_USLUG SET %s WHERE CENNIK_USLUGA_ID = %d NAZWA_POLA_ID=CENNIK_USLUGA_ID CENNIK_USLUGA_ID=(G)INT001 KOD_USLUGI=OITM.ITEMCODE KATEGORIA_ID=(FUN)GETKATID(:OITB.ITMSGRPNAM:, N) NAZWA=OITM.ITEMNAME USLUGA_SPEC=(S)N WALUTA_ID=(QI)SELECT WALUTA_ID FROM WALUTY WHERE UPPER(SYMBOL COLLATE PXW_PLK) = :OITM.LASTPURCUR: WALUTA_SYMBOL=OITM.LASTPURCUR CENA_NETTO=(F):OITM.LSTEVLPRIC: VAT=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 1) VAT_KOD=(FUN)SAP_ROZBIJ_VAT(:OITM.VATGOURPSA:, 2) CENA_BRUTTO=(FUN)WYLICZ_CENE_BRUTTO(:OITM.LSTEVLPRIC:) CENY_GODZ=(S)N USLUGA_SPEC=(S)N OBCE=(S)N ZAZNACZ=(S)N KTO_UTWORZYL=(S)SAPTOSE DATA_UTWORZ=(FUN)GETDATE() STANOWISKO=(FUN)STANOWISKO() [TAB001_WARUNKI] TST001=LENGTH(OITM.ITEMCODE) WAR001=SELECT COUNT(*) FROM KATALOG_USLUG WHERE UPPER(KOD_USLUGI COLLATE PXW_PLK) = :OITM.ITEMCODE: EDT001=SELECT CENNIK_USLUGA_ID FROM KATALOG_USLUG WHERE UPPER(KOD_USLUGI 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)USLUGA 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)USLUGA 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