Transformation of Forms(of NAV 2009) into Pages

freddy.dk wrote:

Menu buttons become actions in the Role Tailored Client - you won't see a button on the form.
Reg. the metadata does not exist - I trust you did all the things you read in this post?
(Export, Transform, Import, Compile) and you can see the page in the page definition in the page designer?

Ammad wrote:

Guys, I have resolved that issue. Actually it also belongs so much to new upgraded classic client license. I did the same in new license and all the pages are generated but one important thing which you have to keep in mind, that is you have to tell the correct form of your Forms means either thay are Card Type or List Type while you are going to export them.

Regards,
Ammad

Ammad wrote:

Sure..

Ok, What you have to do is simply

1. First you have to get new license of Classic Client from Microsoft.
2. Then update that license from your current one and after that you have to find "Transformation Forms" which will be present on Object ID "177000", there.
3. Just repeat same steps as I told in my first Post.
4. One thing which you have to keep in mind i.e. you have to tell right page type to your Form which you want to transform otherwise it can again give that "MetaData Error".

Regards,
Ammad Ghani

Belias wrote:

you said you compiled the object, but try to design the page and save it (with compile)...it worked for me...a plain compilation without saving is useless

anyway...i translated a simple unbound form that I use to run pages from nav (as run does not work for pages) and i noticed that the action related to the command button of the form, has as a caption, the name of the command button instead of the caption... :?

also, i receive these errors:
queryreplace() method is obsolete
and after commenting it
shell() method is obsolete

i suppose that they can't be used in rtc...

here's the object

OBJECT Form 50000 Bat Launcher
{
  OBJECT-PROPERTIES
  {
    Date=22/12/08;
    Time=16.41.02;
    Modified=Yes;
    Version List=UTILITY;
  }
  PROPERTIES
  {
    Width=7150;
    Height=3740;
    SaveValues=Yes;
    OnOpenForm=BEGIN
                 TXTCommand := 'cmd /c start dynamicsnav:////runpage?page=';
                 TXTFilePath := 'C:\Documents and Settings\mirko.mainetti\My Documents\Notes\Bats\Pagerunner.bat';
                 TBOBject.FILTERGROUP(10);
                 TBOBject.SETRANGE(Type,TBOBject.Type::Page);
                 TBOBject.FILTERGROUP(0);
               END;

  }
  CONTROLS
  {
    { 1101339000;TextBox;3520 ;1320 ;3520 ;440  ;CaptionML=[ENU=Page Number;
                                                            ITA=Nr. Pagina];
                                                 SourceExpr=TXTPageNo;
                                                 OnValidate=BEGIN
                                                              IF TXTPageNo <> '' THEN BEGIN
                                                                IF NOT EVALUATE(INTPageNo,TXTPageNo) THEN BEGIN
                                                                  TBOBject.SETFILTER(Caption,'@' + TXTPageNo + '*');
                                                                  IF TBOBject.FINDFIRST THEN BEGIN
                                                                    TXTPageNo := FORMAT(TBOBject.ID);
                                                                    TXTPageName := TBOBject.Name;
                                                                    TBOBject.CALCFIELDS(Caption);
                                                                    TXTPageCaption := TBOBject.Caption;
                                                                  END ELSE BEGIN
                                                                    TBOBject.SETRANGE(Caption);
                                                                    TBOBject.SETFILTER(Name,'@' + TXTPageNo + '*');
                                                                    TBOBject.FINDFIRST;
                                                                    TXTPageNo := FORMAT(TBOBject.ID);
                                                                    TXTPageName := TBOBject.Name;
                                                                    TBOBject.CALCFIELDS(Caption);
                                                                    TXTPageCaption := TBOBject.Caption;
                                                                  END;
                                                                END ELSE BEGIN
                                                                  TBOBject.GET(TBOBject.Type::Page,'',INTPageNo);
                                                                  TXTPageNo := FORMAT(TBOBject.ID);
                                                                  TXTPageName := TBOBject.Name;
                                                                  TBOBject.CALCFIELDS(Caption);
                                                                  TXTPageCaption := TBOBject.Caption;
                                                                END;
                                                              END ELSE BEGIN
                                                                TXTPageName := '';
                                                                TXTPageCaption := '';
                                                              END;
                                                              TBOBject.SETRANGE(Caption);
                                                              TBOBject.SETRANGE(Name);
                                                            END;

                                                 OnLookup=BEGIN
                                                            FRMObject.SETTABLEVIEW(TBOBject);
                                                            FRMObject.LOOKUPMODE(TRUE);
                                                            IF FRMObject.RUNMODAL = ACTION::LookupOK THEN BEGIN
                                                              FRMObject.GETRECORD(TBOBject);
                                                              TXTPageNo := FORMAT(TBOBject.ID);
                                                              TXTPageName := TBOBject.Name;
                                                              TXTPageCaption := TBOBject.Caption;
                                                            END;
                                                            CLEAR(FRMObject);
                                                          END;
                                                           }
    { 1101339001;Label  ;110  ;1320 ;3300 ;440  ;ParentControl=1101339000 }
    { 1101339002;TextBox;3520 ;220  ;3520 ;440  ;CaptionML=[ENU=File Name;
                                                            ITA=Nome File];
                                                 SourceExpr=TXTFilePath }
    { 1101339003;Label  ;110  ;220  ;3300 ;440  ;ParentControl=1101339002 }
    { 1101339004;TextBox;3520 ;770  ;3520 ;440  ;CaptionML=[ENU=Command Name;
                                                            ITA=Nome Comando];
                                                 SourceExpr=TXTCommand }
    { 1101339005;Label  ;110  ;770  ;3300 ;440  ;ParentControl=1101339004 }
    { 1101339006;CommandButton;4840;3080;2200;550;
                                                 Name=CMDRun;
                                                 HorzGlue=Right;
                                                 VertGlue=Bottom;
                                                 Default=Yes;
                                                 CaptionML=ITA=&Run;
                                                 OnPush=BEGIN
                                                          IF TXTPageNo <> '' THEN BEGIN
                                                            FLFile.WRITEMODE(TRUE);
                                                            FLFile.TEXTMODE(TRUE);
                                                            FLFile.QUERYREPLACE(FALSE);
                                                            FLFile.CREATE(TXTFilePath);
                                                            FLFile.WRITE(TXTCommand + TXTPageNo);
                                                            FLFile.CLOSE;
                                                            SHELL(TXTFilePath);
                                                          END;
                                                        END;
                                                         }
    { 1101339007;TextBox;3520 ;2420 ;3520 ;440  ;Editable=No;
                                                 CaptionML=[ENU=Page Caption;
                                                            ITA=Caption Pagina];
                                                 SourceExpr=TXTPageCaption }
    { 1101339008;Label  ;110  ;2420 ;3300 ;440  ;ParentControl=1101339007 }
    { 1101339009;TextBox;3520 ;1870 ;3520 ;440  ;Editable=No;
                                                 CaptionML=[ENU=Page Name;
                                                            ITA=Nome Pagina];
                                                 SourceExpr=TXTPageName }
    { 1101339010;Label  ;110  ;1870 ;3300 ;440  ;ParentControl=1101339009 }
  }
  CODE
  {
    VAR
      TXTPageNo@1101339000 : Text[30];
      FLFile@1101339001 : File;
      TXTFilePath@1101339002 : Text[100];
      TXTCommand@1101339003 : Text[100];
      TXTPageName@1101339006 : Text[30];
      TXTPageCaption@1101339008 : Text[50];
      TBOBject@1101339004 : Record 2000000001;
      FRMObject@1101339005 : Form 358;
      INTPageNo@1101339007 : Integer;

    BEGIN
    END.
  }
}

