Datalength

I am having trouble with iFS accepting instances with attributes of arbitrary length. In the example instances below, I would like the COVER attribute to contain data of any length. In this case, I have tried to achieve this be omitting the Datalength tag from the attribute in the type definition. In the valid instance below, the <COVER> tag holds the maximum number of characters allowable. In the invalid instance, the <COVER> tag is over the allowable character length, so the following error displays:
ifs-30002: Unable to create new libraryObject.
Maximum allowable characters within attribute:
My question is this: How do I indicate in the doc type definition that I do not want length constraints put on an attribute string?
My Doc Type Definition:
<?xml version="1.0" standalone="yes" ?>
<ClassObject>
<name>PropTypeLite1</name>
<Description>Simple Demo of Prop Pilot 1</Description>
<Superclass RefType="name">
Document
</Superclass>
<Attributes>
<Attribute>
<Name>Title</Name>
<DataType>String</DataType>
<Datalength>128</Datalength>
</Attribute>
<Attribute>
<Name>Client</Name>
<DataType>String</DataType>
<Datalength>128</Datalength>
</Attribute>
<Attribute>
<Name>Cover</Name>
<DataType>String</DataType>
</Attribute>
</Attributes>
</ClassObject>
My Valid Instance of PropTypeLite1:
<?xml version = '1.0' standalone = 'yes'?>
<PROPTYPELITE1>
<Name>BrookTrout.xml</Name>
<TITLE>Modest Proposal</TITLE>
<CLIENT>Moby Dick</CLIENT>
<COVER>The main disadvantage of WBT is xxxxxxxxx. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. We generally work to design each page of WBT to download within
a few seconds over a 28.8 modem. Generally speaking, a 28.8 connection is not
fast enough to support video, advanced graphics, or much interactivity. We can use
the most advanced streaming technology to try to fend off these concerns, but still
have far more restrictions on a course that runs over a live connection.
The main disadvantage of WBT is bandwidth. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. The main disadvantage of WBT is bandwidth. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. The main disadvantage of WBT is bandwidth.
The main disadvantage of WBT is bandwidth. The main disadvantage.
The main disa</COVER>
</PROPTYPELITE1>
My Invalid Instance of PropTypeLite1 (note extending datalength of COVER attribute makes this instance invalid):
<?xml version = '1.0' standalone = 'yes'?>
<PROPTYPELITE1>
<Name>BrookTrout.xml</Name>
<TITLE>Modest Proposal</TITLE>
<CLIENT>Moby Dick</CLIENT>
<COVER>The main disadvantage of WBT is xxxxxxxxx. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. We generally work to design each page of WBT to download within
a few seconds over a 28.8 modem. Generally speaking, a 28.8 connection is not
fast enough to support video, advanced graphics, or much interactivity. We can use
the most advanced streaming technology to try to fend off these concerns, but still
have far more restrictions on a course that runs over a live connection.
The main disadvantage of WBT is bandwidth. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. The main disadvantage of WBT is bandwidth. WBT generally should
not include video, heavy audio, or large graphics that would take too long
to download. The main disadvantage of WBT is bandwidth.
The main disadvantage of WBT is bandwidth. The main disadvantage.
The main disa xxxxxxx xxxxxxx xxxxxxx xxxxxxx xxxxxxx xxxxxxx xxxxxxx xxxxxxx</COVER>
</PROPTYPELITE1>

Thanks, Mark. As you may already know, ArborText has released an authoring tool called Epic that works in tandem with iFS. Epic is geared for creating large, usually technical, documents. It would seem that the limit to the max String length would pose a serious problem for such a system, especially if large, flat-structured paragraphs are involved.
As you have noted, only one Content tag may be used per instance, so this is not a viable option for large documents. Do you have any thoughts as to how Arbortext has, apparently, gotten around this max length limit? Or more to the point, how can I?
--Thanks                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           

