drvedia1981, para la DLL tiene que ser:
Código:
C:\ruta_powercobol_3\cobol32.exe -WC"MESSAGE,FLAG(I),SOURCE" C:\ruta_de_tu_programa\PROGRAMA.COB > SYSOUT.txt
C:\ruta_powercobol_3\link.exe /DLL C:\ruta_de_tu_programa\PROGRAMA.OBJ C:\ruta_powercobol_3\*.lib >> SYSOUT.txt
Para llamar el programa desde el VB, es el nombre de la
PROGRAM-ID con el prefijo de guion bajo. Es decir, si tu
PROGRAM-ID es
PROGRAMA, desde VB debes llamar a
_PROGRAMA
Desde VB debes declarar la función de la siguiente manera:
Código VB:
Declare Function PROGRAMA Lib "PROGRAMA.DLL" Alias "_PROGRAMA@8" (ByRef DATA1 As String, ByRef DATA2 As Long) As Integer