Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] App Studio Write-Back Application

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[CLOSED] App Studio Write-Back Application
 Login/Join
 
DMoses
Member
posted
Hello,

I am having a bit of an issue when trying to use a maintain application built in app studio to write to one of our tables.

Here are the errors I am receiving. Any insight on this would be a really big help. Thanks.

(FOC03847) MntEX Compile failed for Request1
(FOC03601) ERROR AT OR NEAR LINE 3 IN Request1
(FOC03604) YYMDy is not a valid format.

Here is my request code:

MAINTAIN FILE mdm_sls_rep_dim_na

 

$$Declarations

 

Case Top

Infer SLS_REP_DIM_ID into Inputstk

Infer SLS_REP_DIM_ID into Allstk

For all next SLS_REP_DIM_ID into Maxstk

Compute MaxSLS_REP_DIM_ID/i9L = MaxStk(Maxstk.foccount).SLS_REP_DIM_ID;

Winform Show Form1; 

EndCase

 

Case AddToList

Compute MaxSLS_REP_DIM_ID = MaxSLS_REP_DIM_ID + 10;

Copy from Inputstk into allstk(allstk.foccount+1);

Compute allstk(allstk.foccount).SLS_REP_DIM_ID = MaxSLS_REP_DIM_ID;

endcase

 

Case IncludeRecs

for all include SLS_REP_DIM_ID from Allstk

Stack clear Allstk

endcase


Here is the master file for the table to be written to

