QTP question.

Syed Shahul Hameed Mustaffa sshahulgm at gmail.com
Thu Aug 25 11:32:47 CDT 2005


Dear Gurus,

Quick Intro: I'm migrating PH/MPEIX application to AXIANT-4GL/WINDOWS.

Please look at the following excerpt of code.
;---------------------------------------------------------------------------------------
request Extract-Rexam-Record

access REEXAM_D IN CWDB &
       link COMPUTER_NO to COMPUTER_NO of EVENT_D IN CWDB

choose EPISODE_TYPE "EXAM"

select if CW_DATE of REEXAM_D ge RX-DATE-FR and &
          CW_DATE of REEXAM_D le RX-DATE-TO and &
          EVENT_ACRONYM of REEXAM_D eq EVENT_ACRONYM of EVENT_D

subfile $UEV_SUBFILE_PATH\CW877SF1  KEEP include     &
        COMPUTER_NO of EVENT_D,           &
        EVENT_ACRONYM of EVENT_D,         &
        COMMENTS of EVENT_D,              &
        ED_DATE of EVENT_D,               &
        CW_DATE    &
       index COMPUTER_NO ;segment COMPUTER_NO  ;<---- THIS LINE

request Create-Final-Subfile

access   COW_LOC_D  IN CWDB                          &
   link UNIT_NO to UNIT_NO of UNIT_M  IN CWDB  &
   link CLD_COMPUTER_NO to CLD_COMPUTER_NO of COW_D IN CWDB &
  link CLD_COMPUTER_NO to COMPUTER_NO of *$UEV_SUBFILE_PATH\CW877SF1
;<---- THIS LINE
;-------------------------------------------------------------------------------------

The lines I have marked as THIS LINE cannot execute without a DISAM license.
How can I rewrite this code to execute without a DISAM license.

I'd appreciate every effort to help me out in this issue.

Best Regards,
SYED.



More information about the powerh-l mailing list