Lösa Felet Med Returkoden För En Persons Cobol-anropssystem

Du kan hitta ett felmeddelande som anger COBOL-returkoden från den anropande människokroppen. Det finns flera sätt att eliminera detta problem. Vi återkommer till detta inom kort.

Det finns ingen anledning att lida av PC-problem längre! Med Reimage kan du enkelt och snabbt reparera vanliga Windows-fel och optimera ditt system för maximal prestanda.

Den omvända billetkoden ställs in baserat på en aspekt av arbetstillståndet på vår arbetsstation. Returkoden kan bli ett tal mellan 0 (framgång) sedan 4095 (ett värde som inte är noll indikerar ett mycket fel).

Del 1-svar: NEJ, för närvarande har inget av våra CALL möjlighet att inkluderas i återkomsten med värde.

Svaret är del utom 2: att du kan vara utgången med ett faktiskt visst alternativ.

Vad är skolans returkod?

Specialregistret RETURN-CODE kommer definitivt ibland att användas för att förmedla information om returkoden (dvs. nummervärde) för ett verkligt program som dess anropare skulle göra (antingen gör du bara programmet eller systemet). Du kan specifikt ställa in RETURN CODE innan du kör en EXIT PROGRAM-, GOBACK- eller STOP RUN-sats.

Förklaring till ranson 1:”Returvärden” är vanligtvis ett betydande heltal som skickas genom en speciell bandbreddstjänst RETURN-CODE och/eller med namnet RETURNING (i vissa implementeringar kan du göra det som du vill ha ökad mottagningspekare som behövs): en CALL someprog RETURNING Something, se COBOL-specifikationerna för CALL.

call network cobol returkod

Förklaring för region 2:Vad du kan göra är att skapa någon form av återgång till kanalen och läsa vidare därifrån, antingen med ett enda inkontinenssamtal eller med någon form av utvecklarspecifik anknytning.

Med ACUCOBOL eller MicroFocus [och välj till andra] kan du använda flöden med kontinuerlig filåtkomst – se Steven Jannards diskussion för mer information om MicroFocus och svar om huvudmålet med att arbeta med ACUCOBOL.

Hur skapar jag min COBOL reunite-kod?

Specialregistret RETURN-CODE kan sättas på plats för att skicka en returkod så att det kommer till vårt eget anropsprogram eller operativa system efter att det aktuella COBOL-utbildningsprogrammet har avslutats. När ett COBOL-verktyg avslutas: När Reduce återgår till själva operativsystemetmu, skickas heltalsvärdet som är kopplat till RETURN-CODE-skapandets specialprogram till operativsystemet i användarens returkod.

Du borde skapa en namngiven pipe medan Unix med CALL 'SYSTEM', en lösning för att läsa detta är dokumenterad GnuCOBOL FAQ -> Named Pipes, att skapa det fungerar vanligtvis som följande, använd en pipe, läs den direkt från C-gränssnittet.< /p>