FILENAME=MDM_SLS_REP_DIM_NA, SUFFIX=SQLORA  , $
  SEGMENT=MDM_SLS_REP_DIM_NA, SEGTYPE=S0, $
    FIELDNAME=SLS_REP_DIM_ID, ALIAS=SLS_REP_DIM_ID, USAGE=I11, ACTUAL=I4, $
    FIELDNAME=FOCLIST, ALIAS=FOCLIST, USAGE=I11, ACTUAL=I4, $
    FIELDNAME=SLS_REP_CDE, ALIAS=SLS_REP_CDE, USAGE=A13V, ACTUAL=A6V,
      MISSING=ON, $
    FIELDNAME=SLS_REP_EMPL_ID, ALIAS=SLS_REP_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_REP_NAM, ALIAS=SLS_REP_NAM, USAGE=A100V, ACTUAL=A30V,
      MISSING=ON, $
    FIELDNAME=SLS_REP_HIRE_DTE, ALIAS=SLS_REP_HIRE_DTE, USAGE=HYYMDS, ACTUAL=HYYMDS,
      MISSING=ON, $
    FIELDNAME=SLS_REP_CHNL_CDE, ALIAS=SLS_REP_CHNL_CDE, USAGE=A6V, ACTUAL=A7V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER5_MGR_DIM_ID, ALIAS=SLS_TIER5_MGR_DIM_ID, USAGE=I11, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=SLS_TIER5_MGR_EMPL_ID, ALIAS=SLS_TIER5_MGR_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER5_MGR_NAM, ALIAS=SLS_TIER5_MGR_NAM, USAGE=A100V, ACTUAL=A27V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER4_MGR_DIM_ID, ALIAS=SLS_TIER4_MGR_DIM_ID, USAGE=I11, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=SLS_TIER4_MGR_EMPL_ID, ALIAS=SLS_TIER4_MGR_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER4_MGR_NAM, ALIAS=SLS_TIER4_MGR_NAM, USAGE=A100V, ACTUAL=A21V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER3_MGR_DIM_ID, ALIAS=SLS_TIER3_MGR_DIM_ID, USAGE=I11, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=SLS_TIER3_MGR_EMPL_ID, ALIAS=SLS_TIER3_MGR_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER3_MGR_NAM, ALIAS=SLS_TIER3_MGR_NAM, USAGE=A100V, ACTUAL=A21V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER2_MGR_DIM_ID, ALIAS=SLS_TIER2_MGR_DIM_ID, USAGE=I11, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=SLS_TIER2_MGR_EMPL_ID, ALIAS=SLS_TIER2_MGR_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER2_MGR_NAM, ALIAS=SLS_TIER2_MGR_NAM, USAGE=A100V, ACTUAL=A26V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER1_MGR_DIM_ID, ALIAS=SLS_TIER1_MGR_DIM_ID, USAGE=I11, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=SLS_TIER1_MGR_EMPL_ID, ALIAS=SLS_TIER1_MGR_EMPL_ID, USAGE=A25V, ACTUAL=A22V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER1_MGR_NAM, ALIAS=SLS_TIER1_MGR_NAM, USAGE=A100V, ACTUAL=A30V,
      MISSING=ON, $
    FIELDNAME=CURR_ROW_IND, ALIAS=CURR_ROW_IND, USAGE=A1V, ACTUAL=A1V,
      MISSING=ON, $
    FIELDNAME=ROW_EFF_DTE, ALIAS=ROW_EFF_DTE, USAGE=HYYMDS, ACTUAL=HYYMDS,
      MISSING=ON, $
    FIELDNAME=ROW_EXP_DTE, ALIAS=ROW_EXP_DTE, USAGE=HYYMDS, ACTUAL=HYYMDS,
      MISSING=ON, $
    FIELDNAME=ETL_UPDATE_CYCLE_ID, ALIAS=ETL_UPDATE_CYCLE_ID, USAGE=D20.2, ACTUAL=I4,
      MISSING=ON, $
    FIELDNAME=ETL_INSERT_CYCLE_ID, ALIAS=ETL_INSERT_CYCLE_ID, USAGE=D20.2, ACTUAL=D8,
      MISSING=ON, $
    FIELDNAME=ETL_INSERT_DTE, ALIAS=ETL_INSERT_DTE, USAGE=HYYMDS, ACTUAL=HYYMDS,
      MISSING=ON, $
    FIELDNAME=ETL_UPDATE_DTE, ALIAS=ETL_UPDATE_DTE, USAGE=HYYMDS, ACTUAL=HYYMDS,
      MISSING=ON, $
    FIELDNAME=SLS_REP_PAYEE_ID, ALIAS=SLS_REP_PAYEE_ID, USAGE=A400V, ACTUAL=A12V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER5_PAYEE_ID, ALIAS=SLS_TIER5_PAYEE_ID, USAGE=A400V, ACTUAL=A10V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER4_PAYEE_ID, ALIAS=SLS_TIER4_PAYEE_ID, USAGE=A400V, ACTUAL=A9V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER3_PAYEE_ID, ALIAS=SLS_TIER3_PAYEE_ID, USAGE=A400V, ACTUAL=A9V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER2_PAYEE_ID, ALIAS=SLS_TIER2_PAYEE_ID, USAGE=A400V, ACTUAL=A9V,
      MISSING=ON, $
    FIELDNAME=SLS_TIER1_PAYEE_ID, ALIAS=SLS_TIER1_PAYEE_ID, USAGE=A400V, ACTUAL=A14V,
      MISSING=ON, $
    DEFINE SLS_REP_HIRE_DTE_YEAR/I4 MISSING ON ALL=DTPART(SLS_REP_HIRE_DTE, YEAR);
      TITLE='SLS_REP_HIRE_DTE,Year', $
    DEFINE SLS_REP_HIRE_DTE_QUARTER/I1 MISSING ON ALL=DTPART(SLS_REP_HIRE_DTE, QUARTER);
      TITLE='SLS_REP_HIRE_DTE,Quarter', $
    DEFINE SLS_REP_HIRE_DTE_MONTH/I2 MISSING ON ALL=DTPART(SLS_REP_HIRE_DTE, MONTH);
      TITLE='SLS_REP_HIRE_DTE,Month', $
    DEFINE SLS_REP_HIRE_DTE_DAY/I2 MISSING ON ALL=DTPART(SLS_REP_HIRE_DTE, DAY);
      TITLE='SLS_REP_HIRE_DTE,Day', $
    DEFINE SLS_REP_HIRE_DTE_YEAR_Y/YYMDy MISSING ON ALL=DTRUNC(SLS_REP_HIRE_DTE, YEAR);
      TITLE='SLS_REP_HIRE_DTE,Y', $
    DEFINE SLS_REP_HIRE_DTE_YEAR_Q/YYMDq MISSING ON ALL=DTRUNC(SLS_REP_HIRE_DTE, QUARTER);
      TITLE='SLS_REP_HIRE_DTE,Y-Q', $
    DEFINE SLS_REP_HIRE_DTE_YEAR_M/YYMDm MISSING ON ALL=DTRUNC(SLS_REP_HIRE_DTE, MONTH);
      TITLE='SLS_REP_HIRE_DTE,Y-M', $
    DEFINE SLS_REP_HIRE_DTE_YEAR_D/YYMD MISSING ON ALL=DTRUNC(SLS_REP_HIRE_DTE, DAY);
      TITLE='SLS_REP_HIRE_DTE,Y-M-D', $
    DEFINE ROW_EFF_DTE_YEAR/I4=DTPART(ROW_EFF_DTE, YEAR);
      TITLE='ROW_EFF_DTE,Year', $
    DEFINE ROW_EFF_DTE_QUARTER/I1=DTPART(ROW_EFF_DTE, QUARTER);
      TITLE='ROW_EFF_DTE,Quarter', $
    DEFINE ROW_EFF_DTE_MONTH/I2=DTPART(ROW_EFF_DTE, MONTH);
      TITLE='ROW_EFF_DTE,Month', $
    DEFINE ROW_EFF_DTE_DAY/I2=DTPART(ROW_EFF_DTE, DAY);
      TITLE='ROW_EFF_DTE,Day', $
    DEFINE ROW_EFF_DTE_YEAR_Y/YYMDy=DTRUNC(ROW_EFF_DTE, YEAR);
      TITLE='ROW_EFF_DTE,Y', $
    DEFINE ROW_EFF_DTE_YEAR_Q/YYMDq=DTRUNC(ROW_EFF_DTE, QUARTER);
      TITLE='ROW_EFF_DTE,Y-Q', $
    DEFINE ROW_EFF_DTE_YEAR_M/YYMDm=DTRUNC(ROW_EFF_DTE, MONTH);
      TITLE='ROW_EFF_DTE,Y-M', $
    DEFINE ROW_EFF_DTE_YEAR_D/YYMD=DTRUNC(ROW_EFF_DTE, DAY);
      TITLE='ROW_EFF_DTE,Y-M-D', $
    DEFINE ROW_EXP_DTE_YEAR/I4=DTPART(ROW_EXP_DTE, YEAR);
      TITLE='ROW_EXP_DTE,Year', $
    DEFINE ROW_EXP_DTE_QUARTER/I1=DTPART(ROW_EXP_DTE, QUARTER);
      TITLE='ROW_EXP_DTE,Quarter', $
    DEFINE ROW_EXP_DTE_MONTH/I2=DTPART(ROW_EXP_DTE, MONTH);
      TITLE='ROW_EXP_DTE,Month', $
    DEFINE ROW_EXP_DTE_DAY/I2=DTPART(ROW_EXP_DTE, DAY);
      TITLE='ROW_EXP_DTE,Day', $
    DEFINE ROW_EXP_DTE_YEAR_Y/YYMDy=DTRUNC(ROW_EXP_DTE, YEAR);
      TITLE='ROW_EXP_DTE,Y', $
    DEFINE ROW_EXP_DTE_YEAR_Q/YYMDq=DTRUNC(ROW_EXP_DTE, QUARTER);
      TITLE='ROW_EXP_DTE,Y-Q', $
    DEFINE ROW_EXP_DTE_YEAR_M/YYMDm=DTRUNC(ROW_EXP_DTE, MONTH);
      TITLE='ROW_EXP_DTE,Y-M', $
    DEFINE ROW_EXP_DTE_YEAR_D/YYMD=DTRUNC(ROW_EXP_DTE, DAY);
      TITLE='ROW_EXP_DTE,Y-M-D', $
    DEFINE ETL_INSERT_DTE_YEAR/I4=DTPART(ETL_INSERT_DTE, YEAR);
      TITLE='ETL_INSERT_DTE,Year', $
    DEFINE ETL_INSERT_DTE_QUARTER/I1=DTPART(ETL_INSERT_DTE, QUARTER);
      TITLE='ETL_INSERT_DTE,Quarter', $
    DEFINE ETL_INSERT_DTE_MONTH/I2=DTPART(ETL_INSERT_DTE, MONTH);
      TITLE='ETL_INSERT_DTE,Month', $
    DEFINE ETL_INSERT_DTE_DAY/I2=DTPART(ETL_INSERT_DTE, DAY);
      TITLE='ETL_INSERT_DTE,Day', $
    DEFINE ETL_INSERT_DTE_YEAR_Y/YYMDy=DTRUNC(ETL_INSERT_DTE, YEAR);
      TITLE='ETL_INSERT_DTE,Y', $
    DEFINE ETL_INSERT_DTE_YEAR_Q/YYMDq=DTRUNC(ETL_INSERT_DTE, QUARTER);
      TITLE='ETL_INSERT_DTE,Y-Q', $
    DEFINE ETL_INSERT_DTE_YEAR_M/YYMDm=DTRUNC(ETL_INSERT_DTE, MONTH);
      TITLE='ETL_INSERT_DTE,Y-M', $
    DEFINE ETL_INSERT_DTE_YEAR_D/YYMD=DTRUNC(ETL_INSERT_DTE, DAY);
      TITLE='ETL_INSERT_DTE,Y-M-D', $
    DEFINE ETL_UPDATE_DTE_YEAR/I4=DTPART(ETL_UPDATE_DTE, YEAR);
      TITLE='ETL_UPDATE_DTE,Year', $
    DEFINE ETL_UPDATE_DTE_QUARTER/I1=DTPART(ETL_UPDATE_DTE, QUARTER);
      TITLE='ETL_UPDATE_DTE,Quarter', $
    DEFINE ETL_UPDATE_DTE_MONTH/I2=DTPART(ETL_UPDATE_DTE, MONTH);
      TITLE='ETL_UPDATE_DTE,Month', $
    DEFINE ETL_UPDATE_DTE_DAY/I2=DTPART(ETL_UPDATE_DTE, DAY);
      TITLE='ETL_UPDATE_DTE,Day', $
    DEFINE ETL_UPDATE_DTE_YEAR_Y/YYMDy=DTRUNC(ETL_UPDATE_DTE, YEAR);
      TITLE='ETL_UPDATE_DTE,Y', $
    DEFINE ETL_UPDATE_DTE_YEAR_Q/YYMDq=DTRUNC(ETL_UPDATE_DTE, QUARTER);
      TITLE='ETL_UPDATE_DTE,Y-Q', $
    DEFINE ETL_UPDATE_DTE_YEAR_M/YYMDm=DTRUNC(ETL_UPDATE_DTE, MONTH);
      TITLE='ETL_UPDATE_DTE,Y-M', $
    DEFINE ETL_UPDATE_DTE_YEAR_D/YYMD=DTRUNC(ETL_UPDATE_DTE, DAY);
      TITLE='ETL_UPDATE_DTE,Y-M-D', $


