SELECT * FROM VMS_UNIVERS WHERE TIP='F' AND GR1=:INI_CONTAFX
SELECT * FROM VMS_UNIVERS WHERE TIP='O' AND GR1='I' AND CODI=:INDOC_M_DTDEP
SELECT * FROM VMS_UNIVERS WHERE TIP='M' AND CODI=:SC /* SC=edit_fmRG1b_sl12Sc */
SELECT * FROM VMS_UNIVERS WHERE TIP='F' AND GR1=:CONT /* CONT=\SYS\AFX\pkg_afx_Acc5342 */
begin
:DefDate:=:DATADOC;
raise_application_error(-20000,'Param values:
SimpleString: '''||:SimpleString||'''
AnyNumber: '''||:AnyNumber||'''
AnyDate: '''||:AnyDate||'''
Univers: '''||:Univers||'''
SysS: '''||:SysS||'''
');
end;
/*
Captions:
.text.SimpleString=Простая строка
.text.AnyNumber=Любое число
.text.AnyDate=Любая дата
.text.Univers=Унив. справ.
.text.SysS=Сист. справ.
English captions:
.text.E.SimpleString=Simple string
.text.E.AnyNumber=Any number
.text.E.AnyDate=Any date
.text.E.Univers=Universal list
.text.E.SysS=System list
Types:
.type.AnyNumber=Number
.type.AnyDate=Date
.type.Univers=List,U,O,E
.type.SysS=List,S,F,2
Default values:
.def.SimpleString=Example
.def.AnyNumber=100
.def.AnyDate=:DefDate
*/
BEGIN EXECUTE IMMEDIATE 'DELETE FROM '||&BDEQ#1mPriv#Bank#dbf||' WHERE VALUTA=:VAL' USING 'LEI'; INSERT INTO TMS_TEST(VALUTA,CURS)SELECT VALUTA,CURS FROM &BDE#1mPriv#Bank#dbf; END;Здесь демонстрируются оба вида префикса BDE# и BDEQ#. Несмотря на то, что имена макросов формально разные, в обоих будет использована одна и та же таблица Oracle.
BEGIN EXECUTE IMMEDIATE 'DELETE FROM '||&TXTQ#123||' WHERE NVL(CANT,0)=0' USING 'LEI'; INSERT INTO TMS_TEST(SC,CANT)SELECT COD,CANT FROM &TXT#123; END;В свойствах документа могут быть определены следующие свойства:
OraLoadFile123=C:\Import\barcodes.txt OraLoadScript123= BEGIN INSERT INTO TMS_LOAD_INFO(ID,TABLENAME,DESCRIPTION)VALUES(123,'','Strih-Cod inventarizatia'); INSERT INTO TMS_LOAD_STRUCT(ID,COL,COLUMNNAME,TYPE,PREC)VALUES(123,1,'COD','I',10); INSERT INTO TMS_LOAD_STRUCT(ID,COL,COLUMNNAME,TYPE,PREC,SCALE)VALUES(123,2,'CANT','F',10,3); COMMIT; END;Здесь демонстрируются оба вида префикса TXT# и TXTQ#. Несмотря на то, что имена макросов формально разные, в обоих будет использована одна и та же таблица Oracle.
begin :outbde:='target=:1mDBF:testsyss.dbf'||chr(10)|| 'source=SELECT * FROM TMS_SYSS WHERE TIP=''S'' AND COD=3 AND COD1>0'; end;