Ett exempel på en pipe-implementation som användes för det föregående på grund av C-gränssnittet också COBOL-omslag är web-pipes (MF stöder utan tvekan användardefinierade funktioner, så vanligtvis skulle cobweb-pipes.cob förmodligen fungera mer eller mindre mängden oförändrad (om du testar det, glöm normalt att svara med en enda kommentar), annars är det förmodligen väldigt praktiskt – arbeta med cobweb-call-pipes.cob.

Tillägg i ACUCOBOL kommer från SEKVENTIAL-filer, som börjar med -P i bara varje tilldelat filnamn:

 Programidentifierare. dirkmuzhas.      valt i cmd     - Fönster:         kontraktera ut "-P %TMP% cmd.exe /c dir > %TMP%"      Unix:    3 . använd externa byråer för "-P label vii -l"         Organisationen anses konsekvent.      fd i-kommando.      '08 i-cmd x(80) bildfångst.      åtskillnad om förfaranden.          Öppna i-cmd-posten          kör perfekt fram till utgång           Läs i-cmd            avsluta användningen               göra en mycket utgång           slut om läsning           tv-program i-cmd-post          slutförd prestation          Bästa i-cmd          kommit i det förflutna till.

Problem:

Micro Focus Server Express och Visual COBOL ger ett nyare sätt att anropa UNIX-kommandon långt från COBOL. Detta uppnås vackert vid anropet av en subrutin som heter SYSTEM. Individuella Unix-kommandon som “ls” tillsammans med “pwd” kan anropas härnäst, liksom hela skalskript eller körbara tekniker kan anropas. Hur upptäcker man returkoden från ett UNIX-kommando och skickar tillbaka den till COBOL?

Lösning:

Lid inte längre av Windows-fel.

Reimage är det ultimata reparationsverktyget för din PC. Den diagnostiserar och reparerar inte bara olika Windows-problem, utan den ökar också systemprestandan, optimerar minnet, förbättrar säkerheten och finjusterar din dator för maximal tillförlitlighet - allt med en enkel nedladdning och installation. Lita på Reimage för att få din dator igång igen på nolltid!

  • Steg 1: Öppna Reimage-programvaran
  • Steg 2: Klicka på "Starta skanning"
  • Steg 3: Klicka på "Reparera nu" för att starta reparationsprocessen

  • Faktiskt, här är ett exempel på ett annat COBOL-anrop för ett UNIX-kommando:


    RINGAR "SYSTEM" MED CMD-LINE.

    “SYSTEM” (versaler) innehåller COBOL och skärmen lokal på terminalen, som någon kan se, anropar rutinen UNIX system() (gemener) och återställer sedan extremt COBOL och skärmen vid förutsebart framtida. Se specifik system(3) man-sida för mer information med “system”. Det är fullt möjligt att kontakta det (lilla) “systemet” som tillhandahålls av COBOL, men då överlever inte cobol-skärmen och kommer att visa höljet som är trasigt.

    Hur återställer du data till det anropade programmet från att anropa programmet?

    Du måste initiera datamedlemmen PROCEDURE DIVISION RETURNING i varje anropat program innan kunder får tillgång till företagets värde. Värdet i vilket allt returneras till anropsperioden är det slutliga värdet av flera PROCEDURE DIVISION RETURNING data ornament närhelst du är det anropade programmet returnerar.

    För att returnera statistik – COBOL från en UNIX-laddning, ta emot kommandot, skriv data för att spara filen och följt av låt COBOL gå igenom registret. Till exempel, anropa “SYSTEM” som innehåller “ls -l >lsout.txt” tillsammans med Code Write COBOL, som öppnar “lsout.txt” som praktiskt taget vilken sekventiell onlinefil som helst och till och med anger rad för rad.

    call system cobol returkod

    COBOL kunde få en returkod från detta användbara unix-kommando. Detta är dock definitivt inte bara ett speciellt RETURN-CODE-register, och/eller kanske en valfri RETURNING-sats i en a CALL-sats; istället är det mycket infogat en byte i dessa ett antal värden och måste hämtas. En exempelkod kan illustreras här:

    --------- Datafil "test.sh" --------
    Echo "Test.sh körs faktiskt"
    Echo "Ange kod" < sovrum >Läs om rtncode
    avsluta $rtncode

    --------- rapport "callsys.cbl" -------
    000001 punkt i arbetsminnet.
    000002 01 returkoder -ws pic s9(8) comp - 5 .
    000003 juli platshållare åsidosätter ws leveranskod.
    000004 $if little-endian set
    000005 05 produkt och även bild.
    000006 05 image high byte s9 pay - 5 .
    000007 05 ersätt bild x.
    000008 05 bild mycket prisvärd byte s9 comp-5.$else
    000010
    000009 05 avancerad kameraprodukt xx.

    Denna programvara är betrodd av över 30 miljoner användare över hela världen. Prova det gratis idag.

    Solving The Problem With The Return Code Of The Cobol Calling System
    Resolviendo El Problema Gracias Al Código De Retorno Del Sistema De Llamadas Cobol
    Решение проблемы с кодом заработка системы связи Cobol с нами
    Cobol 호출 시스템에 연결된 반환 코드로 자체 문제 해결
    Résoudre Le Problème Avec Le Code De Retour De Votre Système D'appel Cobol Actuel
    Rozwiązywanie Problemu Z Aktualnym Kodem Zwrotnym Systemu Nazewnictwa Cobol
    De Hoofdpijn Oplossen Met De Retourcode Van Ongetwijfeld Het Cobol-oproepsysteem
    Lösung Des Problems Mit Dem Rückgabecode Des Cobol-Aufrufsystems
    Risolvere Il Problema Con Il Codice Di Ritorno Del Sistema Di Chiamata Cobol Stesso
    Resolvendo A Situação Com O Código De Retorno Inquestionavelmente Do Sistema De Chamada Cobol