Author Topic: Calling a cobol external routine from quick (hp3000)  (Read 1564 times)

Offline richardg

  • Associate
  • **
  • Join Date: Mar 2014
  • Posts: 2
  • Forum Citizenship: +0/-0
Calling a cobol external routine from quick (hp3000)
« on: 25 Mar 2014 07:45:10 am »
I am running an external cobol routine that resides in an xl from quick passing a buffer called cv2-parms

This buffer is 166 bytes and is set before the routine is called

TEMP cv-8 CHARACTER*8
TEMP cv-118 CHARACTER*118
TEMP cv-40 CHARACTER*40


In the postfind procedure

LET cv-8 = "  F     "
LET cv-118 = ""
LET cv-40 = action-cd

LET cv2-parms = cv-8 + cv-118 + cv-40

DO EXTERNAL cv3decrypt PASSING cv2-parms

After the external the buffer should hold certain data to be used by powerhouse.

The cobol programmer tells that when the buffer is read by the cobol routine it contains what look like control characters.

Can anyone give me some advice please.

Offline MFGF

  • Never knowingly correct
  • Super Moderator
  • Statesman
  • ******
  • Join Date: Jul 2005
  • Posts: 10,362
  • Forum Citizenship: +624/-10
  • Cognos Software Muppet
Re: Calling a cobol external routine from quick (hp3000)
« Reply #1 on: 01 Apr 2014 08:38:14 am »
Hi,

I would try replacing action-cd with a literal and see if the value is being passed correctly. If so, then it's the contents of action-cd that are messing things up - you could perhaps try to truncate or pack it to see if that makes a difference?

MF.
Meep!

 


       
Twittear