What I have is a DATE field where I enter the date the Job shipped. If that date is after the Need Date, it shows up on the WF Report as "L A T E" highlighted in RED.
However, if that date is empty, it still shows up as late. I tried to add an "IF THEN" saying if the field is empty, show NOT SHIPPED... it doesn't like the statement I used..... I tried IF DATE MISSING, IF DATE EMPTY,
I don't want to put a date in the field because being empty lets us know that it hasn't shipped yet....
Thanks in advance for your help.This message has been edited. Last edited by: Tamra,
Release: WebFOCUS 8 Windows HTML, PDF, EXCEL
January 08, 2015, 02:42 PM
Waz
Can you post the code ?
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
January 08, 2015, 03:31 PM
Pops
-*Do not delete or modify the comments below *-INTERNAL_COMMENT LINE#0$PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9Im5vIj8+DQo8IS0tMS4wLS0+DQo8Um9vdCB2ZXJzaW9uPSIxLjAiPg0KICAgIDxPYmplY3Qgb2JqZWN0SWQ9IlRhYmxlXzEiPg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iTGlua2VkU29ydHMiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciLz4NCiAgICA8L09iamVjdD4NCiAgICA8T2JqZWN0IG9iamVjdElkPSJHTE9CQUwiPg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iU2FtcGxlRGF0YSIgdHlwZT0iamF2YS5sYW5nLkJvb2xlYW4iPmZhbHNlPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbFJlY29yZExpbWl0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj41MDA8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iR2xvYmFsUnVuUmVjb3JkTGltaXQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPjA8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iZmllbGREaXNwbGF5TW9kZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+bGFiZWw8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0icHJlZml4RGlzcGxheU1vZGUiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciLz4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9IkxpbmtlZFNvcnRzIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5ub3QgaW5pdGlhbGl6ZWQ8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iRm9jZXhlY1ByZWZlcmVuY2VzIiB0eXBlPSJNYXAiPg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheUVkaXRNb2RlSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5Rm9ybWF0VGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlIb21lVGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5UXVpY2tBY2Nlc3NUb29sYmFyU2F2ZUluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+dHJ1ZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJtZXRhZGF0YV92aWV3cyIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+TWV0YURhdGFUcmVlLlZJRVdfRElNUzwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5UmVzb3VyY2VzRmllbGRUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlJbnNlcnRUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlTbGljZXJzVGFiRWRpdEluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVNlcmllc1RhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iaW5mb0Fzc2lzdE1vZGVBbGxvd2VkSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkZWZhdWx0X3ByZXZpZXdfcGFnZWxpbWl0X2xheW91dCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+MTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkZWZhdWx0X3ByZXZpZXdfcGFnZWxpbWl0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj41PC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRlZmF1bHRfY29tcG9zZV9mb3JtYXQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPlBERjwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5SW50ZXJhY3RpdmVNb2RlSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9InJ1bk9uU3RhcnR1cEluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+dHJ1ZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5RGF0YVRhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVNsaWNlcnNUYWJJbnRlcmFjdGl2ZUluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+dHJ1ZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5TGF5b3V0VGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgIDwvUHJvcGVydHk+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJjYXNjYWRlTmFtZXMiIHR5cGU9Ik1hcCIvPg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iTWFzdGVyX0ZpbGVzIiB0eXBlPSJTZXQiPg0KICAgICAgICAgICAgPEVudHJ5IHR5cGU9ImphdmEubGFuZy5TdHJpbmciPlNISVBfSUQ8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IHR5cGU9ImphdmEubGFuZy5TdHJpbmciPlZVX01PX0hEUjwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+U09fSERSPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5NT19IRFI8L0VudHJ5Pg0K *-INTERNAL_COMMENT LINE#1$ICAgICAgICA8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iRmV4U3RhdGUiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnsmYW1wO3F1b3Q7X2FyQ29tcG9uZW50cyZhbXA7cXVvdDs6W119PC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9IlNsaWNlckd1aUlzbGFuZCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZXlKaVFYVjBiMUJ5WlhacFpYY2lPbVpoYkhObExDSmlUM0IwYVc5dWMwZHliM1Z3Vm1semFXSnNaU0k2ZEhKMVpTd2lZbEpsWTB4cGJXbDBSM0p2ZFhCV2FYTnBZbXhsSWpwMGNuVmxMQ0ppVUhKbGRtbGxkME52Ym5SeWIyeFdhWE5wWW14bElqcDBjblZsTENKaVVuVnVkR2x0WlVOdmJuUnliMnhXYVhOcFlteGxJanAwY25WbGZRPT08L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iU0xJQ0VSX0lORk9STUFUSU9OIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5QRDk0Yld3Z2RtVnljMmx2YmowaU1TNHdJaUJsYm1OdlpHbHVaejBpVlZSR0xUZ2lJSE4wWVc1a1lXeHZibVU5SW01dklqOCtQQ0V0TFVOUFRWQk1SVlJGWDFOTVNVTkZVbDlIVWs5VlVDMHRQanhUVEVsRFJWSmZSMUpQVlZBK1BFZFNUMVZRSUdkeWIzVndUblZ0WW1WeVBTSXdJaUJ6YkdsalpYSkhjbTkxY0V4aFltVnNQU0pIY205MWNDQXhJaUJ6YkdsalpYSkhjbTkxY0U5eVpHVnlQU0l3SWlCemJHbGpaWEpIY205MWNGTnBlbVU5SWpBaUlITnNhV05sY2tkeWIzVndhR2xrWlQwaVptRnNjMlVpTHo0OEwxTk1TVU5GVWw5SFVrOVZVRDQ9PC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Im1ldGFkYXRhVmlld0FzIiB0eXBlPSJNYXAiPg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iTU9fSERSIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5TZWdtZW50VHJlZTwvRW50cnk+DQogICAgICAgIDwvUHJvcGVydHk+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJ1c2VyT3V0cHV0Rm9ybWF0IiB0eXBlPSJqYXZhLmxhbmcuQm9vbGVhbiI+dHJ1ZTwvUHJvcGVydHk+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJlbmFibGVQcmV2aWV3IiB0eXBlPSJqYXZhLmxhbmcuQm9vbGVhbiI+dHJ1ZTwvUHJvcGVydHk+DQogICAgPC9PYmplY3Q+DQo8L1Jvb3Q+DQo= -*Do not delete or modify the comments above ENGINE INT CACHE SET ON SET PAGE-NUM=NOLEAD SET EMPTYREPORT=ON
-*COMPONENT=Join_J001 JOIN SO_PROJ WITH MO_HDR.MO_HDR.AB_CONFIG_PRNTD_FL IN MO_HDR TO UNIQUE SO_HDR.SO_HDR.SO_ID IN SO_HDR TAG J001 AS J001 END -*COMPONENT=Join_J002 JOIN MO_HDR.MO_HDR.MO_ID IN MO_HDR TO MULTIPLE VU_MO_HDR.VU_MO_HDR.MO_ID IN VU_MO_HDR TAG J002 AS J002 END -*COMPONENT=Join_J003 JOIN J001.SO_HDR.SHIP_ID IN MO_HDR TO UNIQUE SHIP_ID.SHIP_ID.SHIP_ID IN SHIP_ID TAG J003 AS J003 END -*COMPONENT=Define_MO_HDR DEFINE FILE MO_HDR Location/A20=IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'A' THEN '2-OVERLAY' ELSE IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'D' THEN '3-DOORS' ELSE IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'S' THEN '4-SAPLUPA' ELSE IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'W' THEN '5-WORCESTER' ELSE '1-LYMAN GEN FAB' ; ONTIME/A15=IF MO_HDR.MO_HDR.PLND_REL_DT LE MO_HDR.MO_HDR.NEED_DT THEN 'ON TIME' ELSE 'L A T E' ; NO_SHIPMENTS/D3=IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'X' THEN 0 ELSE 1 ; NO_ONTIME/D3=IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS 'X' THEN 0 ELSE IF ONTIME CONTAINS 'L A T E' THEN 0 ELSE 1 ; PERCENOT/D6.2%=( NO_ONTIME/NO_SHIPMENTS ) * 100 ; MONTH/A7=EDIT ( MO_HDR.MO_HDR.ORDER_REF_ID , '9999999' ) ; DUE/MDY=HDATE ( MO_HDR.MO_HDR.DUE_DT , 'MDY' ) ; ACCT/MDY=HDATE ( MO_HDR.MO_HDR.COMPLT_DT , 'MDY' ) ; MONTH_SHIPPED/A7=EDIT ( MO_HDR.MO_HDR.ORDER_REF_ID , '9999999' ) ; FY2015/A6=IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS '2014-1' THEN 'FY2015' ELSE IF MO_HDR.MO_HDR.ORDER_REF_ID CONTAINS '2015-0' THEN 'FY2015' ELSE '???' ; SO_PROJ/A6=EDIT ( MO_HDR.MO_HDR.MO_ID , '999999' ) ; FOB/A7=IF J001.SO_HDR.SHIP_VIA_FLD CONTAINS 'PICK' THEN 'CUST PU' ELSE IF J001.SO_HDR.FOB_FLD CONTAINS 'DESTINATION' THEN 'SITE' ELSE IF J001.SO_HDR.FOB_FLD CONTAINS 'ORIGIN' THEN 'LYMAN' ELSE '?????' ; END -DEFAULTH &WF_SUMMARY='Summary'; -DEFAULTH &WF_TITLE='WebFOCUS Report'; TABLE FILE MO_HDR SUM MO_HDR.MO_HDR.MO_NOTES/A40 MO_HDR.MO_HDR.DUE_DT/HMDY FOB AS 'FOB LOCATION' J003.SHIP_ID.MAIL_STATE_DC AS 'STATE' MO_HDR.MO_HDR.NEED_DT/HMDY MO_HDR.MO_HDR.PLND_REL_DT/HMDY AS 'Shipped On' ONTIME/A7 COMPUTE PER_CENT_OT/D7.2%=( NO_ONTIME/NO_SHIPMENTS ) * 100 ; AS '% OT' NOPRINT SO_PROJ NOPRINT BY MO_HDR.MO_HDR.NEED_DT NOPRINT BY MO_HDR.MO_HDR.MO_ID AS 'M O #' UNDER-LINE WHERE MO_HDR.MO_HDR.MO_ID LIKE 'B%'; WHERE MONTH_SHIPPED EQ &MONTH_SHIPPED.(OR(<2014-10>,<2014-11>,<2014-12>,<2015-01>,<2015-02>,<2015-03>,<2015-04>,<2015-05>,<2015-06>,<2015-07>,<2015-08>,<2015-09>)).MONTH_SHIPPED:.; HEADING "ONTIME_LATE FOR ON TABLE PCHOLD FORMAT &WFFMT.(,,).Select an output type. ON TABLE RECOMPUTE ON TABLE SET CACHELINES 100 ON TABLE SET PAGE-NUM NOLEAD ON TABLE SET SQUEEZE ON ON TABLE SET HTMLCSS ON ON TABLE SET HTMLENCODE ON ON TABLE SET EMPTYREPORT ON ON TABLE SET BYDISPLAY ON ON TABLE SET EXPANDABLE ON ON TABLE SET EXPANDBYROW ON ON TABLE SET DROPBLNKLINE ON ON TABLE SET STYLE * INCLUDE=IBFS:/FILE/IBI_HTML_DIR/javaassist/intl/EN/ENIADefault_combine.sty,$ DEFMACRO=Condition_1, MACTYPE=RULE, SIZE=9, COLOR=RGB(255 255 0), STYLE=BOLD, BACKCOLOR=RGB(255 0 0), WHEN=N9 EQ 'L A T E', $ DEFMACRO=Condition_2, MACTYPE=RULE, COLOR=RGB(255 255 0), BACKCOLOR=RGB(255 0 0), WHEN=N9 EQ 'L A T E', $ TYPE=REPORT, FONT='Trebuchet MS', SIZE=11, COLOR=RGB(66 70 73), STYLE=NORMAL, TITLETEXT=&WF_TITLE.QUOTEDSTRING, SUMMARY=&WF_SUMMARY.QUOTEDSTRING, LEFTMARGIN=0.5, TOPMARGIN=0.5, RIGHTMARGIN=0.5, BOTTOMMARGIN=0.5, ORIENTATION=LANDSCAPE, HFREEZE=OFF, BACKCOLOR=(RGB(255 255 255) NONE), $ TYPE=HEADING, LINE=1, JUSTIFY=CENTER, $ TYPE=HEADING, LINE=1, ITEM=1, OBJECT=TEXT, SIZE=12, STYLE=BOLD, $ TYPE=HEADING, LINE=1, ITEM=1, OBJECT=FIELD, SIZE=12, STYLE=BOLD, $ TYPE=TITLE, FONT='Trebuchet MS', SIZE=11, COLOR=RGB(66 70 73), STYLE=NORMAL, BACKCOLOR=RGB(255 255 255), $ TYPE=TITLE, COLUMN=N7, JUSTIFY=CENTER, $ TYPE=TITLE, COLUMN=N8, JUSTIFY=CENTER, $ TYPE=TITLE, COLUMN=N6, JUSTIFY=CENTER, $ TYPE=TITLE, COLUMN=N5, JUSTIFY=CENTER, $ TYPE=TITLE, COLUMN=N4, JUSTIFY=CENTER, $ TYPE=TITLE, COLUMN=N9, JUSTIFY=CENTER, $ TYPE=DATA, FONT='Trebuchet MS', SIZE=11, COLOR=RGB(66 70 73), STYLE=NORMAL, BACKCOLOR=(RGB(255 255 255) NONE), $ TYPE=DATA, COLUMN=N9, MACRO=Condition_1, $ TYPE=DATA, COLUMN=N2, FOCEXEC=IBFS:/WFC/Repository/manufact/~kjohnson/customreports/z-work_in_progress_testing_etc/drill_to_actualvsestimate.fex(MO_ID=MO_HDR.MO_HDR.MO_ID), $ TYPE=DATA, COLUMN=N7, JUSTIFY=CENTER, $ TYPE=DATA, COLUMN=N8, JUSTIFY=CENTER, $ TYPE=DATA, COLUMN=N6, JUSTIFY=CENTER, $ TYPE=DATA, COLUMN=N5, JUSTIFY=CENTER, $ TYPE=DATA, COLUMN=N4, JUSTIFY=CENTER, $ TYPE=DATA, COLUMN=N9, JUSTIFY=CENTER, $ ENDSTYLE END
-RUN
Release: WebFOCUS 8 Windows HTML, PDF, EXCEL
January 08, 2015, 03:51 PM
Waz
What is the format of the date field ?
So using the below code does not work ?
ONTIME/A15=IF MO_HDR.MO_HDR.PLND_REL_DT IS MISSING
THEN 'NOT SHIPPED'
ELSE
IF MO_HDR.MO_HDR.PLND_REL_DT LE MO_HDR.MO_HDR.NEED_DT
THEN 'ON TIME'
ELSE 'L A T E' ;
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
January 08, 2015, 04:04 PM
Pops
It worked...
I was using MISSING and not IS MISSING
It was a PICNIC error...
Problem In Chair Not In Computer
Thanks!
Release: WebFOCUS 8 Windows HTML, PDF, EXCEL
January 08, 2015, 04:23 PM
Waz
Ha ha, we all have a PICNIC sometimes.
Some call it a senior moment.
I would suggest that you get copies of the online PDF documentation, so you can to check up on things like missing.