Focal Point
[CLOSED] App Studio Write-Back Application

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/4377092096

June 01, 2018, 01:17 PM
DMoses
[CLOSED] App Studio Write-Back Application
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
June 01, 2018, 02:12 PM
MartinY
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
June 04, 2018, 11:47 AM
Maintain Wizard
As we discussed, Maintain cannot use YYMDy fields. If you can change them to YYMD you won't get an error.

Mark