Howdy, Stranger!
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.6K Microsoft Dynamics NAV
- 18.6K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 115 Navision DOS
- 854 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 615 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 295 Dynamics CRM
- 109 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 993 SQL General
- 384 SQL Performance
- 34 SQL Tips & Tricks
- 34 Design Patterns (General & Best Practices)
- Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.7K General
- 1.1K General Chat
- 1.6K Website
- 79 Testing
- 1.2K Download section
- 23 How Tos section
- 259 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions
Form + Subform both Temporary
jsh
Member Posts: 2
Hello guys,
i run in to a small problem:
i have created two forms, one basic form with a subform. The settings of both forms are with the SourceTableTemporary to yes.
When i set the option to SourceTableTemporary(No) then everything works fine. But when i set the variable SourceTableTemporary(yes) then when I insert the
primary key of the basic form I get an error that in the subform there no Nr. in filter and NAV returns the No. variable of my form.
Does anyone have an idea?
Thnx
greetings Jan
i run in to a small problem:
i have created two forms, one basic form with a subform. The settings of both forms are with the SourceTableTemporary to yes.
When i set the option to SourceTableTemporary(No) then everything works fine. But when i set the variable SourceTableTemporary(yes) then when I insert the
primary key of the basic form I get an error that in the subform there no Nr. in filter and NAV returns the No. variable of my form.
Does anyone have an idea?
Thnx
OBJECT Form 50218 Quick Insert Call
{
OBJECT-PROPERTIES
{
Date=31-01-09;
Time=17:56:16;
Modified=Yes;
Version List=Jira;
}
PROPERTIES
{
Width=32010;
Height=17270;
CaptionML=[ENU=Snelle Invoer nieuwe Call;
NLD=Snelle Invoer nieuwe Call];
SourceTable=Table50100;
SourceTableTemporary=Yes;
}
CONTROLS
{
{ 1000000000;Frame ;4510 ;0 ;13640;6710 ;HorzGlue=Left;
VertGlue=Top;
FontBold=Yes;
CaptionML=[ENU=Create New Call;
NLD=Aanmaken Nieuwe Call] }
{ 1000000001;TextBox;8360 ;1210 ;2750 ;440 ;ParentControl=1000000000;
InFrame=Yes;
SourceExpr="Part Of" }
{ 1000000002;Label ;4840 ;1210 ;3410 ;440 ;ParentControl=1000000001 }
{ 1000000003;TextBox;8360 ;660 ;2750 ;440 ;ParentControl=1000000000;
InFrame=Yes;
SourceExpr="Job No." }
{ 1000000004;Label ;4840 ;660 ;3410 ;440 ;ParentControl=1000000003 }
{ 1000000005;TextBox;4840 ;2970 ;12980;1540 ;ParentControl=1000000000;
InFrame=Yes;
HorzAlign=Left;
VertAlign=Top;
MultiLine=Yes;
SourceExpr=ProblemDescription }
{ 1000000006;Label ;4840 ;2310 ;3520 ;440 ;ParentControl=1000000005;
FontBold=Yes;
CaptionML=[ENU=Problem Description;
NLD=Probleem Omschrijving] }
{ 1000000034;TextBox;4840 ;5170 ;12980;1320 ;ParentControl=1000000000;
InFrame=Yes;
HorzAlign=Left;
VertAlign=Top;
MultiLine=Yes;
SourceExpr=Solution }
{ 1000000035;Label ;4840 ;4620 ;3300 ;440 ;ParentControl=1000000034;
FontBold=Yes }
{ 1000000037;Image ;11990;330 ;6050 ;990 ;HorzGlue=Right;
ParentControl=1000000000;
InFrame=Yes;
BackTransparent=Yes;
Bitmap=C:\Data\Microsoft Dynamics Nav\Logo's\logo.bmp }
{ 1000000040;TextBox;8360 ;1760 ;5060 ;440 ;Editable=No;
ParentControl=1000000000;
InFrame=Yes;
SourceExpr="Call No." }
{ 1000000041;Label ;4840 ;1760 ;3410 ;440 ;ParentControl=1000000040 }
{ 1000000007;Frame ;18260;0 ;13640;3630 ;HorzGlue=Both;
ParentControl=1000000000;
InFrame=Yes;
FontBold=Yes;
CaptionML=[ENU=Extra Information;
NLD=Aanvullende gegevens] }
{ 1000000008;TextBox;21890;660 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Attached To" }
{ 1000000009;Label ;18480;660 ;3300 ;440 ;ParentControl=1000000008 }
{ 1000000010;TextBox;28820;660 ;2750 ;440 ;Editable=No;
ParentControl=1000000007;
InFrame=Yes;
SourceExpr=Status }
{ 1000000011;Label ;25410;660 ;3300 ;440 ;ParentControl=1000000010 }
{ 1000000012;TextBox;21890;1210 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Attached to Consultant" }
{ 1000000013;Label ;18480;1210 ;3300 ;440 ;ParentControl=1000000012 }
{ 1000000014;TextBox;28820;1210 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr=Priority }
{ 1000000015;Label ;25410;1210 ;3300 ;440 ;ParentControl=1000000014 }
{ 1000000016;TextBox;21890;1870 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Total hours spend" }
{ 1000000017;Label ;18480;1870 ;3300 ;440 ;ParentControl=1000000016 }
{ 1000000018;TextBox;28820;1870 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Type of Error" }
{ 1000000019;Label ;25410;1870 ;3300 ;440 ;ParentControl=1000000018 }
{ 1000000020;TextBox;28820;2420 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Type Issue" }
{ 1000000021;Label ;25410;2420 ;3300 ;440 ;ParentControl=1000000020 }
{ 1000000022;CheckBox;28820;2970;440 ;440 ;ParentControl=1000000007;
InFrame=Yes;
ShowCaption=No;
SourceExpr="Chargeable Yes/No" }
{ 1000000023;Label ;25410;2970 ;3300 ;440 ;ParentControl=1000000022 }
{ 1000000043;TextBox;21890;2420 ;2750 ;440 ;ParentControl=1000000007;
InFrame=Yes;
SourceExpr="Type Call" }
{ 1000000044;Label ;18480;2420 ;3300 ;440 ;ParentControl=1000000043 }
{ 1000000024;Frame ;18260;3850 ;13640;2860 ;FontBold=Yes;
CaptionML=[ENU=Contact Information;
NLD=Contact Informatie] }
{ 1000000025;TextBox;21890;4400 ;2750 ;440 ;ParentControl=1000000024;
InFrame=Yes;
SourceExpr="Contact No." }
{ 1000000026;Label ;18480;4400 ;3300 ;440 ;ParentControl=1000000025 }
{ 1000000027;TextBox;21890;4950 ;5500 ;440 ;Editable=No;
ParentControl=1000000024;
InFrame=Yes;
SourceExpr="Name of Contact" }
{ 1000000028;Label ;18480;4950 ;3300 ;440 ;ParentControl=1000000027 }
{ 1000000029;TextBox;21890;5500 ;5500 ;440 ;Editable=No;
ParentControl=1000000024;
InFrame=Yes;
SourceExpr="E-mail Contactperson" }
{ 1000000030;Label ;18480;5500 ;3300 ;440 ;ParentControl=1000000029 }
{ 1000000031;TextBox;21890;6050 ;5500 ;440 ;Editable=No;
ParentControl=1000000024;
InFrame=Yes;
SourceExpr="Telefoonnr. Contactpersoon" }
{ 1000000032;Label ;18480;6050 ;3300 ;440 ;ParentControl=1000000031 }
{ 1000000033;CommandButton;29810;16610;2200;550;
VertGlue=Top;
CaptionML=NLD=Registreer Call;
OnPush=VAR
CuJira@1000000000 : Codeunit 50001;
Text001@1000000002 : TextConst 'ENU=Did you fill in all the fields;NLD=Hebt u alle velden ingevuld?';
CuSMTP@1000000003 : Codeunit 400;
EmployeeName@1000000004 : Text[100];
Resource@1000000005 : Record 156;
Text002@1000000006 : TextConst 'NLD=(AGP Dynamics - Solutions HelpDesk)';
UserSetup@1000000007 : Record 91;
CallTrackingSetup@1000000008 : Record 50105;
SupportEmailAdress@1000000009 : Text[150];
MailSubject@1000000010 : Text[250];
Text003@1000000011 : TextConst 'ENU=Support Callno. %1;NLD=Betreft: Support Callnr %1';
Text004@1000000012 : TextConst 'NLD=%1.';
MailBody@1000000013 : Text[1024];
Text005@1000000014 : TextConst 'NLD=%1.';
ExtraInfo@1000000015 : Text[1024];
CuTextEditor@1000000016 : Codeunit 50006;
ExtraInfo1@1000000017 : Text[1024];
BEGIN
//Insert Call Text Problem description 1 & Problem description 2
IF ProblemDescription = '' THEN
ERROR('Kan niet leeg zijn') ELSE
CuTextEditor.TextHandlerCall(ProblemDescription,Rec);
CuJira.CheckFields(Rec);
CuJira.InsertNewCall(Rec);
IF UserSetup.GET(USERID) THEN BEGIN
EmployeeName:=UserSetup."Resource Name" + ' ' +Text002;
END;
IF CallTrackingSetup.GET() THEN
SupportEmailAdress:=CallTrackingSetup."Support E-mail";
MailSubject:= STRSUBSTNO(Text003,"Call No.");
MailBody:= '<table border=0 cellspacing=2 cellpadding=2 style="width:800px; font-family:calibri;">'+
'<tr style="background:#12206b; color:white; font-weight:bold;">' +
'<td colspan=2>Call Informatie</td></tr>' +
'<tr><td valign=top style="width:200px;">Probleem Omschrijving:</td><td valign=top>'+
STRSUBSTNO(Text004,"Call Description") + '</td></tr>' +
'<tr><td valign=top>Probleem gebied:</td><td valign=top>' +
STRSUBSTNO(Text005,"Part Of") + '</td></tr></table>';
ExtraInfo:= '<BR>'+'<BR>'+'<table border=0 cellspacing=2 cellpadding=2 style="width:800px; font-family:calibri;">'+
'<tr style="background:#0164a7; color:white; font-weight:bold;">' +
'<td colspan=2>Contact Gegevens</td></tr>' +
'<tr><td valign=top style="width:200px;">Naam:</td><td valign=top>'+
STRSUBSTNO("Name of Contact") + '</td></tr>' +
'<tr><td valign=top>E-mail Adres:</td><td valign=top>'+ "E-mail Contactperson" +
'<tr><td valign=top>Telefoonnr.:</td><td valign=top>'+"Telefoonnr. Contactpersoon"
+'</td></tr></table>' + '<BR>'+'<BR>'+'<BR>'+'<BR>'+
'Met Vriendelijke groet' + '<BR>'+ 'Jan Schellekens' +
'<br><br>' +
'<IMG src="http://www.agp.nl/images/AGPLogo_mail.gif" height=133 width=201 border=0>';
CuSMTP.CreateMessage(EmployeeName,SupportEmailAdress,"E-mail Contactperson",MailSubject,MailBody,TRUE);
CuSMTP.AddBCC(SupportEmailAdress);
CuSMTP.AppendBody(ExtraInfo);
CuSMTP.Send;
RESET;
ProblemDescription:='';
DELETE;
END;
}
{ 1000000036;CommandButton;27390;16610;2200;550;
CaptionML=[ENU=Change Status;
NLD=Wijzig Status];
OnPush=VAR
CuJira@1000000000 : Codeunit 50001;
BEGIN
CuJira.ChangeStatus(Rec);
CurrForm.UPDATE;
END;
}
{ 1000000039;Image ;0 ;0 ;4400 ;8250 ;BackColor=8388608;
BackTransparent=No;
Bitmap=23 }
{ 1000000038;Image ;0 ;8250 ;4400 ;8250 ;BackColor=8388608;
BackTransparent=No;
Bitmap=23 }
{ 1000000042;Label ;220 ;5720 ;3960 ;660 ;HorzAlign=Right;
ForeColor=16777215;
FontSize=9;
FontBold=Yes;
LeaderDots=No;
CaptionML=NLD=Nieuwe Call }
{ 1000000045;SubForm;4510 ;7260 ;27390;9240 ;HorzGlue=Left;
Border=No;
SubFormID=Form50217;
SubFormView=SORTING(Job No.,No.)
ORDER(Ascending);
SubFormLink=Job No.=FIELD(Job No.),
No.=FIELD(Call No.) }
}
CODE
{
VAR
CallTrackingSetup@1000000000 : Record 50105;
ProblemDescription@1000000001 : Text[1024];
BEGIN
END.
}
}
greetings Jan
0