[SOLVED] Remove space from Heading between field and text
Hi,
I put a field within a heading line, but there are spaces in between the text and field. How can I remove the space? Also I change the a field format from I11 to A11, how can I remove leading zero from the A11 field
Here is my code:
DEFINE FILE NEWREPORTREQUEST
NAME/A401 = REQFIRSTNAME || (' ' |REQLASTNAME);
DATEREQ/YYMD = HDATE(DATEREQUESTED, 'YYMD');
REPORTTITLE2/A202 = '"'|REPORTTITLE||'"';
REPORTID/A11 = EDIT(REPORTREQUESTID);
END
TABLE FILE NEWREPORTREQUEST
HEADING
"Your reference # is <REPORTID for your <REPORTTITLE2 request. "
PRINT
REPORTREQUESTID NOPRINT
BY HIGHEST 1 REPORTREQUESTID NOPRINT
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
TYPE=REPORT, GRID=OFF, SQUEEZE=ON, FONT='ARIAL', SIZE=9, $
TYPE=HEADING, HEADALIGN=INTERNAL, $
TYPE=HEADING, ITEM=1, $
TYPE=HEADING, LINE=1, COLSPAN=2, $
TYPE=HEADING, LINE=5, ITEM=2, COLOR=BLUE, $
TYPE=HEADING, LINE=5, ITEM=4, COLOR=BLUE, $
TYPE=TITLE, STYLE=BOLD, $
TYPE=GRANDTOTAL, STYLE=BOLD, $
ENDSTYLE
END
-RUN
Here is my result;
Your reference # is 0000001618 for your "test space 16" request.
ThanksThis message has been edited. Last edited by: Kerry,
May
WebFOCUS 7.6.8 Servlet - MRE/BID/Self Service/ReportCaster - MS Windows Server 2003 - MS SQL Server 2005 - DataMigrator 7.6.9
September 15, 2010, 09:10 AM
Tom Flynn
May,
EDIT your 1st post, the folder at the bottom right, and place your code between the RED > tags, upper right on the toolbar...
APP PREPENDPATH IBISAMP
-RUN
DEFINE FILE SHORT
REPORTID1/I11 = 1618;
REPORTID2/A11 = PTOA(REPORTID1,'(P11)','A11');
REPORTTITLE2/A200 = '"test space 16"';
END
TABLE FILE SHORT
HEADING CENTER
"Your reference # is <REPORTID2 for your <REPORTTITLE2 request. "
" "
PRINT
PROJECTED_RETURN
REPORTID1
REPORTID2
BY CONTINENT
BY REGION
BY COUNTRY
BY HOLDER
BY TYPE
ON TABLE SET PAGE-NUM OFF
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
STYLE=NORMAL,
$
ENDSTYLE
END
-EXIT