Here is the HTML Code just drop this in a text editor:

 < !DOCTYPE html>

    
    < !-- Copyright 1996-2013 Information Builders, Inc. All rights reserved. -->
    
<script type="text/javascript">
//confidential_id=IBI_OptionsScript
var bRuntime=true;var szHtmlAlias="./ibi_html/";var is_mobile="false";var loadingscreen="";var ib_composer="ib_composer";var emf="ib_composer_emf";var ibiOptions = new Array(ib_composer);document.write('<script src="'+szHtmlAlias+'ibigbl.js" type="text/javascript"><\/script>');<script type="text/javascript">
//confidential_id=IBI_ibigblloadCss
if(typeof ibigblloadCss != 'function'){alert("JavaScript alias '"+szHtmlAlias+"'  is not valid.");window.location("about:blank");}HtmlPage<script type="text/javascript">
//confidential_id=clientEventHandlersJS

if(typeof(bRuntime) != 'undefined') {
// TODO: Add your inline runtime code here
}
//Begin function window_onload
function window_onload() {
 
UpdateData();
 
// TODO: Add your event handler code here
//add onInitialUpdate() function to make changes before initial run of the reports
}
//End function window_onload
< !--//confidential_id=focus_xmlelement

		
< ![CDATA[]]>< ![CDATA[]]>

					< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>< ![CDATA[]]>
						
< ![CDATA[]]>< ![CDATA[]]>FP Mod Chuck, 


WebFOCUS 8203

Windows, All Outputs
 
Posts: 7 | Registered: April 19, 2018Report This Post
MartinY
Virtuoso
posted Hide Post
I may be totally wrong, but I would try with a master file that don't have all the DEFINEd fields.
Meaning a copy of MDM_SLS_REP_DIM_NA with a different name and without the DEFINEs.
Any way MAINTAIN will not insert value for these fields they are virtual ones.


WF versions : Prod 8.2.04M gen 33, Dev 8.2.04M gen 33, OS : Windows, DB : MSSQL, Outputs : HTML, Excel, PDF
In Focus since 2007
 
Posts: 2409 | Location: Montreal Area, Qc, CA | Registered: September 25, 2013Report This Post
Maintain Wizard
Master
posted Hide Post
As we discussed, Maintain cannot use YYMDy fields. If you can change them to YYMD you won't get an error.

Mark
 
Posts: 663 | Location: New York | Registered: May 08, 2003Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] App Studio Write-Back Application

Copyright © 1996-2020 Information Builders