Skip to content

KVSPSAPSP Job Text Line#

Fields#

Name Type Note
Table Name Option OptionMembers: KVSPSAJobPSPHeader,KVSPSAJobPSPLine,PSA Job Budgetline,Job
Job No. Code[20]
Line No. Integer
Date Date
Text Text[130]
Version No. Code[20]
Job Budget Name Code[10]
Table Line Integer
Budget Line No. Integer
Sales Quote print Boolean
Sales Order print Boolean
Sales Invoice print Boolean
Sales Credit Memo print Boolean
Sales Blanket order print Boolean
Sales Return order print Boolean
Sales Shipment print Boolean
Purchase Quote print Boolean
Purchase Order print Boolean
Purchase Invoice print Boolean
Purchase Credit memo print Boolean
Purchase Blanket order print Boolean
Purchase Return order print Boolean
Posted Sales Receipt print Boolean
Posted Purch Return Shipment Boolean
Purchase Receive print Boolean
Position Enum (KVSKBATextPosition)
Job Document Print Boolean
Formatted Text Blob
Advertising Group Text Boolean

Procedures#

CalcNoOfJobTextLines(Option, Code[20], Code[10], Code[20], Integer, Integer, Enum KVSKBATextPosition) : Integer#

procedure CalcNoOfJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"): Integer

DoShowJobTextLines(Option, Code[20], Code[10], Code[20], Integer, Integer, Enum KVSKBATextPosition, Boolean) :#

procedure DoShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"; IsHandled: Boolean):

GetBlobText() : Text#

procedure GetBlobText(): Text

GetPlainBlobText() : Text#

procedure GetPlainBlobText(): Text

InitNewRecord() :#

procedure InitNewRecord():

InsertExtendedText() :#

procedure InsertExtendedText():

InsertStdText() :#

procedure InsertStdText():

SetBlobText(Text) :#

procedure SetBlobText(WriteText: Text):

ShowJobTextLines(Option, Code[20], Code[10], Code[20], Integer, Integer, Enum KVSKBATextPosition) :#

procedure ShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"):

TransferFieldsFromSalesDocumentTextLine(Record KVSKBASalesDocumentText, Record KVSKBASalesDocTextTempl, Record KVSKBAPurchaseDocTextTempl) :#

Summary: TransferFieldsFromSalesDocumentTextLine transfers the text and the visibility settings by report from a given sales document text - record, and initializes other fields from the respective templates.

procedure TransferFieldsFromSalesDocumentTextLine(KVSKBASalesDocumentText: Record "KVSKBASalesDocumentText"; KVSKBASalesDocTextTempl: Record "KVSKBASalesDocTextTempl"; KVSKBAPurchaseDocTextTempl: Record "KVSKBAPurchaseDocTextTempl"):

Parameters:

  • KVSKBASalesDocumentText: Source-Record of Type SalesDocumentText
  • KVSKBASalesDocTextTempl: SalesDocumentTextTemplate is used for job shipment only.
  • KVSKBAPurchaseDocTextTempl: PurchaseDocumentTextTemplate

Events#

KVSPSAOnAfterInitNewRecordFromTemplate(Record KVSPSAPSP Job Text Line, Record KVSKBASalesDocTextTempl, Record KVSKBAPurchaseDocTextTempl) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterInitNewRecordFromTemplate(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; KVSKBASalesDocTextTemplate: Record "KVSKBASalesDocTextTempl"; KVSKBAPurchaseDocTextTemplate: Record "KVSKBAPurchaseDocTextTempl"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'KVSPSAOnAfterInitNewRecordFromTemplate', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterInitNewRecordFromTemplate(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; KVSKBASalesDocTextTemplate: Record "KVSKBASalesDocTextTempl"; KVSKBAPurchaseDocTextTemplate: Record "KVSKBAPurchaseDocTextTempl")
begin
end;

KVSPSAOnAfterInitNewRecordFromXRec(Record KVSPSAPSP Job Text Line, Record KVSPSAPSP Job Text Line) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterInitNewRecordFromXRec(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; var xRecPSPJobTextLine: Record "KVSPSAPSP Job Text Line"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'KVSPSAOnAfterInitNewRecordFromXRec', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterInitNewRecordFromXRec(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; var xRecPSPJobTextLine: Record "KVSPSAPSP Job Text Line")
begin
end;

KVSPSAOnAfterTransferFieldsFromExtTextLine(Record KVSPSAPSP Job Text Line, Record Extended Text Line) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterTransferFieldsFromExtTextLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; ExtendedTextLine: Record "Extended Text Line"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'KVSPSAOnAfterTransferFieldsFromExtTextLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterTransferFieldsFromExtTextLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; ExtendedTextLine: Record "Extended Text Line")
begin
end;

KVSPSAOnAfterTransferFieldsFromSalesDocumentTextLine(Record KVSPSAPSP Job Text Line, Record KVSKBASalesDocumentText, Record KVSKBASalesDocTextTempl, Record KVSKBAPurchaseDocTextTempl) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterTransferFieldsFromSalesDocumentTextLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; KVSKBASalesDocumentText: Record "KVSKBASalesDocumentText"; KVSKBASalesDocTextTempl: Record "KVSKBASalesDocTextTempl"; KVSKBAPurchaseDocTextTempl: Record "KVSKBAPurchaseDocTextTempl"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'KVSPSAOnAfterTransferFieldsFromSalesDocumentTextLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterTransferFieldsFromSalesDocumentTextLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; KVSKBASalesDocumentText: Record "KVSKBASalesDocumentText"; KVSKBASalesDocTextTempl: Record "KVSKBASalesDocTextTempl"; KVSKBAPurchaseDocTextTempl: Record "KVSKBAPurchaseDocTextTempl")
begin
end;

KVSPSAOnAfterTransferFieldsFromTemplateLine(Record KVSPSAPSP Job Text Line, Record KVSPSAJob Template Text) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterTransferFieldsFromTemplateLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; JobTemplateText: Record "KVSPSAJob Template Text"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'KVSPSAOnAfterTransferFieldsFromTemplateLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterTransferFieldsFromTemplateLine(var PSPJobTextLine: Record "KVSPSAPSP Job Text Line"; JobTemplateText: Record "KVSPSAJob Template Text")
begin
end;

OnAfterShowJobTextLines(Option, Code[20], Code[10], Code[20], Integer, Integer, Enum KVSKBATextPosition) :#

[IntegrationEvent(false, false)]
local procedure OnAfterShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'OnAfterShowJobTextLines', '', false, false)]
local procedure DoSomethingOnAfterShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition")
begin
end;

OnBeforeShowJobTextLines(Option, Code[20], Code[10], Code[20], Integer, Integer, Enum KVSKBATextPosition, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Table, Table::"KVSPSAPSP Job Text Line", 'OnBeforeShowJobTextLines', '', false, false)]
local procedure DoSomethingOnBeforeShowJobTextLines(TableName: Option; JobNo: Code[20]; JobBudgetName: Code[10]; VersionNo: Code[20]; TableLine: Integer; BudgetLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"; var IsHandled: Boolean)
begin
end;