Spread

此函数根据在配置文件帐户（例如，Revenue 配置文件、4-4-5 等）中定义的配置文件，将源帐户的单个期间值（例如，P#[Year]）分配到目标帐户的所有期间。

返回值

没有返回值。

语法

Spread(Destination,Source,Factor,FactorN,FactorD,Temp,Per)

表 12-24 Spread 函数的语法

参数 有效值

Destination

有效的目标 POV，是帐户、ICP 和 Custom 1-4 成员的有效组合。

Source

有效的源 POV，是维成员的有效组合。源 POV 必须包含单个期间，例如 P#[Year]。该单个期间的金额是要扩散的金额。

Factor

有效的源 POV。Factor 是用于存储分摊因子的帐户。

FactorN

有效的源 POV。FactorN 是用作扩散分配基准的分子因子。

FactorD

有效的源 POV。FactorD 是用作扩散分配基准的分母因子。

Temp

有效的目标帐户。Temp 是临时存储源值的帐户。

Per

定义时间范围内第一个期间名称的期间字符串，例如 "January"。Temp 值存储在第一个期间中，要在计算中引用此值必须使用该参数。

详细说明

此函数根据在配置文件 POV（例如，Revenue 配置文件、4-4-5 等）中定义的配置文件，将源 POV 的单个期间值（例如，P#[Year]）分配到目标 POV 的所有期间。

基于时间的分配特别适合于预算应用程序：先输入全年的金额，然后根据合适的配置文件在各期间分配该金额。

源 POV 必须包含单个期间。该期间通常为 P#[Year]，但也可以是任何单个期间，如 P#January。

计算时将源 POV 中的值存储在临时帐户中。这样做是必需的，因为源帐户和目标帐户通常是同一个帐户。如果是这种情况，P#[Year] 中的值将随计算的进行而从一个期间变为下一个期间。因此，必须先存储该值才能在所有期间引用它。

建议在调用例程中设置变量并将其传递给 Spread 函数；这些变量定义目标、源、配置文件、Temp 和 Period1 参数。另外还建议将调用例程中的变量名称设置与 Spread 函数中的相同。

示例

Telephone 帐户中的 Year 值使用 4-4-5 季度比分配到各期间。

从 SPREAD 返回的结果如下：

HS.EXP "A#TempTelephone.C1#[None] = A#Telephone.C1#[None].P#[Year]" (Where Period.Number = 1)
HS.EXP "A#Telephone.C1#[None] = A#TempTelephone P#January * E.Globals.A#Profile445.C1#[None].P#Cur / E.Globals.A#Profile445.C1#[None].P#[Year]

示例脚本

本脚本包含以下信息：

  • 在调用例程中编写的示例语句。

  • 在调用例程中设置变量并将其传递给 Spread 函数。

  • 调用例程中的变量名称设置为与 Spread 函数中的相同。

    Sub Calculate()
    Dim Destination
Dim Source
Dim Factor
Dim FactorN
Dim FactorD
Dim Temp
Dim Per  
    Source = "A#Telephone.C1#[None].P#[Year]"
Destination = "A#Telephone.C1#[None]"
Factor = "A#Factor.C1#[None]"
FactorN = "E#Globals.A#Profile445.C1#[None].P#CUR"
FactorD = "E#Globals.A#Profile445.C1#[None].P#[Year]"
Temp = "A#TempTelephone.C1#[None]"
Per = "January"
    Call Spread(Destination,Source,Factor,
FactorN,FactorD,Temp,Per)    
    End Sub
    ' Beginning of the Spread function 
    Sub Spread(Destination,Source,Factor,FactorN,FactorD,Temp,Per)
    If HS.Period.Number = 1 Then 
    HS.Exp Temp & " = " & Source
    End If
    HS.Clear Factor
HS.EXP Factor & " = " & FactorN & " / " & FactorD    
    HS.Clear Destination
HS.EXP Destination & " = " & Temp & ".P#" & Per & " * " & Factor 
    End Sub