VIEWDOC - История изменений

Hisava: /* Примеры */

2018-05-15T08:49:02Z

‎Примеры

2018-05-03T08:42:27Z

2018-05-03T08:42:19Z

Hisava переименовал страницу ViewDoc в VIEWDOC

2018-01-18T12:32:31Z

2018-01-18T12:31:27Z

2018-01-18T12:31:12Z

‎Примеры

2017-06-13T13:52:41Z

2016-09-08T08:43:03Z

‎Примеры

2016-09-08T08:42:49Z

‎Примеры

2016-09-08T08:38:10Z

@@ Строка 46: / Строка 46: @@
   Aadd( flt, "KSHIFT" )
   Aadd( flt, ['] + my + ['] )
-  [[ViewDoc]]( "FRO10001",, flt,,,, !Left( my, 8 ) = DtoS( Date() ) and GetParam( 'ANOTHERDAY' ) = 'Н' )
+  [[VIEWDOC]]( "FRO10001",, flt,,,, !Left( my, 8 ) = DtoS( Date() ) and GetParam( 'ANOTHERDAY' ) = 'Н' )
 = Смотрите также =

@@ Строка 1: / Строка 1: @@
-[[ViewDoc]] - это функция ( [[QrAddFn.pas]] )
+[[VIEWDOC]] - это функция ( [[QrAddFn.pas]] )
   Высветка документа с возможностью выбора
-[[ViewDoc]]( <kind/Folder> [,lvl] [,Filter] [,DocType] [,ResultExpr] [,DisUserKey] [,ReadOnly] [,AddFilter] [,SaveSel] [,ExpSel] [,ShowType] [,PrintAlias] [,OpenParLvl=False] [,RefPath] [,OpPath] [,DisCalc_ost] [,ChoiceFold] [,IsRefr] [,ClientFilt] )
+[[VIEWDOC]]( <kind/Folder> [,lvl] [,Filter] [,DocType] [,ResultExpr] [,DisUserKey] [,ReadOnly] [,AddFilter] [,SaveSel] [,ExpSel] [,ShowType] [,PrintAlias] [,OpenParLvl=False] [,RefPath] [,OpPath] [,DisCalc_ost] [,ChoiceFold] [,IsRefr] [,ClientFilt] )
 В описании "Filter" можно дополнительно указать год и месяц документа
@@ Строка 11: / Строка 11: @@
 OpenParLvl открытие родительских этажей
 = Примеры =
-  [[ViewDoc]]( 'F1310001' )
+  [[VIEWDOC]]( 'F1310001' )
   local filt, doc, task_anal

@@ Строка 29: / Строка 29: @@
   local flt, my, task_anal
   task_anal := GetPrm( 'TASKANAL', TaskName, TaskNum )
-  my := Month_Year( true, true )
+  my := [[MONTH_YEAR]]( true, true )
   if Empty( my )
     return

@@ Строка 46: / Строка 46: @@
   Aadd( flt, "KSHIFT" )
   Aadd( flt, ['] + my + ['] )
-  ViewDoc( "FRO10001",, flt,,,, !Left( my, 8 ) = DtoS( Date() ) and GetParam( 'ANOTHERDAY' ) = 'Н' )
+  [[ViewDoc]]( "FRO10001",, flt,,,, !Left( my, 8 ) = DtoS( Date() ) and GetParam( 'ANOTHERDAY' ) = 'Н' )
 = Смотрите также =

@@ Строка 26: / Строка 26: @@
   [[ViewDoc]]('PAC1000'+nn,,{'KREFL1',"'R10'",'KANAL1','[[GetPrm]]('TASKANAL',TaskName,TaskNum)',;
          'CurYear',left(my,4),'CurMonth',substr(my,5,2),'CurDay',substr(my,7,2),'DSHIFT',"'"+my+"'"})
 = Смотрите также =
 [[Полезные функции]]
 [[Функции Delphi]]

← Предыдущая	Версия 08:42, 3 мая 2018
(нет различий)

@@ Строка 28: / Строка 28: @@
   if  [[Empty]](my);  Return;  endif
   if  IsKondNAK(,.t.) .or. IsEastNAK(,.t.);  nn:='3';  endif
-  [[ViewDoc]]('PAC1000'+nn,,{'KREFL1',"'R10'",'KANAL1','GetPrm('TASKANAL',TaskName,TaskNum)',;
+  [[ViewDoc]]('PAC1000'+nn,,{'KREFL1',"'R10'",'KANAL1','[[GetPrm]]('TASKANAL',TaskName,TaskNum)',;
          'CurYear',left(my,4),'CurMonth',substr(my,5,2),'CurDay',substr(my,7,2),'DSHIFT',"'"+my+"'"})

@@ Строка 15: / Строка 15: @@
 = Примеры =
-  ViewDoc( 'F1310001' )
+  [[ViewDoc]]( 'F1310001' )
   local filt, doc, task_anal
@@ Строка 23: / Строка 23: @@
   [[Aadd]]( filt, "DANAL2"  )
   [[Aadd]]( filt, task_anal )
-  ViewDoc( doc,, filt, ~ReadOnly := true )
+  [[ViewDoc]]( doc,, filt, ~ReadOnly := true )
   Local  my:=[[Month_Year]](.t.,.t.), nn:='1'
   if  [[Empty]](my);  Return;  endif
   if  IsKondNAK(,.t.) .or. IsEastNAK(,.t.);  nn:='3';  endif
-  ViewDoc('PAC1000'+nn,,{'KREFL1',"'R10'",'KANAL1','GetPrm('TASKANAL',TaskName,TaskNum)',;
+  [[ViewDoc]]('PAC1000'+nn,,{'KREFL1',"'R10'",'KANAL1','GetPrm('TASKANAL',TaskName,TaskNum)',;
          'CurYear',left(my,4),'CurMonth',substr(my,5,2),'CurDay',substr(my,7,2),'DSHIFT',"'"+my+"'"})

← Предыдущая		Версия 08:38, 8 сентября 2016
Строка 1:		Строка 1:
−	ViewDoc - это функция~~, описанная в файле~~ [[QrAddFn.pas]]	+	ViewDoc - это функция ( [[QrAddFn.pas]] )

	ViewDoc( <kind/Folder> [,lvl] [,Filter] [,DocType] [,ResultExpr] [,DisUserKey] [,ReadOnly] [,AddFilter] [,SaveSel] [,ExpSel] [,ShowType] [,PrintAlias] [,OpenParLvl=False] [,RefPath] [,OpPath] [,DisCalc_ost] [,ChoiceFold] [,IsRefr] [,ClientFilt] )		ViewDoc( <kind/Folder> [,lvl] [,Filter] [,DocType] [,ResultExpr] [,DisUserKey] [,ReadOnly] [,AddFilter] [,SaveSel] [,ExpSel] [,ShowType] [,PrintAlias] [,OpenParLvl=False] [,RefPath] [,OpPath] [,DisCalc_ost] [,ChoiceFold] [,IsRefr] [,ClientFilt] )