krishnamraju

  The below SQL will give all the records of a component along with its corresponding occurs levels:   SELECT   DISTINCT   D . recname       TableName ,                    D . occurslevel   ScrollName   FROM     pspnlgrpdefn   A ,           pspnlgroup   B ,           pspnldefn   C ,           pspnlfield   D ,           psrecdefn   E   WHERE    A . pnlgrpname   =   B . pnlgrpname           AND   A . market   =   B . market           AND   B . pnlname   =   C . pnlname         ...

  SQL query to find key fields in a record : SELECT KEYPOSN, FIELDNAME,ASCDESC FROM PSKEYDEFN WHERE RECNAME = 'POSITION_DATA' AND INDEXID = '_' ORDER BY 1; Alternate SQL query to find key fields in a record: SELECT FIELDNAME FROM PSRECFIELD WHERE RECNAME = 'POSITION_DATA' AND BITAND(USEEDIT,1)=1;     SQL Query to find search keys in a record: SELECT FIELDNAME FROM PSRECFIELD WHERE RECNAME = 'POSITION_DATA' AND BITAND(USEEDIT,2048)=2048; SQL Query to list alternate search keys in a record: SELECT FIELDNAME FROM PSRECFIELD WHERE RECNAME = 'POSITION_DATA' AND BITAND(USEEDIT,16)=16; SQL Query to list both the search and alternate search keys of a record: SELECT FIELDNAME FROM PSRECFIELD WHERE RECNAME = 'POSITION_DATA' AND (BITAND(USEEDIT,16)=16 or BITAND(USEEDIT,2048)=2048); SQL Query to get Search Key Fields of a Component Interface: SELECT A.FIELDNAME FROM PSRECFIELD A WHERE A.RECNAME IN ((SELECT B....

  SQL query to get all the child records for a parent record: select rename  from psrecdefn CONNECT BY PRIOR RECNAME=PARENTRECNAME START WITH PARENTRECNAME = :1 -- Parent Record name This SQL will help in analyzing  whenever we have to delete data in a record and to retrieve all the child definitions of a record. However, this will work only for records which have a parent record specified in record properties.

 XML Publisher Important Tags: <?for-each:current-group()?> <?end for-each-group?> ----------------------------------------------------------------------------------------------------------------------------- <?for-each:DISTRICTPART2?> <?end for-each?> ----------------------------------------------------------------------------------------------------------------------------- <?for-each-group@section:HEADER;./EMPLID?> <?end for-each-group?> <?for-each:COUNT[CRSE_ATTR_VALUE = '5' and RESIDENT = 'Y']?> <?end for-each?> ----------------------------------------------------------------------------------------------------------------------------- Substring  <?xdofx:substr(DESCR,1,4)?> <?xdofx:substr(STRM,2,2)?> <?xdofx:if substr(STRM,4,1) ='1' then 'Spring' end if?> <?xdofx:if substr(STRM,4,1) ='5' then 'Summer' end if?> <?xdofx:if substr(STRM,4,1) ='8' then ...

Local string &InOutAttachUserfile, &file_name, &temp_dir, &InOutAttachSysfilename; Local integer &InMaxSize, &Result, &Return_Code; Local string &uniquefilename, &ATTACHSYSFILENAME, &ATTACHUSERFILE, &strFolderpath;     Local string &URL_ID = "record://HRS_ATTACHMENTS"; &Return_Code = AddAttachment(&URL_ID, &ATTACHSYSFILENAME, "", &ATTACHUSERFILE, &InMaxSize, True);     /*Create unique file name*/ &uniquefilename = "QBU_UPLOAD" | "_" | String(Month(%Date)) | "_" | String(Day(%Date)) | "_" | String(Year(%Date)) | "_" | String(Hour(%Time)) | "_" | String(Minute(%Time)) | "_" | String(Second(%Time)) | ".csv";   &ATTACHSYSFILENAME = Left(&uniquefilename, 64); &ATTACHSYSFILENAME = &uniquefilename;   COP_QBU_RCNTL.ATTACHSYSFILENAME.Value = &ATTACHSYSFILENAME; COP_QBU_RCNTL.ATTACHUSERFILE.Value = &ATT...

<xsl:value-of select='format-number(SSR_TOT_EN_GRDPTS, "0.000")'/>

REM ***********************************************Modification Summary******; REM SL.No Developer     Mod. No.   Date      Changes REM ----- -----------    ---------- ---------- ------------------------------------------- REM************************************************************************; &str_WhereClause = ""; &str_NoAddnlClause = "N"; /* Clause for acad org */ If (LAC_CSG_RPT_AET.ACAD_ORG.Value <> " ") Then    &str_WhereClause = " A.ACAD_ORG = '" | LAC_CSG_RPT_AET.ACAD_ORG.Value | "' ";    &str_NoAddnlClause = "Y"; End-If; /* Clause for Subject */ If All(LAC_CSG_RPT_AET.SUBJECT.Value) Then    If &str_NoAddnlClause = "Y" Then       &str_WhereClause = &str_WhereClause | " AND A.SUBJECT = '" | LAC_CSG_RPT_AET.SUBJECT.Value | "' ";    Else       &str_WhereClause = "  A.SUBJECT = '...