Similar Messages

  • Getting error while tring to Check in any document in Sharepoint 2007. Error - "Unable to validate data. System.Web.Configuration.MachineKey.GetDecodedData(Byte[] buf, Byte[] modifier, Int32 start, Int32 length, Int32& dataLength) ...

    Hi Team,
    I am getting error while tring to Check in any document in Sharepoint 2007. Error - "Unable to validate data. System.Web.Configuration.MachineKey.GetDecodedData(Byte[] buf, Byte[] modifier, Int32 start, Int32 length, Int32& dataLength).
    Anybody please let me know how to resolve the issue. It has affected our 9 site collection with almost 2000+ sites. Please email me your your suggestion or you can share your ideas here also.
    Tried to reset the IIS, checked the Internet connection speed (8MBps). Cleared the cache and all but no luck.
    Thanks,
    Pronob

    Hello,
    I have found this support window for you:
    http://support.microsoft.com/kb/556031
    http://technet.microsoft.com/en-in/library/cc298582%28v=office.12%29.aspx
    This may help you
    Hemendra:Yesterday is just a memory,Tomorrow we may never see
    Please remember to mark the replies as answers if they help and unmark them if they provide no help

  • How to get Datalength in MaxDB

    Hi Guys:
    How I can run this query (SQL Transact from MS-SQL) but in MaxDB?!
    select datalength(FIELDINFO),datalength(LOGICINFO),
    datalength(EXTENSIONS)
    from DYNPSOURCE
    where PROGNAME = 'SAPMF05A' and DYNPNUMBER = '0110'
    Seems the function DATALENGTH doesn't exist in MaxDB, similar is LENGTH but the field is LONG data type and doesn’t support this function.
    Thanks!
    Regards,
    Federico

    Hi,
    which MaxDB version are you using? Is the DB Unicode or not?
    Our LENGTH function should perform similarly (in MaxDB version >= 7.6), but one would get the length in number of characters when using it on a Unicode-char field.
    Regards,
    Roland

  • Log is filled with AFP_VFS afpfs_vnop_getxattr:  bad dataLength offset 2 replySize 2

    Hi all,
    I'm connecting to a LaCie big NAS, wired, via AFP. Lately networktransfer is veeeeery slow and I see my log is filled with:
    AFP_VFS afpfs_vnop_getxattr:  bad dataLength offset 2 replySize 2 (as soon as i browse the NAS disk or start a transfer a series of these error messages are added).
    I've seen some reports of this error, apparently it has something to do with OS X Maverick and netatalk version. But I can't find a solution...
    I tried to switch to SMB but that throwes lot of error -36 (unexpected end of file) when saving files (for example AI) directly to the disk.
    Any suggestions? Would be much appreciated .
    Viktor

    Resetting the NetworkSpace 2 back to it's shipping configuration and freshly updating to 2.2.8.5 didn't help, so don't bother going to the (considerable) trouble if Lacie tech support suggests it will fix the problem. 
    Their current advice is to abandon AFP and connect to the NS2 as an SMB volume or via FTP.   Not very useful if you purchased the device intending to use it (as advertised) for Time Machine backups.

  • Channel 0 deselection and JCSystem.makeTransientByteArray memory issues

    Hi,
    I am writing an applet that should among other things generate HMAC-SHA1 value. However, JCDK 3.02 Classic edition RI does not support Signature.ALG_HMAC_SHA1. That is why I had to make my own HMAC-SHA1 based on MessageDigest.getInstance(MessageDigest.ALG_SHA,false)The problem is that when I transfer data to my HMAC-SHA1 function I create byte [] workbuffer = JCSystem.makeTransientByteArray((short)(blockLength + datalength), JCSystem.CLEAR_ON_DESELECT); inside of my HMAC-SHA1 function. I cannot do memory allocation in constructor since I don't know the data length in advance. This function works fine only the first time, on the second run the apllet runs out of memory.
    From my MIDlet I call myConnection.close() to close the connection and deselect the applet before passing new data to applet for HMAC generation. But according to Security and Trust Services APIs for Java 2 Platform "the application selected on channel 0 is not deselected at the time the connection is closed but remains selected until a new connection is established on channel 0". So, the next time I open connection to my applet and pass data to HMAC-SHA1 I get throw_error(SYSTEMEXCEPT_NO_TRANSIENT_SPACE) from cref in the console window.
    Is there anything I can do with this memory problem? How can I eventually deselect the applet to free the memory?
    //Aleksandr

    Argh! Poor card :-)
    NEVER allocate memory outside of the constructor or initialization methods (called once then disabled)! Forget JavaCard 3, use 2.2 and remember you have 2KB RAM in all cards of these world. The 2MB-RAM/16MB-Flash cards simulated in the javacard SDK for netbeans exists only in the imagination of this spec creators.
    Allocate a fixed size buffer and process data in blocks. The update() method is here for this purpose.
    This is not java desktop, memory is more than scarce!
    transient memory allocated with the TRANSIENT_DESELECT flag is allocated for every logical channels to allow implementing multi selectable applets with independent contexts.
    transient memory allocated with the TRANSIENT_RESET flag is allocated once for every channels.

  • Logical error in creating tables using db link in solaris

    Hi,
    While creating table using the syntax create table newtab...as select * from tab@dblink .. I am facing a problem. The newtab table created is having a structure different (from datalength point of view of varchar2 and char datatypes) from the source. The data length is getting tripled i.e. if a column a is varchar2(20) in tab then it is becoming --- a varchar2(60) in newtab. This is happening in solaris environment when the two databases are in 2 different servers. Please let me know if there are any patches to resolve the problem.
    Thanks
    Arnab

    ORA-02019: connection description for remote database not foundHave you used this database link successfully for some other queries?
    The error posted seems to indicate that the DB Link is not functional at all. Has it worked for any other type of DML operation or is this the first time you ever tried to use the link?

  • Error when displaying xellerate form

    Hello,
    I have the following error when displaying the form of any xellerate users :
    ERROR,03 May 2011 10:40:56,273,[XELLERATE.APIS],Class/Method: tcFormDefinitionOperationsBean/getFormFieldPropertyValue encounter some problems: Property 'Column Names' has not defined for the form field '-19'
    All is working fine, just this error that is diplayed each time I want to display a user form. In my formMetadata.xml, I have the following definition for the field -19, it is the manager :
    <Attribute name="-19" label="global.label.managerid" displayComponentType="LookupField" variantType="long" dataLength="50" map="Users.Manager Login">
    <ValidValues lookupColumnNames="User ID,Last Name,First Name" lookupQuery="SELECT usr.usr_key,usr.usr_last_name,usr.usr_first_name,usr.usr_login FROM usr, ugp, usg WHERE ugp.ugp_name = 'PROF_MANAGER' AND ugp.ugp_key = usg.ugp_key AND usr.usr_key = usg.usr_key AND usr.usr_status = 'Active' AND usr.usr_emp_type = 'Employee'" displayColumns="Users.User ID,Users.Last Name,Users.First Name" selectionColumn="Users.User ID"/>
    </Attribute>
    What is the problem with my attribute definition ?
    Thanks for your help,
    Kind regards,
    mdadikn

    Hello,
    I'm new to OIM. I am a new hire to a group that had a contractor setup the whole system. I'm finding a similar issue on our system here. I've looked through the database and cannot seem to find the issue. Error happens when from the webapp clicking on "Create IT Resource".
    From the Error Log:
    Class/Method: tcFormDefinitionOperationsBean/getFormFieldPropertyValue encounter some problems: Property 'Column Names' has not defined for the form field '-82'
    Line with issue from FormMetaData.xml:
         <Attribute name="-82" label="global.label.itresourcetype" displayComponentType="LookupField" variantType="String" dataLength="255" map="IT Resources Type Definition.Server Type" useInRule="true">
              <ValidValues lookupQuery="select svd_svr_type from svd" selectionColumn="svd_svr_type"/>
    </Attribute>
    Please let me know any additional information/questions. From what I can tell everything should be correct. Sorry again if the answer is obvious, I'm only 3 days into OIM.
    Thank you,
    Ryan

  • Unable to Enforce Unique Values, Duplicate Values Exist

    I have list in SP 2010, it contains roughly 1000 items.  I would like to enforce unique values on the title field.  I started by cleaning up the list, ensuring that all items already had a unique value.  To help with this, I used the export
    to excel action, then highlight duplicates within Excel.  So as far as I can tell, there are no duplicates within that list column.
    However, when I try to enable the option to Enforce Unique Values, I receive the error that duplicate values exist within the field and must be removed.
    Steps I've taken so far to identify / resolve duplicate values:
    - Multiple exports to Excel from an unfiltered list view, then using highlight duplicates feature > no duplicates found
    - deleted ALL versions of every item from the list (except current), ensured they were completely removed by deleting from both site and site collection recycle bins
    - Using the SP Powershell console, grabbed all list items and exported all of the "Title" type fields (Item object Title, LinkTitle, LinkTitleNoMenu, etc) to a csv and ran that through excel duplicate checking as well. 
    Unless there's some rediculous hidden field value that MS expects anyone capable of attempting to enforce unique values on a list (which is simple enough for anyone to figure out - if it doesn't throw an error), then I've exhausted anything I can think
    of that might cause the list to report duplicate values for that field.
    While I wait to see if someone else has an idea, I'm also going to see what happens if I wipe the Crawl Index and start it from scratch.
    - Jon

    First, I create index for a column in list settings, it works fine no matter duplicate value exists or not;
    then I set enforce unique values in the field, after click OK, I get duplicate values error message.
    With SQL Server profiler, I find the call to proc_CheckIfExistingFieldHasDuplicateValues and the parameters. After reviewing this stored procedure in content database,
    I create the following script in SQL Server management studio:
    declare @siteid
    uniqueidentifier
    declare @webid
    uniqueidentifier
    declare @listid
    uniqueidentifier
    declare @fieldid
    uniqueidentifier
    set @siteid='F7C40DC9-E5D3-42D7-BE60-09B94FD67BEF'
    set @webid='17F02240-CE04-4487-B961-0482B30DDA84'
    set @listid='B349AF8D-7238-419D-B6C4-D88194A57EA7'
    set @fieldid='195A78AC-FC52-4212-A72B-D03144DC1E24'
    SELECT
    * FROM TVF_UserData_List(@ListId)
    AS U1 INNER
    MERGE JOIN
                NameValuePair_Latin1_General_CI_AS
    AS NVP1 WITH (INDEX=NameValuePair_Latin1_General_CI_AS_MatchUserData)
    ON NVP1.ListId
    = @ListId AND NVP1.ItemId
    = U1.tp_Id
    AND ((NVP1.Level
    = 1 AND U1.tp_DraftOwnerId
    IS NULL)
    OR NVP1.Level
    = 2)
    AND NOT((DATALENGTH(ISNULL(NVP1.Value,
    = 0)) AND U1.tp_Level
    = NVP1.Level
    AND U1.tp_IsCurrentVersion
    = CONVERT(bit, 1)
    AND U1.tp_CalculatedVersion
    = 0 AND U1.tp_RowOrdinal
    = 0 INNER
    MERGE JOIN
                NameValuePair_Latin1_General_CI_AS
    AS NVP2 WITH (INDEX=NameValuePair_Latin1_General_CI_AS_CI)
    ON NVP2.SiteId
    = @SiteId AND NVP2.ListId
    = @ListId AND NVP2.FieldId
    = @FieldId AND NVP2.Value
    = NVP1.Value
    AND NVP2.ItemId <> NVP1.ItemId
    CROSS APPLY TVF_UserData_ListItemLevelRow(NVP2.ListId, NVP2.ItemId,
    NVP2.Level, 0)
    AS U2 WHERE ((NVP2.Level
    = 1 AND U2.tp_DraftOwnerId
    IS NULL)
    OR NVP2.Level
    = 2)
    AND NOT((DATALENGTH(ISNULL(NVP2.Value,
    = 0))      
    I can find the duplicate list items based on the result returned by the query above.
    Note that you need to change the parameter values accordingly, and change the name of NameValuePair_Latin1_General1_CI_AS table based on the last parameter of the
    proc_CheckIfExistingFieldHasDuplicateValues stored procedure. You can review the code of this stored procedure by yourself.
    Note that direct operation on the content database in production environment is not supported, please do all these in test environment.

  • Convert byte array to table of int

    [http://www.codeproject.com/KB/database/PassingArraysIntoSPs.aspx?display=Print|http://www.codeproject.com/KB/database/PassingArraysIntoSPs.aspx?display=Print] Hello friends.
    I'm pretty new with PL/SQL.
    I have code that run well on MSSQL and I want to convert it to PL/SQL with no luck.
    The code converts byte array to table of int.
    The byte array is actually array of int that was converted to bytes in C# for sending it as parameter.
    The TSQL code is:
    CREATE FUNCTION dbo.GetTableVarchar(@Data image)
    RETURNS @DataTable TABLE (RowID int primary key IDENTITY ,
    Value Varchar(8000))
    AS
    BEGIN
    --First Test the data is of type Varchar.
    IF(dbo.ValidateExpectedType(103, @Data)<>1) RETURN
    --Loop thru the list inserting each
    -- item into the variable table.
    DECLARE @Ptr int, @Length int,
    @VarcharLength smallint, @Value Varchar(8000)
    SELECT @Length = DataLength(@Data), @Ptr = 2
    WHILE(@Ptr<@Length)
    BEGIN
    --The first 2 bytes of each item is the length of the
    --varchar, a negative number designates a null value.
    SET @VarcharLength = SUBSTRING(@Data, @ptr, 2)
    SET @Ptr = @Ptr + 2
    IF(@VarcharLength<0)
    SET @Value = NULL
    ELSE
    BEGIN
    SET @Value = SUBSTRING(@Data, @ptr, @VarcharLength)
    SET @Ptr = @Ptr + @VarcharLength
    END
    INSERT INTO @DataTable (Value) VALUES(@Value)
    END
    RETURN
    END
    It's taken from http://www.codeproject.com/KB/database/PassingArraysIntoSPs.aspx?display=Print.
    The C# code is:
    public byte[] Convert2Bytes(int[] list)
    if (list == null || list.Length == 0)
    return new byte[0];
    byte[] data = new byte[list.Length * 4];
    int k = 0;
    for (int i = 0; i < list.Length; i++)
    byte[] intBytes = BitConverter.GetBytes(list);
    for (int j = intBytes.Length - 1; j >= 0; j--)
    data[k++] = intBytes[j];
    return data;
    I tryied to convert the TSQL code to PL/SQL and thats what I've got:
    FUNCTION GetTableInt(p_Data blob)
    RETURN t_array --t_array is table of int
    AS
    l_Ptr number;
    l_Length number;
    l_ID number;
    l_data t_array;
    BEGIN
         l_Length := dbms_lob.getlength(p_Data);
    l_Ptr := 1;
         WHILE(l_Ptr<=l_Length)
         loop
              l_ID := to_number( DBMS_LOB.SUBSTR (p_Data, 4, l_ptr));
              IF(l_ID<-2147483646)THEN
                   IF(l_ID=-2147483648)THEN
                        l_ID := NULL;
                   ELSE
                        l_Ptr := l_Ptr + 4;
                        l_ID := to_number( DBMS_LOB.SUBSTR(p_Data, 4,l_ptr));
                   END IF;
                   END IF;
    l_data(l_data.count) := l_ID;
              l_Ptr := l_Ptr + 4;
         END loop;
         RETURN l_data;
    END GetTableInt;
    This isn't work.
    This is the error:
    Error report:
    ORA-06502: PL/SQL: numeric or value error: character to number conversion error
    06502. 00000 - "PL/SQL: numeric or value error%s"
    I think the problem is in this line:
    l_ID := to_number( DBMS_LOB.SUBSTR (p_Data, 4, l_ptr));
    but I don't know how to fix that.
    Thanks,
    MTs.

    I'd found the solution.
    I need to write:
    l_ID := utl_raw.cast_to_binary_integer( DBMS_LOB.SUBSTR(p_Data, 4,l_ptr));
    instead of:
    l_ID := to_number( DBMS_LOB.SUBSTR (p_Data, 4, l_ptr));
    The performance isn't good, it's take 2.8 sec to convert 5000 int, but it's works.

  • How to set password never expires for a user?

    Hello,
    I can't seem to find in the Administrative Console a place to enable "Password never expires".
    I know that if I edit the USR_PWD_NEVER_EXPIRES field in the OIM DB and put the value '1' it will work.
    However, I'd like to know how and if it is possible to activate this option on a user via OIM.
    Thanks in advance,
    Tomic

    Hi,
    Now I got it.Try this one.
    In FormMetaData.xml you will find.
    <Attribute name="-13" variantType="String" dataLength="1" map="Users.Password Never Expires" />
    Modify it to.
    <Attribute name="-13" variantType="String" dataLength="1" displayComponentType="CheckBox" map="Users.Password Never Expires" />
    Add this in.
    <Form name="3">
    <AttributeReference editable="true" optional="true">-13</AttributeReference>
    I never need this but I hope above will work.
    About disabling the resource I have few suggestion for you.
    1.You can have your password policy consistent across the resources you are integrating in OIM.
    2.Write an entity adapter so that when ever password is expired then can disable all provisioned user.
    3.Alternatively you can also write a schedule task which will check for password expire date and disable the resource.
    4.You will also need to enable the resources when password is changed.You can catch change password event through event handler or entity adapter.
    Please let me know if you have fllow up questions.
    Regards
    Nitesh

  • How do i convert the following case statement to a table and still implement it in the store procedure.

    if @CustNo = '0142'          begin              insert #custnos (CustNo, ClientNo)              values ('0142', '1100')                      ,('0142', '1200')                      ,('0142', '1201')                      ,('0142', '1700')                      ,('0142', '1602')                      ,('0142', '1202')                      ,('0142', '1603')                      ,('0142', '2002')          endstore procUSE ODSSupport
    GO
    SET QUOTED_IDENTIFIER ON
    GO
    SET ANSI_NULLS ON
    GO
    if exists (select * from dbo.sysobjects where id = object_id(N'dbo.pr_Load_PASOArgusClaims_Work') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
    BEGIN
    drop procedure dbo.pr_Load_PASOArgusClaims_Work
    IF OBJECT_ID ('dbo.pr_Load_PASOArgusClaims_Work') IS NOT NULL
    PRINT '<<< FAILED DROPPING PROCEDURE dbo.pr_Load_PASOArgusClaims_Work >>>'
    ELSE
    PRINT '<<< DROP PROCEDURE dbo.pr_Load_PASOArgusClaims_Work >>>'
    END
    GO
    CREATE PROC dbo.pr_Load_PASOArgusClaims_Work
    @BatchNo varchar(7) = null,
    @CustNo char(4) = null,
    @NewBatchNo varchar(7) = null
    AS
    /* Object dbo.pr_Load_PASOArgusClaims_Work 2006234 */
    -- SSR# : 2242
    -- Date : 12/23/2005
    -- Author : Roxy Newbill
    -- Description : Add new PASO BCAT 1602
    -- SSR# 1932 - 2/22/2006 SEN - Add logic to include only ArgusCustNo - 0142
    -- and change PharmacyClaim.ProcessDate to DateWritten
    -- SSR# : 2419
    -- Date : 08/22/2006
    -- Author : Betty Doran
    -- Description : PASO reports project
    -- Correct mapping of Dispense fee amt from 'AmtProfFee' to 'DispenseFee' -
    -- Mapping changed by Argus - did not inform PHP. Used in calcs for mClaimTotAmtCharge and
    -- mClaimAmtAllowed fields.
    -- SSR# : 2496
    -- Date : 06/27/2007
    -- Author : Roxy Newbil
    -- Description : PASO Reporting Project
    -- Add data load for new columns: Prescription No, Drug Name, NDC
    -- SSR# : PEBB PROJECT
    -- Date : 10/13/2009
    -- Author : Tj Meyer
    -- Description : Add BCAT 1201 for new PEBB business--
    -- SSR# : 132707
    -- Date : 12/17/2009
    -- Author : Terry Phillips
    -- Description : PASO Reporting Project
    -- Fix data length issues for Argus_SubGroupId,Argus_PlanCode,vchParticipantId,
    -- vchProviderId
    -- SSR# : 3253
    -- Date : 03/28/2011
    -- Author : Susan Naanes
    -- Description : PrescriptionNo increased in size from 7 to 12 characters
    -- SSR# : SPOCK project
    -- Date : 08/09/2012
    -- Author : Raymond Beckett
    -- Description : Modifed to bring in RxKey from PharmacyClaim instead of using identity value for iRecId
    -- Also, modified to load any new batches since last batch loaded into PASOArgusClaims
    -- if @BatchNo not supplied
    -- Various 'fixes'
    -- - removed grouping from initial query due to unique grouping caused by BatchNo, ClaimNumber, ClaimType
    -- SSR# : TFS 5264 - Premera Remediation -(3997)
    -- Date : 12/21/2012
    -- Author : Satish Pandey
    -- Description : Add BCATs 1202 and 1603 to the Where clause selecting pharmclm.ArgusClientNo as BCAT
    -- SSR# : TFS 10286
    -- Date : 1/15/2014
    -- Author : Raymond Beckett
    -- Description : Add HRI Customer Number and BCAT's. Also add Customer Number and alternate batchno to parameters
    -- Only use '@NewBatchNo' if adding data from missed custno and the batchno already exists in PASOArgusClaims
    -- ITSM Ticket : 1800925
    -- Date : 4/15/2014
    -- Author : Roxy Newbill
    -- Description : Silverton Hospital had new BCAT (2002) with start of 2014 business. This was never accomodated for
    -- Adding this BCAT in so that we can start capturing these claims (Note, special insert being done to capture
    -- all BCAT 2002 claims prior to this fix.)
    -- ITSM Ticket : TFS 14587 -Intel BCAT Remediation
    -- Date : 08/14/2014
    -- Author : Andrew Omofonma
    -- Description : Added BCAT's (1604,& 2103) for Intel
    SET NOCOUNT ON
    DECLARE @iCount int
    create table #tmpArgusWork (
    iRecId int,
    BatchNo varchar (7) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    BatchDateTime datetime NULL ,
    BatchStatus varchar (20) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    ReadyDateTime datetime NULL ,
    Argus_GroupId varchar (10) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    Argus_SubGroupId varchar (4) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    Argus_ClassId varchar (4) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    Argus_PlanCode varchar (8) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    Argus_BusinessCategory varchar (8) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    FacetsClaimSubType varchar (4) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    PASOClaimType varchar (20) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    vchClaimNumber varchar (14) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    dtPaidDate datetime NULL ,
    dtProcessDate datetime NULL ,
    dtServiceDate datetime NULL ,
    vchParticipantId varchar (14) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
    vchProviderId varchar (12) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    vchProviderName varchar (55) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    mClaimTotAmtCharge money NULL ,
    mClaimAmtDiscount money NULL ,
    mClaimAmtAllowed money NULL ,
    mClaimAmtDenied money NULL ,
    mClaimAmtDeduct money NULL ,
    mClaimAmtCoinsurance money NULL ,
    mClaimAmtCopay money NULL ,
    mClaimAmtPaid money NULL ,
    PASO_GroupId varchar (10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    PASO_SubGroupId varchar (4) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    PASO_ClassID varchar (4) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    PASO_PlanCode varchar (8) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    PASO_BusinessCategory varchar (8) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    RecordStatus varchar (20) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
    ErrorDesc varchar (128) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
    PrescriptionNo char(12) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
    DrugName varchar(30)COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
    NDC char(11) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
    create table #batches (
    BatchNo char(7) not null
    primary key (BatchNo))
    create table #custnos (
    CustNo char(4),
    ClientNo char(5), -- bcats associated with the customer
    primary key (CustNo, ClientNo)
    DECLARE
    @len_Argus_SubGroupId smallint,
    @len_Argus_PlanCode smallint,
    @len_vchParticipantId smallint,
    @len_vchProviderId smallint
    --Get field lengths for the following fields
    SELECT @len_Argus_SubGroupId = 4, --datalength([@tmpArgusWork].[Argus_SubGroupId]),
    @len_Argus_PlanCode = 8, --datalength(@tmpArgusWork.Argus_PlanCode),
    @len_vchParticipantId = 14, --datalength(@tmpArgusWork.vchParticipantId),
    @len_vchProviderId = 12 --datalength(@tmpArgusWork.vchProviderId)
    declare @maxbatch char(7)
    IF @BatchNo IS NULL
    begin
    -- assume normal run. Add ClientNo's and custno's to tables
    insert #custnos (CustNo, ClientNo)
    values ('0142', '1100')
    ,('0142', '1200')
    ,('0142', '1201')
    ,('0142', '1700')
    ,('0142', '1602')
    ,('0142', '1202')
    ,('0142', '1603')
    ,('0142', '2002')
    ,('0142', '1604')
    ,('0142', '2103')
    ,('0669', '*')
    -- get batches loaded since last batch loaded into PASOArgusClaims
    SELECT @maxbatch=Max(BatchNo)
    FROM ODSSupport.dbo.PASOArgusClaims
    declare @dt datetime
    declare @ds datetime
    select @dt = MIN(DateTimeStamp)
    from ODS.dbo.PharmacyClaim_Common
    where BatchNo <= @maxbatch
    and DateTimeStamp > DATEADD(dd,-16,getdate())
    insert #batches (BatchNo)
    select distinct BatchNo
    from ODS.dbo.PharmacyClaim_Common pcc
    inner join #custnos ct
    on ct.CustNo = pcc.ArgusCustNo
    and (
    ct.ClientNo = '*'
    or
    ct.ClientNo = pcc.ArgusClientNo
    where DateTimeStamp > @dt
    ; -- batch may have had a claim altered since last load, drop any batches already loaded into PASOArgusClaims
    with pba as (
    select distinct BatchNo
    from ODSSupport.dbo.PASOArgusClaims
    delete ba
    from #batches ba
    inner join pba
    on pba.BatchNo = ba.BatchNo
    end
    else if @NewBatchNo is not null and @CustNo is not null
    begin
    --make sure we haven't already done this batch number/customer combination
    set @maxbatch = @NewBatchNo
    SELECT @iCount=count(*)
    FROM PASOArgusClaims
    WHERE BatchNo=@maxbatch
    and Argus_BusinessCategory = @CustNo
    IF @iCount > 0
    begin
    PRINT 'Msg: Batch ' + @maxbatch + ' already exists for CustNo ' + @CustNo + '.'
    end
    else
    begin
    if @CustNo = '0142'
    begin
    insert #custnos (CustNo, ClientNo)
    values ('0142', '1100')
    ,('0142', '1200')
    ,('0142', '1201')
    ,('0142', '1700')
    ,('0142', '1602')
    ,('0142', '1202')
    ,('0142', '1603')
    ,('0142', '2002')
    ,('0142', '1604')
    ,('0142', '2103')
    end
    if @CustNo = '0669'
    begin
    insert #custnos (CustNo, ClientNo)
    values ('0669', '*')
    end
    insert #batches (BatchNo)
    values (@BatchNo)
    end
    end
    else
    begin
    --make sure we haven't already done this batch number
    set @maxbatch = @BatchNo
    SELECT @iCount=count(*)
    FROM PASOArgusClaims
    WHERE BatchNo=@maxbatch
    IF @iCount > 0
    begin
    PRINT 'Msg: Batch ' + @maxbatch + ' already loaded.'
    end
    else
    begin
    insert #batches (BatchNo)
    values (@maxbatch)
    end
    end
    ** Insert Pharmacy Claims to temporary table
    INSERT INTO #tmpArgusWork
    SELECT
    pharmClm.RxKey,
    isnull(@NewBatchNo, pharmClm.BatchNo),
    pharmclm.OrigDateTimeStamp as BatchDateTime,
    'PENDING' as BatchStatus,
    NULL as ReadyDateTime,
    substring(pharmClm.GrpNumber,1,8)as Argus_GroupID,
    left(pharmClm.ArgusSubgroup1,@len_Argus_SubGroupId) as Argus_SubgroupID,
    substring(pharmClm.GrpNumber,9,4) as Argus_ClassId,
    substring(pharmClm.GrpNumber,13,@len_Argus_PlanCode) as Argus_PlanCode,
    pharmClm.ArgusClientNo as Argus_BusinessCategory,
    '' as vchFacetsClaimSubtype,
    PASOClaimType = CASE WHEN pharmClm.ClaimType='A'
    THEN 'PHARMACY-ADJUST'
    ELSE 'PHARMACY'
    END,
    pharmClm.ClaimNo,
    pharmClm.DateCutoff as dtPaidDate,
    pharmClm.DateWritten as dtProcessDate,
    NULL as dtServiceDate,
    left(pharmClm.MemberId,@len_vchParticipantId) as vchParticipantId,
    left(pharmClm.PharmacyNo,@len_vchProviderId) as vchProviderId,
    vchProviderName = CASE WHEN pharmclm.PayMemberInd = 'Y'
    THEN 'Member Reimbursement'
    ELSE pharm.PharmName
    END,
    mClaimTotAmtCharge = CASE WHEN pharmclm.PayMemberInd = 'Y' -- When this is a member reimbursement use the amt paid
    THEN isnull(pharmClm.IngredientCostPaid,0) + isnull(pharmClm.DispenseFee,0) + isnull(APSFee,0) -- as amt charged.
    ELSE isnull(pharmClm.AmtBilled,0)
    END,
    case when pharmclm.PayMemberInd = 'Y'
    then isnull(pharmClm.AmtRejected,0) * -1
    else isnull(pharmClm.AmtBilled,0) - isnull(pharmClm.IngredientCostPaid,0) - isnull(pharmClm.DispenseFee,0) - isnull(APSFee,0) -isnull(pharmClm.AmtRejected,0)
    end as mClaimAmtDiscount,
    isnull(pharmClm.IngredientCostPaid,0) + isnull(pharmClm.DispenseFee,0) + isnull(APSFee,0) as mClaimAmtAllowed,
    isnull(pharmClm.AmtRejected,0) as mClaimAmtDenied,
    isnull(pharmClm.MemberPaidAmt,0) - isnull(pharmClm.MemberCopayAmt,0) as mClaimAmtDeduct,
    0 as mClaimAmtCoinsurance,
    isnull(pharmClm.MemberCopayAmt,0) as mClaimAmtCopay,
    isnull(pharmClm.AmtPaid,0) + isnull(APSFee,0) as mClaimAmtPaid,
    NULL as PASO_GroupID,
    NULL as PASO_SubgroupID,
    NULL as PASO_ClassID,
    NULL as PASO_PlanCode,
    NULL as PASO_BusinessCategory,
    'OK' as RecordStatus,
    NULL as ErrorDesc,
    PrescriptionNo = pharmClm.PrescriptionNo,
    DrugName = pharmClm.DrugName,
    NDC = pharmClm.NDC
    FROM ODS..PharmacyClaim as pharmClm
    LEFT JOIN ODS..pharmacy as pharm on
    pharmClm.PharmacyNo = pharm.PharmacyNo
    INNER join #batches ba
    on ba.BatchNo = pharmClm.BatchNo
    INNER join #custnos ct
    on ct.CustNo = pharmClm.ArgusCustNo
    and (
    ct.ClientNo = '*'
    or
    ct.ClientNo = pharmClm.ArgusClientNo
    WHERE pharmClm.ClaimType in ('P','A') -- Processed or Adjusted
    --AND pharmClm.ProcessCode <> 'MC' --code doesn't exist
    --GROUP BY
    -- pharmClm.BatchNo,
    -- substring(pharmClm.GrpNumber,1,8),
    -- substring(pharmClm.GrpNumber,9,4) ,
    -- substring(pharmClm.GrpNumber,13,@len_Argus_PlanCode),
    -- pharmClm.ArgusSubgroup1,
    -- pharmClm.ClaimNo,
    -- pharmClm.ArgusClientNo,
    -- pharmClm.DateCutoff,
    -- pharmClm.DateWritten,
    -- pharmClm.MemberId,
    -- pharmClm.PayMemberInd,
    -- pharmClm.PharmacyNo,
    -- pharm.PharmName,
    -- pharmClm.OrigDateTimeStamp,
    -- pharmClm.ClaimType,
    -- pharmClm.PrescriptionNo,
    -- pharmClm.DrugName,
    -- pharmClm.NDC
    IF @@RowCount=0
    BEGIN
    PRINT 'Msg: No records found.'
    RETURN
    END
    --Update the Discount column for these Pharmacy Claims
    --UPDATE @tmpArgusWork
    --SET mClaimAmtDiscount=mClaimTotAmtCharge-mClaimAmtAllowed-mClaimAmtDenied
    ** Get the lowest service Date for each claim and update temp table
    UPDATE #tmpArgusWork
    SET dtServiceDate = (SELECT min(pharmclm.DateSvc)
    FROM ODS..pharmacyClaim AS pharmclm
    WHERE pharmclm.ClaimNo = tcpr.vchClaimNumber
    AND pharmclm.MemberID = tcpr.vchParticipantId)
    FROM #tmpArgusWork as tcpr
    ** Copy over the eligibility fields that Argus provided
    UPDATE #tmpArgusWork
    SET PASO_GroupId = Argus_GroupID,
    PASO_SubGroupId = Argus_SubGroupId,
    PASO_ClassID=Argus_classid,
    PASO_PlanCode=Argus_PlanCode,
    PASO_BusinessCategory=Argus_BusinessCategory
    FROM #tmpArgusWork pw
    WHERE COALESCE(Argus_GroupID,'') <> ''
    OR COALESCE(Argus_SubGroupId,'') <> ''
    OR COALESCE(Argus_classid,'') <> ''
    OR COALESCE(Argus_PlanCode,'') <> ''
    OR COALESCE(Argus_BusinessCategory,'') <> ''
    ** If Argus did not provide all 5 eligibility fields, get them from faEnrollmentHistory
    ** based on the group, member, date of service
    UPDATE #tmpArgusWork
    SET PASO_GroupId = eh.GroupId,
    PASO_SubGroupId = eh.SubGroupId,
    PASO_ClassID=eh.Class,
    PASO_PlanCode=eh.PlanCode,
    PASO_BusinessCategory=eh.BusinessCategory
    FROM #tmpArgusWork pw
    INNER JOIN ODS..FAEnrollmentHistory eh
    ON eh.MemberID =pw.vchParticipantID
    AND eh.Groupid =pw.Argus_GroupID
    AND eh.eligind='Y'
    AND eh.ProcessCode<>'ID'
    AND pw.dtServiceDate BETWEEN eh.EligEffDate AND eh.EligTermDate
    WHERE COALESCE(Argus_GroupID,'') = ''
    OR COALESCE(Argus_SubGroupId,'') = ''
    OR COALESCE(Argus_classid,'') = ''
    OR COALESCE(Argus_PlanCode,'') = ''
    OR COALESCE(Argus_BusinessCategory,'') = ''
    ** If we have eligibility for all records, go ahead and set the ready date to today.
    IF NOT EXISTS ( SELECT *
    FROM #tmpArgusWork
    WHERE COALESCE(PASO_GroupID,'') = ''
    OR COALESCE(PASO_SubGroupID,'') = ''
    OR COALESCE(PASO_ClassID,'') = ''
    OR COALESCE(PASO_PlanCode,'') = ''
    OR COALESCE(PASO_BusinessCategory,'') = '')
    BEGIN
    UPDATE #tmpArgusWork
    SET ReadyDateTime=convert(varchar(10),GetDate(),101),
    BatchStatus='READY'
    END
    ELSE
    BEGIN
    PRINT 'Msg: Exceptions found.'
    UPDATE #tmpArgusWork
    SET RecordStatus='ERR',
    ErrorDesc='No valid Eligible span for this Member/Group/Subgroup at time of Service'
    WHERE COALESCE(PASO_GroupID,'') = ''
    OR COALESCE(PASO_SubGroupId,'') = ''
    OR COALESCE(PASO_ClassID,'') = ''
    OR COALESCE(PASO_PlanCode,'') = ''
    OR COALESCE(PASO_BusinessCategory,'') = ''
    END
    ** Insert the records into the final table.
    INSERT INTO PASOArgusClaims
    SELECT * FROM #tmpArgusWork
    SET NOCOUNT OFF
    END
    GO
    -- Verify that the stored procedure was created successfully.
    IF OBJECT_ID ('dbo.pr_Load_PASOArgusClaims_Work') IS NOT NULL
    PRINT '<<< CREATED PROCEDURE dbo.pr_Load_PASOArgusClaims_Work >>>'
    ELSE
    PRINT '<<< FAILED CREATING PROCEDURE dbo.pr_Load_PASOArgusClaims_Work >>>'
    GO
    GRANT EXECUTE ON dbo.pr_Load_PASOArgusClaims_Work to role_ODSLoad
    GO
    SET QUOTED_IDENTIFIER OFF
    GO
    SET ANSI_NULLS ON

    this part of the code below
    if@CustNo
    = '0142'
       begin
    insert #custnos(CustNo,
    ClientNo)
    values ('0142',
    '1100')
    ,('0142',
    '1200')
    ,('0142',
    '1201')
    ,('0142',
    '1700')
    ,('0142',
    '1602')
    ,('0142',
    '1202')
    ,('0142',
    '1603')
    ,('0142',
    '2002')
       end
    store proc
    How do I covert it to a common table where the values can be selected from when needed.

  • Vb code----Expected-end of statement----this is error coming when debugging.

    'VERSION 5.00
    'Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "Mscomm32.ocx"
    Begin VB.Form FrmMain
       BackColor = &H80000002
       StartUpPosition = 3    'Windows Default
       WindowState = 2        'Maximized
       Begin VB.Timer Timer3
          Interval = 1000
          Left = 3720
          Top = 10560
       End
       Begin VB.Timer Timer2
          Interval = 1000
          Left = 4200
          Top = 10560
       End
       Begin MSCommLib.MSComm MSComm1
          Left = 5160
          Top = 10440
          _ExtentX        =   1005
          _ExtentY        =   1005
          _Version        =   393216
          DTREnable = 0           'False
       End
       Begin VB.Timer Timer1
          Interval = 1000
          Left = 4680
          Top = 10560
       End
       Begin VB.CommandButton Command2
          Caption = "Range 28-44 mm."
          BeginProperty Font
             Name = "Trebuchet MS"
             Size = 21.75
             Charset = 0
             Weight = 700
             Underline = 0           'False
             Italic = -1             'True
             Strikethrough = 0       'False
          EndProperty
          Height = 1335
          Width = 3735
       End
       Begin VB.Frame FrameDia
          Caption = "Value of Measuring"
          BeginProperty Font
             Name = "Trebuchet MS"
             Strikethrough = 0       'False
          EndProperty
          Height = 3495
          Width = 14295
          Begin VB.Label lblDataOuter
             Alignment = 2          'Center
             BackColor = &H80000009
             Caption = "1.002"
             BeginProperty Font
                Name = "Trebuchet MS"
                Strikethrough = 0       'False
             EndProperty
             Height = 1785
             Left = 4920
             TabIndex = 8
             Top = 840
             Width = 6075
          End
          Begin VB.Label Label2
             Caption = "mm."
             BeginProperty Font
                Name = "Trebuchet MS"
                Size = 72
                Charset = 0
                Weight = 700
                Underline = 0           'False
                Italic = -1             'True
                Strikethrough = 0       'False
             EndProperty
             Height = 1785
             Left = 10920
             TabIndex = 7
             Top = 840
             Width = 3075
          End
          Begin VB.Label lblDia
             BackColor = &H80000002
             Caption = "Outer Diameter"
             BeginProperty Font
                Name = "Trebuchet MS"
                Size = 36
                Charset = 0
                Weight = 700
                Underline = 0           'False
                Italic = 0              'False
                Strikethrough = 0       'False
             EndProperty
             Height = 1815
             Left = 600
             TabIndex = 6
             Top = 840
             Width = 4095
          End
       End
       Begin VB.Frame FrameHigh
          BackColor = &H80000002
          Caption = "Value of Measuring"
          BeginProperty Font
             Name = "Trebuchet MS"
             Size = 24
             Charset = 0
             Weight = 400
             Underline = 0           'False
             Italic = 0              'False
             Strikethrough = 0       'False
          EndProperty
          Height = 3495
          Left = 480
          TabIndex = 1
          Top = 5040
          Width = 14295
          Begin VB.Label lblHigh
             BackColor = &H80000002
             Caption = "Length"
             BeginProperty Font
                Name = "Trebuchet MS"
                Size = 36
                Charset = 0
                Weight = 700
                Underline = 0           'False
                Italic = 0              'False
                Strikethrough = 0       'False
             EndProperty
             Height = 975
             Left = 720
             TabIndex = 4
             Top = 1200
             Width = 2655
          End
          Begin VB.Label lblUnit
             Alignment = 2          'Center
             AutoSize = -1           'True
             BackColor = &H80000009
             Caption = "mm."
             BeginProperty Font
                Name = "Trebuchet MS"
                Size = 72
                Charset = 0
                Weight = 700
                Underline = 0           'False
                Italic = -1             'True
                Strikethrough = 0       'False
             EndProperty
             Height = 1785
             Left = 10920
             TabIndex = 3
             Top = 840
             Width = 3075
          End
          Begin VB.Label lblDataLength
             Alignment = 2          'Center
             BackColor = &H80000009
             Caption = "30.001"
             BeginProperty Font
                Name = "Trebuchet MS"
                Size = 72
                Charset = 0
                Weight = 700
                Underline = 0           'False
                Italic = -1             'True
                Strikethrough = 0       'False
             EndProperty
             Height = 1785
             Left = 4800
             TabIndex = 2
             Top = 840
             Width = 6195
          End
       End
       Begin VB.CommandButton Command1
          Caption = "Range 16-28 mm."
          BeginProperty Font
             Name = "Trebuchet MS"
             Size = 21.75
             Charset = 0
             Weight = 700
             Underline = 0           'False
             Italic = -1             'True
             Strikethrough = 0       'False
          EndProperty
          Height = 1335
          Left = 6240
          TabIndex = 9
          Top = 9600
          Width = 3735
       End
       Begin VB.Image Img2844
          Height = 900
          Left = 11760
          Picture         =   "HighCheck_01.frx":1CCA
          Stretch = -1            'True
          Top = 8640
          Width = 900
       End
       Begin VB.Image img1628
          Height = 900
          Left = 7800
          Picture         =   "HighCheck_01.frx":210C
          Stretch = -1            'True
          Top = 8640
          Width = 900
       End
       Begin VB.Label lblDate
          Alignment = 2          'Center
          BackColor = &H80000002
          Caption = "Date"
          BeginProperty Font
             Name = "Trebuchet MS"
             Size = 26.25
             Charset = 0
             Weight = 700
             Underline = 0           'False
             Italic = -1             'True
             Strikethrough = 0       'False
          EndProperty
          Height = 615
          Left = 480
          TabIndex = 12
          Top = 9240
          Width = 3375
       End
       Begin VB.Label lblTime
          Alignment = 2          'Center
          BackColor = &H80000002
          Caption = "Time"
          BeginProperty Font
             Name = "Trebuchet MS"
             Size = 26.25
             Charset = 0
             Weight = 700
             Underline = 0           'False
             Italic = -1             'True
             Strikethrough = 0       'False
          EndProperty
          Height = 615
          Left = 120
          TabIndex = 11
          Top = 9960
          Width = 3975
       End
       Begin VB.Label lblMain
          BackColor = &H80000002
          Caption = "Dimension Measurement Machine"
          BeginProperty Font
             Name = "Comic Sans MS"
             Size = 27.75
             Charset = 0
             Weight = 400
             Underline = -1          'True
             Italic = 0              'False
             Strikethrough = 0       'False
          EndProperty
          ForeColor = &H80000007
          Height = 975
          Left = 3360
          TabIndex = 0
          Top = 0
          Width = 9135
       End
    End
    Option Explicit
    Public DataOuter As String, DataLength As String, RecData As String, Model As String
    Private Sub Form_Load()
        img1628.Visible = False
        Img2844.Visible = False
    End Sub
    Private Sub Command1_Click()
        MSComm1.Output = "@00WR0200000146*" & vbCr
        Delay
    End Sub
    Private Sub Command2_Click()
        Delay
    End Sub
    Private Sub Delay()
    Dim a As Single
    End Sub
    Private Sub Image1_Click()
    End Sub
    Private Sub Timer1_Timer()
        lblTime.Caption = Format(Now, "HH:MM:SS AmPm")
        lblDate.Caption = Format(Now, "DD/MM/YY")
    End Sub
    Private Sub Timer2_Timer()
        MSComm1.Output = "@00RD0040000654*" & vbCr
        Delay
            End If
    End Sub
    Private Sub Timer3_Timer()
     If Model = "1" Then
           img1628.Visible = True
        Else
           img1628.Visible = False
        End If
        If Model = "2" Then
           Img2844.Visible = True
        Else
           Img2844.Visible = False
        End If
    End Sub

    'VERSION 5.00
    'Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "Mscomm32.ocx"
    Begin VB.Form FrmMain
    Your code is not VB .Net.  You may be able to find some assistance with your problem from the resources listed here: 
    VB6 and older

  • Printing text in Gray color

    Hi,
    I have forms which are  printing all the grey color text in dark black, on xerox printers. When the output is of PS type, it works all well and good, but for PCL, it is printing all black.
    I have been using hppcl5c.xdc for PCL. Do I need to have a xerox XDC? If yes, where can I get it or what changes do I need to make to the HP XDC in order to make it work?
    Is there probably a specific property that needs to be changed in order to get the Gray text printed gray instead of black?
    Is there anything else that I am probably not doing right?
    Thanks.
    Here is my XDC if you need:
    <?xml version="1.0" encoding="UTF-8"?> <?xfa generator="XFA2_0" APIVersion="3.1.10056.0"?> <xdp:xdp xmlns:xdp="http://ns.adobe.com/xdp/"> <xdc name="hppcl5c" id="hppcl5c" xmlns="http://www.xfa.org/schema/xdc/1.0/">   <pdl>     <renderLib name="pcldriver"/>     <!-- ========================================== -->     <!-- OUTPUT SEQUENCES                           -->     <!-- ========================================== -->     <seq id="preDoc"><ESC/>%-12345X@PJL RDYMSG DISPLAY=""&#13;&#10;<var name="staple"/><var name="jog"/>@PJL ENTER LANGUAGE = PCL&#13;&#10;<ESC/>&l1T<ESC/>*t600R<ESC/>&u600D</seq>     <seq id="postDoc"><ESC/>%-12345X@PJL RDYMSG DISPLAY=""&#13;&#10;</seq>     <seq id="preRecord"/>     <seq id="postRecord"/>     <seq id="prePage"/>     <seq id="postPage"/>     <seq id="copy"><ESC/>&l<var name="numCopies"/>X</seq>     <seq id="paginationSimplex"><ESC/>&l0S</seq>        <seq id="paginationDuplexLongEdge"><ESC/>&l1S</seq>        <seq id="paginationDuplexShortEdge"><ESC/>&l2S</seq>        <seq id="pagination"><var name="pagination"/></seq>     <seq id="stapleOn">@PJL SET LSTAPLE = ON&#13;&#10;</seq>     <seq id="stapleOff">@PJL SET LSTAPLE = OFF&#13;&#10;</seq>     <seq id="jogNone">@PJL SET JOBOFFSET = OFF&#13;&#10;</seq>     <seq id="jogPageSet">@PJL SET JOBOFFSET = BETWEENCOPIES&#13;&#10;</seq>        <!-- ========================================== -->     <!-- Font Sequences                             -->     <!-- ========================================== -->     <!-- PCL fonts -->     <seq id="Arial_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b16602T</seq>     <seq id="Arial_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b16602T</seq>     <seq id="Arial_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b16602T</seq>     <seq id="Arial_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b16602T</seq>     <seq id="Albertus Extra Bold_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s4b4362T</seq>     <seq id="Albertus Medium_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s1b4362T</seq>     <seq id="Antique Olive_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4168T</seq>     <seq id="Antique Olive_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4168T</seq>     <seq id="Antique Olive_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b4168T</seq>     <seq id="CG Omega_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4113T</seq>     <seq id="CG Omega_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4113T</seq>     <seq id="CG Omega_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b4113T</seq>     <seq id="CG Omega_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b4113T</seq>     <seq id="CG Times_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4101T</seq>     <seq id="CG Times_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4101T</seq>     <seq id="CG Times_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b4101T</seq>     <seq id="CG Times_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b4101T</seq>     <seq id="Clarendon Condensed_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v4s3b4140T</seq>     <seq id="Coronet_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4116T</seq>     <seq id="Courier_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s0b4099T</seq>     <seq id="Courier_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s3b4099T</seq>     <seq id="Courier_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h1s3b4099T</seq>     <seq id="Courier_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h1s0b4099T</seq>     <seq id="CourierPS_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s0b24579T</seq>     <seq id="CourierPS_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h1s0b24579T</seq>     <seq id="CourierPS_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s3b24579T</seq>     <seq id="CourierPS_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h1s3b24579T</seq>     <seq id="Garamond_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4197T</seq>     <seq id="Garamond_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4197T</seq>     <seq id="Garamond_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b4197T</seq>     <seq id="Garamond_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b4197T</seq>     <seq id="Helvetica Narrow_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v4s0b24580T</seq>     <seq id="Helvetica Narrow_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v5s0b24580T</seq>     <seq id="Helvetica Narrow_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v4s3b24580T</seq>     <seq id="Helvetica Narrow_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v5s3b24580T</seq>     <seq id="Helvetica_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b24580T</seq>     <seq id="Helvetica_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b24580T</seq>     <seq id="Helvetica_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b24580T</seq>     <seq id="Helvetica_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b24580T</seq>     <seq id="ITC Avant Garde Gothic_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b24607T</seq>     <seq id="ITC Avant Garde Gothic_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b24607T</seq>     <seq id="ITC Avant Garde Gothic Demi_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s2b24607T</seq>     <seq id="ITC Avant Garde Gothic Demi_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s2b24607T</seq>     <seq id="ITC Bookman Light_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s-3b24623T</seq>     <seq id="ITC Bookman Light_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s-3b24623T</seq>     <seq id="ITC Bookman Demi_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s2b24623T</seq>     <seq id="ITC Bookman Demi_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s2b24623T</seq>     <seq id="ITC Zapf Chancery_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b45099T</seq>     <seq id="ITC Zapf Dingbats_Normal_Normal_fontSpecific"><ESC/>&t0P<ESC/>(14L<ESC/>(s1p<var name="fontSize"/>v0s0b45101T</seq>     <seq id="Letter Gothic_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s0b4102T</seq>     <seq id="Letter Gothic_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h1s0b4102T</seq>     <seq id="Letter Gothic_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s0p<var name="fontPitch"/>h0s3b4102T</seq>     <seq id="Marigold_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4297T</seq>     <seq id="New Century Schoolbook_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b24703T</seq>     <seq id="New Century Schoolbook_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b24703T</seq>     <seq id="New Century Schoolbook_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b24703T</seq>     <seq id="New Century Schoolbook_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b24703T</seq>     <seq id="Palatino_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b24591T</seq>     <seq id="Palatino_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b24591T</seq>     <seq id="Palatino_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b24591T</seq>     <seq id="Palatino_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b24591T</seq>     <seq id="Symbol_Normal_Normal_fontSpecific"><ESC/>&t0P<ESC/>(19M<ESC/>(s1p<var name="fontSize"/>v0s0b16686T</seq>     <seq id="SymbolPS_Normal_Normal_fontSpecific"><ESC/>&t0P<ESC/>(19M<ESC/>(s1p<var name="fontSize"/>v0s0b45358T</seq>     <seq id="Times_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b25093T</seq>     <seq id="Times_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b25093T</seq>     <seq id="Times_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b25093T</seq>     <seq id="Times_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b25093T</seq>     <seq id="Times New Roman_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b16901T</seq>     <seq id="Times New Roman_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b16901T</seq>     <seq id="Times New Roman_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b16901T</seq>     <seq id="Times New Roman_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b16901T</seq>     <seq id="Univers_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s0b4148T</seq>     <seq id="Univers_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s0b4148T</seq>     <seq id="Univers_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v0s3b4148T</seq>     <seq id="Univers_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v1s3b4148T</seq>     <seq id="Univers Condensed_Normal_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v4s0b4148T</seq>     <seq id="Univers Condensed_Normal_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v5s0b4148T</seq>     <seq id="Univers Condensed_Bold_Normal_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v4s3b4148T</seq>     <seq id="Univers Condensed_Bold_Italic_ISO-8859-1"><ESC/>&t0P<ESC/>(19U<ESC/>(s1p<var name="fontSize"/>v5s3b4148T</seq>     <seq id="Wingdings_Normal_Normal_fontSpecific"><ESC/>&t0P<ESC/>(19M<ESC/>(s1p<var name="fontSize"/>v0s0b31402T</seq>   </pdl>   <deviceInfo>     <!-- ========================================== -->     <!-- Device information                         -->     <!-- ========================================== -->     <option name="manufacturer">General</option>     <option name="model">General</option>     <option name="language">pcl</option>     <option name="languageLevel">5c</option>     <!-- ========================================== -->     <!-- Device options                             -->     <!-- ========================================== -->     <option name="supportsInteractiveForms">0</option>     <option name="supportsHiddenFieldObjects">0</option>     <option name="supportsInvisibleFieldObjects">0</option>     <option name="supportsInvisibleFieldBorderObjects">0</option>     <option name="supportsInvisibleFieldCaptionObjects">0</option>     <option name="supportsHiddenBoilerPlateObjects">0</option>     <option name="supportsInvisibleBoilerPlateObjects">0</option>     <option name="supportsDrawLine">1</option>     <option name="supportsDrawArc">1</option>     <option name="supportsDrawRectangle">1</option>     <option name="supportsNativeRectangle">1</option>     <option name="supportsDrawText">1</option>     <option name="supportsNativeLinearFill">0</option>     <option name="supportsNativeRadialFill">0</option>     <option name="gradientFillStepSize">0.0625in</option>     <option name="supportsNativePatternFill">1</option>     <option name="supportsNativeLineStyles">1</option>     <option name="maxOutputLineLength">0</option>     <option name="enumerateColors">1</option>     <option name="strokeTypeMultiplier">1</option>     <option name="pageOffsetX">-0.25in</option>     <option name="pageOffsetY">-0.25in</option>     <option name="supportsCopy">1</option>     <option name="supportsMacros">1</option>     <option name="supportsPCLLogicalOperationCommand">1</option>     <!-- ========================================== -->     <!-- PCL Color Treatment option                 -->     <!--                                            -->     <!--   Device ID:                               -->     <!--      8 = Color Laserjet 4500               -->     <!--      6 = Any other Color Laserjet          -->     <!--                                            -->     <!--   Color Treatment Code                     -->     <!--      3 = Vivid Graphics                    -->     <!--      6 = Screen Match                      -->     <!-- ========================================== -->     <option name="colorTreatmentDevicePcl">6</option>     <option name="colorTreatmentCodePcl">6</option>     <!-- ========================================== -->     <!-- Font options                               -->     <!-- ========================================== -->     <option name="supportsFontEmbedding">1</option>     <option name="supportsFontLinking">0</option>     <option name="supportsFontSubsetting">1</option>     <option name="supportsFontRasterizing">1</option>     <option name="enumerateFonts">0</option>     <option name="startingFontNumber">9000</option>            <!-- ========================================== -->     <!-- Duplex options                             -->     <!--     0 - Simplex (no-Duplex)                -->     <!--     1 - Duplex, Long-Edge Binding          -->     <!--     2 - Duplex, Short-Edge Binding         -->     <!-- ========================================== -->     <option name="jobLevelDuplex">0</option>     <!-- ========================================== -->     <!-- Text formatting                            -->     <!-- ========================================== -->     <option name="boilerplateTextRetrieval">formattedFragments</option>     <option name="fieldTextRetrieval">formattedFragments</option>     <option name="outputZeroRotation">0</option>     <!-- ========================================== -->     <!-- Resolution                                 -->     <!-- ========================================== -->     <option name="deviceXResolution">600</option>     <option name="deviceYResolution">600</option>     <option name="defaultRasterResolution">300</option>     <option name="deviceRasterTextResolution">300</option>     <option name="autoCalcGraphicDimensions">1</option>     <!-- ========================================== -->     <!-- Image options                              -->     <!-- ========================================== -->     <option name="blackIsZero">0</option>     <option name="outputImagesByLine">1</option>     <option name="supportsColorImages">1</option>     <option name="supportedCompressionTypes">none</option>     <option name="imageCompression">none</option>     <option name="supportsEncodeColorMap">none</option>     <option name="supportsImageScaling">0</option>     <option name="supportsLinkedImages">0</option>     <option name="supportsEmbeddedImages">1</option>     <option name="supportedEmbeddedImageFormats">internal</option>     <option name="supportedLinkedImageFormats">internal</option>     <!-- ========================================== -->     <!-- Supported graphic types                    -->     <!-- ========================================== -->     <option name="supportsMonochrome1">1</option>     <option name="supportsGreyscale1">1</option>     <option name="supportsGreyscale2">1</option>     <option name="supportsGreyscale4">1</option>     <option name="supportsGreyscale8">1</option>     <option name="supportsPalette1">1</option>     <option name="supportsPalette2">1</option>     <option name="supportsPalette4">1</option>     <option name="supportsPalette8">1</option>     <option name="supportsRGB8">1</option>     <option name="supportsRGB16">1</option>     <!-- ========================================== -->     <!-- Native end caps                            -->     <!-- ========================================== -->     <option name="endCap_butt">1</option>     <option name="endCap_square">2</option>     <option name="endCap_round">4</option>     <!-- ========================================== -->     <!-- Native line styles                         -->     <!-- ========================================== -->     <option name="solid">LT</option>     <option name="dotted">LT2,0.5,1</option>     <option name="dashed">LT3,1.0</option>     <option name="dashDot">LT5,2.5</option>     <option name="dashDotDot">LT6</option>     <!-- ========================================== -->     <!-- The following should be in xci -->     <!-- ========================================== -->     <option name="linesAsRaster">0</option>     <option name="arcsAsRaster">0</option>     <option name="rectanglesAsRaster">0</option>     <option name="textAsRaster">0</option>     <option name="renderImagesInColor">1</option>     <option name="rasterizeAll">0</option>     <option name="rasterizeBoilerPlate">0</option>     <option name="imageCompression">none</option>     <option name="ignoreBoilerplate">0</option>     <option name="useNativeLineStyles">1</option>     <!-- ========================================== -->     <!-- Medium                                     -->     <!-- ========================================== -->     <medium stock="default" short="612pt" long="792pt" imagingBBox="none">2</medium>     <medium stock="executive" short="7.25in" long="10.5in">1</medium>     <!--<<medium stock="letter" short="8.5in" long="11in" imagingBBox="none">2</medium>-->     <medium stock="letterSpecial" short="8.5in" long="11in" imagingBBox="none">2</medium>     <medium stock="legal" short="8.5in" long="14in">3</medium>     <medium stock="ledger" short="11in" long="17in">6</medium>     <medium stock="a5" short="148mm" long="210mm">25</medium>     <medium stock="a4" short="210mm" long="297mm">26</medium>     <medium stock="a3" short="297mm" long="420mm">27</medium>     <medium stock="b5JIS" short="182mm" long="257mm">45</medium>     <medium stock="b4JIS" short="250mm" long="354mm">46</medium>     <medium stock="hagakiPostcard" short="100mm" long="148mm">71</medium>     <medium stock="oufukuHagakiPostcard" short="200mm" long="148mm">72</medium>     <medium stock="envelopeMonarch" short="3.875in" long="7.5in">80</medium>     <medium stock="envelopeCommercial" short="4.125in" long="9.5in">81</medium>     <medium stock="DLInternational" short="110mm" long="220mm">90</medium>     <medium stock="C5International" short="162mm" long="229mm">91</medium>     <medium stock="B5International" short="176mm" long="250mm">100</medium>     <medium stock="custom">101</medium>     <medium stock="letterPlain" short="612pt" long="792pt">2</medium>     <medium stock="letterLetterhead" short="612pt" long="792pt">2</medium>     <!--<medium stock="letterSpecial" short="612pt" long="792pt">2</medium>-->     <medium stock="letterColor" short="612pt" long="792pt">2</medium>     <medium stock="a4Plain" short="210mm" long="297mm">26</medium>     <medium stock="a4Letterhead" short="210mm" long="297mm">26</medium>     <medium stock="a4Special" short="210mm" long="297mm">26</medium>     <medium stock="a4Color" short="210mm" long="297mm">26</medium>     <medium stock="b4JISPlain" short="250mm" long="354mm">46</medium>     <medium stock="b4JISLetterhead" short="250mm" long="354mm">46</medium>     <medium stock="b4JISSpecial" short="250mm" long="354mm">46</medium>     <medium stock="b4JISColor" short="250mm" long="354mm">46</medium>     <!-- ========================================== -->     <!-- Units                                      -->     <!-- ========================================== -->     <deviceUnits name="general"             hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="pageDimensions"      hSize=".1pt" vSize=".1pt" fracDigits="0" fraction="round"/>     <deviceUnits name="lineDimensions"      hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="linePlacement"       hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="lineThickness"       hSize="1mm"   vSize="1mm"   fracDigits="2" fraction="round"/>     <deviceUnits name="graphicPlacement"    hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="graphicDimensions"   hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="textPlacement"       hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="fontSize"            hSize="1pt"   vSize="1pt"   fracDigits="3" fraction="round"/>     <deviceUnits name="arcPlacement"        hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="arcDimensions"       hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="rectanglePlacement"  hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="rectangleDimensions" hSize=".12pt" vSize=".12pt" fracDigits="0" fraction="round"/>     <deviceUnits name="color"               hSize="0pt"   vSize="0pt"   fracDigits="0" fraction="round"/>     <!-- ========================================== -->     <!-- Barcodes                                   -->     <!-- ========================================== -->     <barcodes>       <barcodeDefinition type="code2Of5Interleaved" support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="2.2-3.0" checksum="auto,none" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789"/>       <barcodeDefinition type="code3Of9"            support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="2.2-3.0" checksum="auto,none" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-. $/+%*"/>       <barcodeDefinition type="pdf417"              support="software"/>       <barcodeDefinition type="ean8"                support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="belowEmbedded" validDataChars="0123456789"/>       <barcodeDefinition type="upcA"                support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="belowEmbedded" validDataChars="0123456789"/>       <barcodeDefinition type="code128"             support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars=" &#33;&#35;&#38;&#39;$%()*+,-./0123456789:;&#60;=&#62;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_&#96;abcdefghijklmnopqrstuvwxyz{|}~"/> <!-- need to add " -->     <barcodeDefinition type="code128A"            support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars=" &#33;&#35;&#38;&#39;$%()*+,-./0123456789:;&#60;=&#62;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_"/> <!-- need to add " -->     <barcodeDefinition type="code128B"            support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars=" &#33;&#35;&#38;&#39;$%()*+,-./0123456789:;&#60;=&#62;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_&#96;abcdefghijklmnopqrstuvwxyz{|}~"/> <!-- need to add " -->     <barcodeDefinition type="code128C"            support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789"/> <!-- need to add " -->     <barcodeDefinition type="code128SSCC"         support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789"/> <!-- need to add " -->       <barcodeDefinition type="ean13"               support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="fixed" checksum="auto" textLocation="belowEmbedded" validDataChars="0123456789"/>       <barcodeDefinition type="code2Of5Matrix"      support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="2.2-3.0" checksum="auto,none" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789"/>       <barcodeDefinition type="code2Of5Industrial"  support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="2.2-3.0" checksum="auto,none" textLocation="none,above,below,aboveEmbedded,belowEmbedded"  validDataChars="0123456789"/>       <barcodeDefinition type="codabar"             support="software" moduleWidth="0.191mm-1.25mm" moduleHeight="5mm-1250mm" wideNarrowRatio="2.2-3.0" checksum="none" textLocation="none,above,below,aboveEmbedded,belowEmbedded" validDataChars="0123456789-$:/.+" startChar="ABCDabcd*NTEnte" endChar="ABCDabcd*NTEnte"/>       <barcodeDefinition type="postAUSStandard"     support="software" checksum="auto" textLocation="none,above" validDataChars="0123456789" dataLength="8"/>       <barcodeDefinition type="postAUSCust2"        support="software" checksum="auto" textLocation="none,above" validDataChars="0123456789"/>       <barcodeDefinition type="postAUSCust3"        support="software" checksum="auto" textLocation="none,above" validDataChars="0123456789"/>       <barcodeDefinition type="postAUSReplyPaid"    support="software" checksum="auto" textLocation="none,above" validDataChars="0123456789" dataLength="8"/>       <barcodeDefinition type="postUSStandard"      support="software" checksum="auto" textLocation="none,above,below" validDataChars="0123456789" dataLength="9"/>       <barcodeDefinition type="postUS5Zip"          support="software" checksum="auto" textLocation="none,above,below" validDataChars="0123456789" dataLength="5"/>       <barcodeDefinition type="postUSDPBC"          support="software" checksum="auto" textLocation="none,above,below" validDataChars="0123456789" dataLength="11"/>       <barcodeDefinition type="postUKRM4SCC"        support="software" checksum="auto,none" textLocation="none,above,below" validDataChars="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"/>        <!-- other barcodes not supported by this device but still need to be rendered -->       <barcodeDefinition type="code11"              support="none" wideNarrowRatio="2.0-3.0" moduleWidth="0.125mm-1.25mm" moduleHeight="0.125mm-1250mm" checksum="auto,none" textLocation="none,above,below" validDataChars="0123456789-"/>       <barcodeDefinition type="msi"                 support="none" wideNarrowRatio="2.0-3.0" moduleWidth="0.125mm-1.25mm" moduleHeight="0.125mm-1250mm" checksum="none,1mod10,2mod10,1mod10_1mod11" textLocation="none,above,below" printCheckDigit="1" validDataChars="0123456789" dataLength="1-14"/>       <barcodeDefinition type="plessey"             support="none" wideNarrowRatio="2.0-3.0" moduleWidth="0.125mm-1.25mm" moduleHeight="0.125mm-1250mm" checksum="auto,none" textLocation="none,above,below" validDataChars="0123456789ABCDEF"/>       <barcodeDefinition type="upcE"                support="none" wideNarrowRatio="fixed"   moduleWidth="0.125mm-1.25mm" moduleHeight="0.125mm-1250mm" textLocation="none,above,below" printCheckDigit

    Hi
    KEEP a BREAK-POINT and debug the internal table lines how it is coming
    some overlap must be happening ..check.
    Also check the code where you are getting this text into internal table.
    1) One way to debug smartform is to debug the Function Module of that smartforms.
    If you want to debug particular smartform node that the solution would be,
    insert a "Program Line" just above the node you want to debug and this program line write a normal abap breakpoint.
    So whenever you call the smartforms, it will stop at this breakpoint and you can debug onwards.
    2) SFTRACE can be used for debugging SMARTFORMS.
    Read More here.
    http://help.sap.com/saphelp_erp2004/helpdata/en/49/c3d8a4a05b11d5b6ef006094192fe3/frameset.htm
    Reward points for useful Answers
    Regards
    Anji

  • Is there a way to extract an image file metadata?

    I know this isn't specific to PS but hope there's an answer here.
    I'm transcribing some of the metadata from image files to build a simple catalog.  Included are things like dimensions, resolution, and photo date.  Is there a way to extract this data other than manually?
    Thanks
    Tom

    A Photoshop script can with ease.
    // This script is supplied as is. It is provided as freeware.
    // The author accepts no liability for any problems arising from its use.
    <javascriptresource>
    <about>$$$/JavaScripts/metadata/About=JJMack's pdf metadata.^r^rCopyright 2009 Mouseprints.^r^rJJMack's Script.^rNOTE:Copy Document metadata to a text file in same folder with same filename!</about>
    </javascriptresource>
    //<category>JJMack's Script</category>
    // enable double-clicking from Mac Finder or Windows Explorer
    #target photoshop // this command only works in Photoshop CS2 and higher
    // bring application forward for double-click events
    app.bringToFront();
    // ensure at least one document open
    if (!documents.length) {
              alert('There are no documents open.', 'No Document');
    // if at least one document exists, then proceed
    else {
              main();
    // main - main function
    function main() {
              try {
                      // remember users Ruler avd Type Units and set ours
                        var strtRulerUnits = app.preferences.rulerUnits;
                        var strtTypeUnits = app.preferences.typeUnits;
                        app.preferences.rulerUnits = Units.PIXELS;
                         app.preferences.typeUnits = TypeUnits.PIXELS;
                        xml = app.activeDocument.xmpMetadata.rawData;
                    //writeTXT(xml);
                        //alert ("length of metadata = " + xml.length);
                        //alert (xml);
                        xmpdatastart = xml.indexOf("<x:xmpmeta");
                        xmpdataend = xml.indexOf("</x:xmpmeta>") +  "</x:xmpmeta>".length;
                        //alert ("xmpdatastart = " + xmpdatastart + " xmpdatalength = " + xmpdatalength );
                        xmpdata = xml.substr(xmpdatastart, xmpdataend );
                        writeTXT(xmpdata);
                        var mySourceFilePath = activeDocument.fullName.path + "/";
                        alert("Operation Complete! Metadata exported to: " + mySourceFilePath.toString().match(/([^\.]+)/)[1] + app.activeDocument.name.match(/([^\.]+)/)[1] + ".txt");
                        // break up into segments and make text layers
                        n = 1
                        for (var i = 0; i < xmpdataend - xmpdatastart; ){
                                  datalength = xmpdata.indexOf("</rdf:Description>") +  "</rdf:Description>".length;
                                  //alert ("datalength = " + datalength );
                                  if (datalength == 17) { datalength = 34;}
                                  data = xmpdata.substr(0, datalength);
                                  endofdata = xmpdata.indexOf("</x:xmpmeta>") +  "</x:xmpmeta>".length;
                                  xmpdata = xmpdata.substr(datalength, endofdata);
                                  i = i + datalength;
                                  // addTextLayer(data, n);
                                    alert (data);
                                  n = n + 1;
                        app.preferences.rulerUnits = strtRulerUnits;
                        app.preferences.typeUnits = strtTypeUnits;
              // display error message if something goes wrong
              catch(e) { alert(e + ': on line ' + e.line, 'Script Error', true); }
    function addTextLayer(textdata, n) {
            /* textX and TextY positions text placement 0 and 0 Top Left corner of image in pixels          */
              var textX = 0;
              var textY = 0;
              /* Internal Photoshop Text font name                                                                      */
            var fontName = "ArialMT";
              var fontName = "TimesNewRomanPSMT";
              //var fontName = "Tahoma";
              var fontSize = 6;
              /* Text Color                                                                                                    */
              textColor = new SolidColor;
              textColor.rgb.red = 255;
              textColor.rgb.green = 255;
              textColor.rgb.blue = 255;
              text_layer = app.activeDocument.artLayers.add();                                        // Add a Layer
              text_layer.kind = LayerKind.TEXT;                                                            // Make Layer a Text Layer
              text_layer.textItem.color = textColor;                                                            // set text layer color
              text_layer.blendMode = BlendMode.NORMAL                                                            // blend mode
              text_layer.textItem.font = fontName;                                                            // set text font
              text_layer.textItem.size = fontSize;                                                            // set text font Size
              text_layer.textItem.position = Array(textX, (textY + (fontSize * 3)) );                    // set text layers position in and down for fontsize
              //text_layer.textItem.position = Array(textX, (textY + (fontSize * 3 * n)) );          // set text layers position in and down for fontsize
              text_layer.textItem.contents = textdata;                                                  // set text layers text
    // Write TXT file
        function writeTXT(data) {
              // Use this to export metadata file to same directory where this file is located
              var mySourceFilePath = activeDocument.fullName.path + "/";
              // create a reference to a file for output
              var TXTFile = new File(mySourceFilePath.toString().match(/([^\.]+)/)[1] + app.activeDocument.name.match(/([^\.]+)/)[1] + ".txt");
            try {
                if(TXTFile.exists) {
                    TXTFile.open ("e");
                    TXTFile.seek (0,2);      // Move to EOF
                } else {
                TXTFile.open ("w");          // Add unicode marker if we change to XML file format for this log file
            TXTFile.encoding = "UTF8";       // set UTF8
            TXTFile.write(data);
            TXTFile.close();
            } catch (e) {
                alert(e);
            } finally {
            return;
    Outputs an XML file that looks like this:
    <x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="Adobe XMP Core 5.3-c011 66.145661, 2012/02/06-14:56:27        ">
       <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">
          <rdf:Description rdf:about=""
                xmlns:dc="http://purl.org/dc/elements/1.1/">
             <dc:format>image/tiff</dc:format>
             <dc:creator>
                <rdf:Seq>
                   <rdf:li>Pam McAssey</rdf:li>
                </rdf:Seq>
             </dc:creator>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:aux="http://ns.adobe.com/exif/1.0/aux/">
             <aux:SerialNumber>720600641</aux:SerialNumber>
             <aux:LensInfo>24/1 70/1 0/0 0/0</aux:LensInfo>
             <aux:Lens>EF24-70mm f/2.8L USM</aux:Lens>
             <aux:LensID>230</aux:LensID>
             <aux:ImageNumber>0</aux:ImageNumber>
             <aux:ApproximateFocusDistance>122/100</aux:ApproximateFocusDistance>
             <aux:FlashCompensation>0/1</aux:FlashCompensation>
             <aux:Firmware>1.0.6</aux:Firmware>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:xmp="http://ns.adobe.com/xap/1.0/">
             <xmp:ModifyDate>2012-12-19T11:23:49-05:00</xmp:ModifyDate>
             <xmp:CreateDate>2012-12-16T17:11:53</xmp:CreateDate>
             <xmp:Rating>0</xmp:Rating>
             <xmp:MetadataDate>2012-12-19T11:23:49-05:00</xmp:MetadataDate>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:photoshop="http://ns.adobe.com/photoshop/1.0/">
             <photoshop:DateCreated>2012-12-16T17:11:53</photoshop:DateCreated>
             <photoshop:ColorMode>3</photoshop:ColorMode>
             <photoshop:ICCProfile>ProPhoto RGB</photoshop:ICCProfile>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:xmpMM="http://ns.adobe.com/xap/1.0/mm/"
                xmlns:stEvt="http://ns.adobe.com/xap/1.0/sType/ResourceEvent#"
                xmlns:stRef="http://ns.adobe.com/xap/1.0/sType/ResourceRef#">
             <xmpMM:DocumentID>xmp.did:b13179a4-0983-a649-a532-0d90ea6feea5</xmpMM:DocumentID>
             <xmpMM:OriginalDocumentID>E634097DE11761C5824C1873DDBDEDDD</xmpMM:OriginalDocumentID>
             <xmpMM:InstanceID>xmp.iid:b13179a4-0983-a649-a532-0d90ea6feea5</xmpMM:InstanceID>
             <xmpMM:History>
                <rdf:Seq>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:9d0e25ce-f732-d74a-9631-086fc6151324</stEvt:instanceID>
                      <stEvt:when>2012-12-16T16:11:44-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/metadata</stEvt:changed>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:0816d1f7-2bb5-e344-806a-6da92a4c8540</stEvt:instanceID>
                      <stEvt:when>2012-12-16T16:13:18-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/metadata</stEvt:changed>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>derived</stEvt:action>
                      <stEvt:parameters>converted from image/x-canon-cr2 to image/tiff</stEvt:parameters>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:b13179a4-0983-a649-a532-0d90ea6feea5</stEvt:instanceID>
                      <stEvt:when>2012-12-19T11:23:49-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/</stEvt:changed>
                   </rdf:li>
                </rdf:Seq>
             </xmpMM:History>
             <xmpMM:DerivedFrom rdf:parseType="Resource">
                <stRef:instanceID>xmp.iid:0816d1f7-2bb5-e344-806a-6da92a4c8540</stRef:instanceID>
                <stRef:documentID>E634097DE11761C5824C1873DDBDEDDD</stRef:documentID>
                <stRef:originalDocumentID>E634097DE11761C5824C1873DDBDEDDD</stRef:originalDocumentID>
             </xmpMM:DerivedFrom>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:crs="http://ns.adobe.com/camera-raw-settings/1.0/">
             <crs:RawFileName>_S1H4635.CR2</crs:RawFileName>
             <crs:Version>7.3</crs:Version>
             <crs:ProcessVersion>6.7</crs:ProcessVersion>
             <crs:WhiteBalance>As Shot</crs:WhiteBalance>
             <crs:Temperature>5950</crs:Temperature>
             <crs:Tint>+46</crs:Tint>
             <crs:Saturation>0</crs:Saturation>
             <crs:Sharpness>25</crs:Sharpness>
             <crs:LuminanceSmoothing>0</crs:LuminanceSmoothing>
             <crs:ColorNoiseReduction>25</crs:ColorNoiseReduction>
             <crs:VignetteAmount>0</crs:VignetteAmount>
             <crs:ShadowTint>0</crs:ShadowTint>
             <crs:RedHue>0</crs:RedHue>
             <crs:RedSaturation>0</crs:RedSaturation>
             <crs:GreenHue>0</crs:GreenHue>
             <crs:GreenSaturation>0</crs:GreenSaturation>
             <crs:BlueHue>0</crs:BlueHue>
             <crs:BlueSaturation>0</crs:BlueSaturation>
             <crs:Vibrance>0</crs:Vibrance>
             <crs:HueAdjustmentRed>0</crs:HueAdjustmentRed>
             <crs:HueAdjustmentOrange>0</crs:HueAdjustmentOrange>
             <crs:HueAdjustmentYellow>0</crs:HueAdjustmentYellow>
             <crs:HueAdjustmentGreen>0</crs:HueAdjustmentGreen>
             <crs:HueAdjustmentAqua>0</crs:HueAdjustmentAqua>
             <crs:HueAdjustmentBlue>0</crs:HueAdjustmentBlue>
             <crs:HueAdjustmentPurple>0</crs:HueAdjustmentPurple>
             <crs:HueAdjustmentMagenta>0</crs:HueAdjustmentMagenta>
             <crs:SaturationAdjustmentRed>0</crs:SaturationAdjustmentRed>
             <crs:SaturationAdjustmentOrange>0</crs:SaturationAdjustmentOrange>
             <crs:SaturationAdjustmentYellow>0</crs:SaturationAdjustmentYellow>
             <crs:SaturationAdjustmentGreen>0</crs:SaturationAdjustmentGreen>
             <crs:SaturationAdjustmentAqua>0</crs:SaturationAdjustmentAqua>
             <crs:SaturationAdjustmentBlue>0</crs:SaturationAdjustmentBlue>
             <crs:SaturationAdjustmentPurple>0</crs:SaturationAdjustmentPurple>
             <crs:SaturationAdjustmentMagenta>0</crs:SaturationAdjustmentMagenta>
             <crs:LuminanceAdjustmentRed>0</crs:LuminanceAdjustmentRed>
             <crs:LuminanceAdjustmentOrange>0</crs:LuminanceAdjustmentOrange>
             <crs:LuminanceAdjustmentYellow>0</crs:LuminanceAdjustmentYellow>
             <crs:LuminanceAdjustmentGreen>0</crs:LuminanceAdjustmentGreen>
             <crs:LuminanceAdjustmentAqua>0</crs:LuminanceAdjustmentAqua>
             <crs:LuminanceAdjustmentBlue>0</crs:LuminanceAdjustmentBlue>
             <crs:LuminanceAdjustmentPurple>0</crs:LuminanceAdjustmentPurple>
             <crs:LuminanceAdjustmentMagenta>0</crs:LuminanceAdjustmentMagenta>
             <crs:SplitToningShadowHue>0</crs:SplitToningShadowHue>
             <crs:SplitToningShadowSaturation>0</crs:SplitToningShadowSaturation>
             <crs:SplitToningHighlightHue>0</crs:SplitToningHighlightHue>
             <crs:SplitToningHighlightSaturation>0</crs:SplitToningHighlightSaturation>
             <crs:SplitToningBalance>0</crs:SplitToningBalance>
             <crs:ParametricShadows>0</crs:ParametricShadows>
             <crs:ParametricDarks>0</crs:ParametricDarks>
             <crs:ParametricLights>0</crs:ParametricLights>
             <crs:ParametricHighlights>0</crs:ParametricHighlights>
             <crs:ParametricShadowSplit>25</crs:ParametricShadowSplit>
             <crs:ParametricMidtoneSplit>50</crs:ParametricMidtoneSplit>
             <crs:ParametricHighlightSplit>75</crs:ParametricHighlightSplit>
             <crs:SharpenRadius>+1.0</crs:SharpenRadius>
             <crs:SharpenDetail>25</crs:SharpenDetail>
             <crs:SharpenEdgeMasking>0</crs:SharpenEdgeMasking>
             <crs:PostCropVignetteAmount>0</crs:PostCropVignetteAmount>
             <crs:GrainAmount>0</crs:GrainAmount>
             <crs:ColorNoiseReductionDetail>50</crs:ColorNoiseReductionDetail>
             <crs:LensProfileEnable>0</crs:LensProfileEnable>
             <crs:LensManualDistortionAmount>0</crs:LensManualDistortionAmount>
             <crs:PerspectiveVertical>0</crs:PerspectiveVertical>
             <crs:PerspectiveHorizontal>0</crs:PerspectiveHorizontal>
             <crs:PerspectiveRotate>0.0</crs:PerspectiveRotate>
             <crs:PerspectiveScale>100</crs:PerspectiveScale>
             <crs:AutoLateralCA>0</crs:AutoLateralCA>
             <crs:Exposure2012>-1.30</crs:Exposure2012>
             <crs:Contrast2012>-25</crs:Contrast2012>
             <crs:Highlights2012>0</crs:Highlights2012>
             <crs:Shadows2012>0</crs:Shadows2012>
             <crs:Whites2012>+2</crs:Whites2012>
             <crs:Blacks2012>-9</crs:Blacks2012>
             <crs:Clarity2012>0</crs:Clarity2012>
             <crs:DefringePurpleAmount>0</crs:DefringePurpleAmount>
             <crs:DefringePurpleHueLo>30</crs:DefringePurpleHueLo>
             <crs:DefringePurpleHueHi>70</crs:DefringePurpleHueHi>
             <crs:DefringeGreenAmount>0</crs:DefringeGreenAmount>
             <crs:DefringeGreenHueLo>40</crs:DefringeGreenHueLo>
             <crs:DefringeGreenHueHi>60</crs:DefringeGreenHueHi>
             <crs:ConvertToGrayscale>False</crs:ConvertToGrayscale>
             <crs:ToneCurveName2012>Linear</crs:ToneCurveName2012>
             <crs:ToneCurvePV2012>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012>
             <crs:ToneCurvePV2012Red>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Red>
             <crs:ToneCurvePV2012Green>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Green>
             <crs:ToneCurvePV2012Blue>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Blue>
             <crs:CameraProfile>Adobe Standard</crs:CameraProfile>
             <crs:CameraProfileDigest>3CE8523BCEA625D0F0ABABADE3BCC281</crs:CameraProfileDigest>
             <crs:LensProfileSetup>LensDefaults</crs:LensProfileSetup>
             <crs:HasSettings>True</crs:HasSettings>
             <crs:HasCrop>False</crs:HasCrop>
             <crs:AlreadyApplied>True</crs:AlreadyApplied>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:tiff="http://ns.adobe.com/tiff/1.0/">
             <tiff:XResolution>240/1</tiff:XResolution>
             <tiff:YResolution>240/1</tiff:YResolution>
             <tiff:ResolutionUnit>2</tiff:ResolutionUnit>
             <tiff:Make>Canon</tiff:Make>
             <tiff:Model>Canon EOS-1D Mark IV</tiff:Model>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:exif="http://ns.adobe.com/exif/1.0/">
             <exif:ExifVersion>0221</exif:ExifVersion>
             <exif:PixelXDimension>4896</exif:PixelXDimension>
             <exif:PixelYDimension>3264</exif:PixelYDimension>
             <exif:DateTimeOriginal>2012-12-16T17:11:53</exif:DateTimeOriginal>
             <exif:ExposureTime>1/30</exif:ExposureTime>
             <exif:FNumber>28/10</exif:FNumber>
             <exif:ExposureProgram>2</exif:ExposureProgram>
             <exif:ISOSpeedRatings>
                <rdf:Seq>
                   <rdf:li>3200</rdf:li>
                </rdf:Seq>
             </exif:ISOSpeedRatings>
             <exif:ShutterSpeedValue>4906891/1000000</exif:ShutterSpeedValue>
             <exif:ApertureValue>2970854/1000000</exif:ApertureValue>
             <exif:ExposureBiasValue>0/1</exif:ExposureBiasValue>
             <exif:MaxApertureValue>3/1</exif:MaxApertureValue>
             <exif:MeteringMode>5</exif:MeteringMode>
             <exif:Flash rdf:parseType="Resource">
                <exif:Fired>False</exif:Fired>
                <exif:Return>0</exif:Return>
                <exif:Mode>2</exif:Mode>
                <exif:Function>False</exif:Function>
                <exif:RedEyeMode>False</exif:RedEyeMode>
             </exif:Flash>
             <exif:FocalLength>64/1</exif:FocalLength>
             <exif:FocalPlaneXResolution>4896000/1290</exif:FocalPlaneXResolution>
             <exif:FocalPlaneYResolution>3264000/836</exif:FocalPlaneYResolution>
             <exif:FocalPlaneResolutionUnit>2</exif:FocalPlaneResolutionUnit>
             <exif:CustomRendered>0</exif:CustomRendered>
             <exif:ExposureMode>0</exif:ExposureMode>
             <exif:WhiteBalance>0</exif:WhiteBalance>
             <exif:SceneCaptureType>0</exif:SceneCaptureType>
             <exif:SubSecTime>00</exif:SubSecTime>
             <exif:SubSecTimeOriginal>00</exif:SubSecTimeOriginal>
             <exif:SubSecTimeDigitized>00</exif:SubSecTimeDigitized>
             <exif:SerialNumber>720600641</exif:SerialNumber>
             <exif:LensInfo>
                <rdf:Seq>
                   <rdf:li>24/1</rdf:li>
                </rdf:Seq>
             </exif:LensInfo>
             <exif:Lens>EF24-70mm f/2.8L USM</exif:Lens>
          </rdf:Description>
       </rdf:RDF>
    </x:xmpmeta>
                                                       <x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="Adobe XMP Core 5.3-c011 66.145661, 2012/02/06-14:56:27        ">
       <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">
          <rdf:Description rdf:about=""
                xmlns:dc="http://purl.org/dc/elements/1.1/">
             <dc:format>image/tiff</dc:format>
             <dc:creator>
                <rdf:Seq>
                   <rdf:li>Pam McAssey</rdf:li>
                </rdf:Seq>
             </dc:creator>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:aux="http://ns.adobe.com/exif/1.0/aux/">
             <aux:SerialNumber>720600641</aux:SerialNumber>
             <aux:LensInfo>24/1 70/1 0/0 0/0</aux:LensInfo>
             <aux:Lens>EF24-70mm f/2.8L USM</aux:Lens>
             <aux:LensID>230</aux:LensID>
             <aux:ImageNumber>0</aux:ImageNumber>
             <aux:ApproximateFocusDistance>122/100</aux:ApproximateFocusDistance>
             <aux:FlashCompensation>0/1</aux:FlashCompensation>
             <aux:Firmware>1.0.6</aux:Firmware>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:xmp="http://ns.adobe.com/xap/1.0/">
             <xmp:ModifyDate>2012-12-19T11:23:49-05:00</xmp:ModifyDate>
             <xmp:CreateDate>2012-12-16T17:11:53</xmp:CreateDate>
             <xmp:Rating>0</xmp:Rating>
             <xmp:MetadataDate>2012-12-19T11:23:49-05:00</xmp:MetadataDate>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:photoshop="http://ns.adobe.com/photoshop/1.0/">
             <photoshop:DateCreated>2012-12-16T17:11:53</photoshop:DateCreated>
             <photoshop:ColorMode>3</photoshop:ColorMode>
             <photoshop:ICCProfile>ProPhoto RGB</photoshop:ICCProfile>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:xmpMM="http://ns.adobe.com/xap/1.0/mm/"
                xmlns:stEvt="http://ns.adobe.com/xap/1.0/sType/ResourceEvent#"
                xmlns:stRef="http://ns.adobe.com/xap/1.0/sType/ResourceRef#">
             <xmpMM:DocumentID>xmp.did:b13179a4-0983-a649-a532-0d90ea6feea5</xmpMM:DocumentID>
             <xmpMM:OriginalDocumentID>E634097DE11761C5824C1873DDBDEDDD</xmpMM:OriginalDocumentID>
             <xmpMM:InstanceID>xmp.iid:b13179a4-0983-a649-a532-0d90ea6feea5</xmpMM:InstanceID>
             <xmpMM:History>
                <rdf:Seq>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:9d0e25ce-f732-d74a-9631-086fc6151324</stEvt:instanceID>
                      <stEvt:when>2012-12-16T16:11:44-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/metadata</stEvt:changed>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:0816d1f7-2bb5-e344-806a-6da92a4c8540</stEvt:instanceID>
                      <stEvt:when>2012-12-16T16:13:18-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/metadata</stEvt:changed>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>derived</stEvt:action>
                      <stEvt:parameters>converted from image/x-canon-cr2 to image/tiff</stEvt:parameters>
                   </rdf:li>
                   <rdf:li rdf:parseType="Resource">
                      <stEvt:action>saved</stEvt:action>
                      <stEvt:instanceID>xmp.iid:b13179a4-0983-a649-a532-0d90ea6feea5</stEvt:instanceID>
                      <stEvt:when>2012-12-19T11:23:49-05:00</stEvt:when>
                      <stEvt:softwareAgent>Adobe Photoshop Camera Raw 7.3 (Windows)</stEvt:softwareAgent>
                      <stEvt:changed>/</stEvt:changed>
                   </rdf:li>
                </rdf:Seq>
             </xmpMM:History>
             <xmpMM:DerivedFrom rdf:parseType="Resource">
                <stRef:instanceID>xmp.iid:0816d1f7-2bb5-e344-806a-6da92a4c8540</stRef:instanceID>
                <stRef:documentID>E634097DE11761C5824C1873DDBDEDDD</stRef:documentID>
                <stRef:originalDocumentID>E634097DE11761C5824C1873DDBDEDDD</stRef:originalDocumentID>
             </xmpMM:DerivedFrom>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:crs="http://ns.adobe.com/camera-raw-settings/1.0/">
             <crs:RawFileName>_S1H4635.CR2</crs:RawFileName>
             <crs:Version>7.3</crs:Version>
             <crs:ProcessVersion>6.7</crs:ProcessVersion>
             <crs:WhiteBalance>As Shot</crs:WhiteBalance>
             <crs:Temperature>5950</crs:Temperature>
             <crs:Tint>+46</crs:Tint>
             <crs:Saturation>0</crs:Saturation>
             <crs:Sharpness>25</crs:Sharpness>
             <crs:LuminanceSmoothing>0</crs:LuminanceSmoothing>
             <crs:ColorNoiseReduction>25</crs:ColorNoiseReduction>
             <crs:VignetteAmount>0</crs:VignetteAmount>
             <crs:ShadowTint>0</crs:ShadowTint>
             <crs:RedHue>0</crs:RedHue>
             <crs:RedSaturation>0</crs:RedSaturation>
             <crs:GreenHue>0</crs:GreenHue>
             <crs:GreenSaturation>0</crs:GreenSaturation>
             <crs:BlueHue>0</crs:BlueHue>
             <crs:BlueSaturation>0</crs:BlueSaturation>
             <crs:Vibrance>0</crs:Vibrance>
             <crs:HueAdjustmentRed>0</crs:HueAdjustmentRed>
             <crs:HueAdjustmentOrange>0</crs:HueAdjustmentOrange>
             <crs:HueAdjustmentYellow>0</crs:HueAdjustmentYellow>
             <crs:HueAdjustmentGreen>0</crs:HueAdjustmentGreen>
             <crs:HueAdjustmentAqua>0</crs:HueAdjustmentAqua>
             <crs:HueAdjustmentBlue>0</crs:HueAdjustmentBlue>
             <crs:HueAdjustmentPurple>0</crs:HueAdjustmentPurple>
             <crs:HueAdjustmentMagenta>0</crs:HueAdjustmentMagenta>
             <crs:SaturationAdjustmentRed>0</crs:SaturationAdjustmentRed>
             <crs:SaturationAdjustmentOrange>0</crs:SaturationAdjustmentOrange>
             <crs:SaturationAdjustmentYellow>0</crs:SaturationAdjustmentYellow>
             <crs:SaturationAdjustmentGreen>0</crs:SaturationAdjustmentGreen>
             <crs:SaturationAdjustmentAqua>0</crs:SaturationAdjustmentAqua>
             <crs:SaturationAdjustmentBlue>0</crs:SaturationAdjustmentBlue>
             <crs:SaturationAdjustmentPurple>0</crs:SaturationAdjustmentPurple>
             <crs:SaturationAdjustmentMagenta>0</crs:SaturationAdjustmentMagenta>
             <crs:LuminanceAdjustmentRed>0</crs:LuminanceAdjustmentRed>
             <crs:LuminanceAdjustmentOrange>0</crs:LuminanceAdjustmentOrange>
             <crs:LuminanceAdjustmentYellow>0</crs:LuminanceAdjustmentYellow>
             <crs:LuminanceAdjustmentGreen>0</crs:LuminanceAdjustmentGreen>
             <crs:LuminanceAdjustmentAqua>0</crs:LuminanceAdjustmentAqua>
             <crs:LuminanceAdjustmentBlue>0</crs:LuminanceAdjustmentBlue>
             <crs:LuminanceAdjustmentPurple>0</crs:LuminanceAdjustmentPurple>
             <crs:LuminanceAdjustmentMagenta>0</crs:LuminanceAdjustmentMagenta>
             <crs:SplitToningShadowHue>0</crs:SplitToningShadowHue>
             <crs:SplitToningShadowSaturation>0</crs:SplitToningShadowSaturation>
             <crs:SplitToningHighlightHue>0</crs:SplitToningHighlightHue>
             <crs:SplitToningHighlightSaturation>0</crs:SplitToningHighlightSaturation>
             <crs:SplitToningBalance>0</crs:SplitToningBalance>
             <crs:ParametricShadows>0</crs:ParametricShadows>
             <crs:ParametricDarks>0</crs:ParametricDarks>
             <crs:ParametricLights>0</crs:ParametricLights>
             <crs:ParametricHighlights>0</crs:ParametricHighlights>
             <crs:ParametricShadowSplit>25</crs:ParametricShadowSplit>
             <crs:ParametricMidtoneSplit>50</crs:ParametricMidtoneSplit>
             <crs:ParametricHighlightSplit>75</crs:ParametricHighlightSplit>
             <crs:SharpenRadius>+1.0</crs:SharpenRadius>
             <crs:SharpenDetail>25</crs:SharpenDetail>
             <crs:SharpenEdgeMasking>0</crs:SharpenEdgeMasking>
             <crs:PostCropVignetteAmount>0</crs:PostCropVignetteAmount>
             <crs:GrainAmount>0</crs:GrainAmount>
             <crs:ColorNoiseReductionDetail>50</crs:ColorNoiseReductionDetail>
             <crs:LensProfileEnable>0</crs:LensProfileEnable>
             <crs:LensManualDistortionAmount>0</crs:LensManualDistortionAmount>
             <crs:PerspectiveVertical>0</crs:PerspectiveVertical>
             <crs:PerspectiveHorizontal>0</crs:PerspectiveHorizontal>
             <crs:PerspectiveRotate>0.0</crs:PerspectiveRotate>
             <crs:PerspectiveScale>100</crs:PerspectiveScale>
             <crs:AutoLateralCA>0</crs:AutoLateralCA>
             <crs:Exposure2012>-1.30</crs:Exposure2012>
             <crs:Contrast2012>-25</crs:Contrast2012>
             <crs:Highlights2012>0</crs:Highlights2012>
             <crs:Shadows2012>0</crs:Shadows2012>
             <crs:Whites2012>+2</crs:Whites2012>
             <crs:Blacks2012>-9</crs:Blacks2012>
             <crs:Clarity2012>0</crs:Clarity2012>
             <crs:DefringePurpleAmount>0</crs:DefringePurpleAmount>
             <crs:DefringePurpleHueLo>30</crs:DefringePurpleHueLo>
             <crs:DefringePurpleHueHi>70</crs:DefringePurpleHueHi>
             <crs:DefringeGreenAmount>0</crs:DefringeGreenAmount>
             <crs:DefringeGreenHueLo>40</crs:DefringeGreenHueLo>
             <crs:DefringeGreenHueHi>60</crs:DefringeGreenHueHi>
             <crs:ConvertToGrayscale>False</crs:ConvertToGrayscale>
             <crs:ToneCurveName2012>Linear</crs:ToneCurveName2012>
             <crs:ToneCurvePV2012>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012>
             <crs:ToneCurvePV2012Red>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Red>
             <crs:ToneCurvePV2012Green>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Green>
             <crs:ToneCurvePV2012Blue>
                <rdf:Seq>
                   <rdf:li>0, 0</rdf:li>
                   <rdf:li>255, 255</rdf:li>
                </rdf:Seq>
             </crs:ToneCurvePV2012Blue>
             <crs:CameraProfile>Adobe Standard</crs:CameraProfile>
             <crs:CameraProfileDigest>3CE8523BCEA625D0F0ABABADE3BCC281</crs:CameraProfileDigest>
             <crs:LensProfileSetup>LensDefaults</crs:LensProfileSetup>
             <crs:HasSettings>True</crs:HasSettings>
             <crs:HasCrop>False</crs:HasCrop>
             <crs:AlreadyApplied>True</crs:AlreadyApplied>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:tiff="http://ns.adobe.com/tiff/1.0/">
             <tiff:XResolution>240/1</tiff:XResolution>
             <tiff:YResolution>240/1</tiff:YResolution>
             <tiff:ResolutionUnit>2</tiff:ResolutionUnit>
             <tiff:Make>Canon</tiff:Make>
             <tiff:Model>Canon EOS-1D Mark IV</tiff:Model>
          </rdf:Description>
          <rdf:Description rdf:about=""
                xmlns:exif="http://ns.adobe.com/exif/1.0/">
             <exif:ExifVersion>0221</exif:ExifVersion>
             <exif:PixelXDimension>4896</exif:PixelXDimension>
             <exif:PixelYDimension>3264</exif:PixelYDimension>
             <exif:DateTimeOriginal>2012-12-16T17:11:53</exif:DateTimeOriginal>
             <exif:ExposureTime>1/30</exif:ExposureTime>
             <exif:FNumber>28/10</exif:FNumber>
             <exif:ExposureProgram>2</exif:ExposureProgram>
             <exif:ISOSpeedRatings>
                <rdf:Seq>
                   <rdf:li>3200</rdf:li>
                </rdf:Seq>
             </exif:ISOSpeedRatings>
             <exif:ShutterSpeedValue>4906891/1000000</exif:ShutterSpeedValue>
             <exif:ApertureValue>2970854/1000000</exif:ApertureValue>
             <exif:ExposureBiasValue>0/1</exif:ExposureBiasValue>
             <exif:MaxApertureValue>3/1</exif:MaxApertureValue>
             <exif:MeteringMode>5</exif:MeteringMode>
             <exif:Flash rdf:parseType="Resource">
                <exif:Fired>False</exif:Fired>
                <exif:Return>0</exif:Return>
                <exif:Mode>2</exif:Mode>
                <exif:Function>False</exif:Function>
                <exif:RedEyeMode>False</exif:RedEyeMode>
             </exif:Flash>
             <exif:FocalLength>64/1</exif:FocalLength>
             <exif:FocalPlaneXResolution>4896000/1290</exif:FocalPlaneXResolution>
             <exif:FocalPlaneYResolution>3264000/836</exif:FocalPlaneYResolution>
             <exif:FocalPlaneResolutionUnit>2</exif:FocalPlaneResolutionUnit>
             <exif:CustomRendered>0</exif:CustomRendered>
             <exif:ExposureMode>0</exif:ExposureMode>
             <exif:WhiteBalance>0</exif:WhiteBalance>
             <exif:SceneCaptureType>0</exif:SceneCaptureType>
             <exif:SubSecTime>00</exif:SubSecTime>
             <exif:SubSecTimeOriginal>00</exif:SubSecTimeOriginal>
             <exif:SubSecTimeDigitized>00</exif:SubSecTimeDigitized>
             <exif:SerialNumber>720600641</exif:SerialNumber>
             <exif:LensInfo>
                <rdf:Seq>
                   <rdf:li>24/1</rdf:li>
                </rdf:Seq>
             </exif:LensInfo>
             <exif:Lens>EF24-70mm f/2.8L USM</exif:Lens>
          </rdf:Description>
       </rdf:RDF>
    </x:xmpmeta>
    Message was edited by: JJMack

  • Help Needed in Set based query

    Hi,
    Version : sqlserver 2008 R2
    sample data to play with,
    declare @Address table(Id int primary key identity(1,1),Address varchar(100),city varchar(20),State varchar(20))
    insert into @Address
    select '123 sheril street, Newyork,NY','Newyork','NY' union all
    select '333 bamboo street, Manhattan,NY', null,null union all
    select '123 merrit street, Albany,NY','Albany','NY' union all
    select '123 shego street, Buffalo,NY',null,null
    This is just sample data. i have around 100000 address for different city and states.Basically i need to remove the city and state from address
    Here is what i need to achieve,
    1. Get the city,state check exists on address column if found then remove the city and state. if not leave it as it.
    2. If the city and state column is null and if that is present in address column then remove that from address column and update it in city and state column
    respectively.
    Is this possible to achieve without cursor or looping? any sample query please .
    loving dotnet

    This gets you part of the way there.  You'll have to perform your own logic to determine if you want to update the address field or not.  I attached a split function that I found online, you'll need that to get the desired results.
    declare @Address table(Id int primary key identity(1,1),Address varchar(100),city varchar(20),State varchar(20))
    insert into @Address
    select '123 sheril street, Newyork,NY','Newyork','NY' union all
    select '333 bamboo street, Manhattan,NY', null,null union all
    select '123 merrit street, Albany,NY','Albany','NY' union all
    select '123 shego street, Buffalo,NY',null,null
    ;with parts as
    select a.Id, LTRIM(RTRIM(ISNULL(foo.Item,''))) as Item
    from @address a
    CROSS APPLY DBO.SplitStrings_Moden(a.Address, ',') as foo
    [rows] as
    select id, [1] as [Address], [2] as [City], [3] as [State]
    FROM
    select Id, Item, ROW_NUMBER() over(partition by id order by id) as rowNumber
    from parts
    ) a
    PIVOT (max(Item) for rowNumber in ([1], [2], [3])) as pvt
    merge into @Address as Target
    using rows as Source
    ON (Target.Id = Source.Id)
    WHEN MATCHED THEN
    UPDATE SET
    Target.Address = Source.Address,
    Target.City = Source.City,
    Target.State = Source.State;
    select * From @Address
    ALTER FUNCTION dbo.SplitStrings_Moden
    @List NVARCHAR(MAX),
    @Delimiter NVARCHAR(255)
    RETURNS TABLE
    WITH SCHEMABINDING AS
    RETURN
    WITH E1(N) AS ( SELECT 1 UNION ALL SELECT 1 UNION ALL SELECT 1 UNION ALL SELECT 1
    UNION ALL SELECT 1 UNION ALL SELECT 1 UNION ALL SELECT 1
    UNION ALL SELECT 1 UNION ALL SELECT 1 UNION ALL SELECT 1),
    E2(N) AS (SELECT 1 FROM E1 a, E1 b),
    E4(N) AS (SELECT 1 FROM E2 a, E2 b),
    E42(N) AS (SELECT 1 FROM E4 a, E2 b),
    cteTally(N) AS (SELECT 0 UNION ALL SELECT TOP (DATALENGTH(ISNULL(@List,1)))
    ROW_NUMBER() OVER (ORDER BY (SELECT NULL)) FROM E42),
    cteStart(N1) AS (SELECT t.N+1 FROM cteTally t
    WHERE (SUBSTRING(@List,t.N,1) = @Delimiter OR t.N = 0))
    SELECT Item = SUBSTRING(@List, s.N1, ISNULL(NULLIF(CHARINDEX(@Delimiter,@List,s.N1),0)-s.N1,8000))
    FROM cteStart s;

Maybe you are looking for