OnNewRelation - Событие создания документа по связи

Событие создания документа по связи

Событие OnNewRelation ( создать по связи ) приходит к документу сразу после его создания, в случае, если документ создается на основании другого вида документа. Например Расходная накладная по Счету, Или Счет по Договору.

Какие документы могут быть созданы из каких определяется в Дизайнере документов в разделе Связанные Документы.

Синтаксис события:

PROCEDURE OnNewRelation :
  define input parameter rid-doc  as integer.
  define input parameter rid-main as integer.

гдето rid-doc - внутренний номер документа, который создается. rid-main - внутрений номер документа-основания.

Пример Использования:

PROCEDURE OnNewRelation :
  define input parameter rid-doc as integer.
  define input parameter rid-main as integer.
 
  define variable oper-day as date.
  define variable tpdoc     as integer.                  
 
  run src/kernel/goperday.p ( OUTPUT oper-day ).
  run src/kernel/set_ffv.p ( "1:1", rid-doc, STRING(oper-day) ).
  run src/kernel/set_ffv.p ( "1:3", rid-doc, "1" ).
  run src/kernel/set_ffv.p ( "1:4", rid-doc, "0" ).  
  run src/kernel/set_ffv.p ( "1:7", rid-doc, "1" ).  
  run  src/kernel/defemp.p.                                 
  run src/kernel/set_ffv.p ( "1:9", rid-doc, RETURN-VALUE) .
  run src/kernel/set_ftv.p ( "2:1", rid-doc, 1, "1" ).
  run src/kernel/set_ffv.p ( "1:18", rid-doc, string ( rid-main ) ).
  run src/kernel/set_ffv.p ( "1:19", rid-doc, "yes" ).
  run src/kernel/doc2tp.p ( rid-main, OUTPUT tpdoc ).            
  case tpdoc:
     when 141 then do:
        run src/kernel/cp_fld.p ( rid-main, "1:3,1:8,1:7,1:4,1:9,1:28,1:47,2:1,2:2,2:3,2:4",
                                                rid-doc, "1:3,1:4,1:5,1:15,1:25,1:9,1:47,2:1,2:2,2:3,2:4" ).
     end.
  end case.
END.