aliennav wrote:

aliennav wrote:

I have created a very simple form.
trying to convert it into a page, it gets converted ,compiled it also.
But when I am tryin to run it from Dynamicsnav:////runpage?page=50000, it is giving me the error:
The object Metadata does not exist.Identification fields and values, Object Type:Page, Object ID :50000.
What should I do to run the page???
Checked the licence.
Repeated whole process.
](*,)

Done dana Done Done


I was doing everything in NATIVE DB thats why it was not running.I exported my created page, respective form and table and it is running now.

Ammad wrote:

Hi,

I want to transform Custom Forms of NAV 2009 into Pages in order to run them at a Role Tailored Client. For the sake of it, I had used Transformation Tool Kit but after going through a series of steps. I am unable to do it.

The steps for Transformation, which I follwed are,

1) Open a classic client, go to Object Designer and import the files DevTool.fob and TIF.fob from the folder TransformationTool\TIF Editor\
2) Create a new form in NAV, as simple as possible (or you can also use your existing forms). For example a Card form based on the customer table, with just a few fields on it. This is the form you want to transform.

Setup and use the Transformation tool:

3) Run, form 97000 "Transformation Forms"

4) Click Setup -> "Import PageType - FormType mapping", and select the file TransformationTool\TIF Editor\FormToPagetypeMapping.txt.

5) Click Setup again -> Get Forms. Filter on Type = Form, and ID = the new form(or existing one), then click OK. This gets the form(s) that you want to transform.

6) In the FormType field, select "Card" ("Form with TabControl only and a source table").

Run the transformation:

7) Export the settings from form 97000: Click on Functions -> Create Transformation Input "Transform Pages". You must export it to the TransformationTool folder, and it must be called TransformPages.xml.
8 ) From Object Designer, export the form (File -> Export) as xml.You must export it to the folder TransformationTool, and it must be called Forms.xml.

You now have the form you want to transform, and the meta-data that tells the TranformationTool how to transform it.

9) Run the file FormTransformation.exe from the TransformationTool folder. This generates a new file called Pages.xml. It also logs any progress or errors in the file Transformation.log.

Import the new page:

10) Back in NAV (classic client): Go to Object Designer, and import the file Pages.xml, and then compile it.


If all steps ran without any errors, you have now transformed your form into a page which can be displayed in the rolebased client.

Now, the Pages.XML is generated all the times without any errors but when I am going to run them into a Role Tailored Client, it gives error, i.e., "The Object MetaData does not exist."

Can anyone help me out to successfully run my 'Custom Forms' into Role Tailored Client or any other idea of "Transformation of Forms into Pages for Role Tailored Client" ?

Ammad