Olá, estou precisando de um exemplo para Visual Cobol 4 que faça uso de fileshare, nunca utilizei alguem tem um exemplo. E o que é necessário para sua execução? Obrigado.
Hello, I need an example for Visual Cobol 4 that makes use of fileshare, never used someone has an example. And what is necessary for its execution? Thank you.
Hello Renato, thanks for the reply and sorry for the delay in returning to get very busy and the project with fileshare will be deployed more forward, but even so, the question and just put $$ and nothing has no need to enable any service? Would you have a simple program as an example? Thank you! You can answer in Portuguese that I understand!
VEJA UM EXEMPLO:
SELECT DUPLIC ASSIGN TO DISK
ORGANIZATION IS INDEXED
ACCESS MODE IS DYNAMIC
RECORD KEY IS RKEY-DUPL
LOCK MODE IS AUTOMATIC
RECORD CONTAINS 252 CHARACTERS
VALUE OF FILE-ID IS CAMINHO-DUPL *> CAMINHO-DUPL É UMA VARIÁVEL X(100)
LABEL RECORD IS STANDARD.
MOVE "$$fs3\\\172.16.0.1\MF\GERAL\SAIDAS\DUPLIC\DUPLIC.MF" TO CAMINHO-DUPL.
OPEN INPUT DUPLIC.
IF FSTATUS NOT = "00"
DISPLAY (22, 10) "ERRO DE ABERTURA - FS = " FSTATUS