fpt - Example Report: Sub-program Interfaces
The report shows the sub-programs in an fpt project, their arguments and the interfaces between them through memory shared in COMMON blocks.
The fpt command to generate the report is:
Sub-program Listing =================== Subroutine SUBROUTINE DATE Sub-program code not available ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxerr.for SUBROUTINE A05525(I12624,I12625,I12626,A12627) Arguments ETYPE ERRPAR Formal Input Argument INTEGER *2 ECLASS ERRPAR Formal Input Argument INTEGER *2 ESEVER ERRPAR Formal Input Argument INTEGER *2 ECHOL ERRPAR Formal Input Argument LOGICAL *1 Shared Memory Interfaces for: ERRPAR ==================================== COMMON /PARCHR/ is shared Objects imported into ERRPAR ---------------------------- Name Address Size ---- ------- ---- REC 0 132 Total size 132 Objects exported from ERRPAR ---------------------------- None COMMON /PARLOG/ is shared Objects imported into ERRPAR ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 Total size 1 Objects exported from ERRPAR ---------------------------- None COMMON /PARNUM/ is shared Objects imported into ERRPAR ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 IREC 10 2 ERCT 1596 8 LINE 1616 2 Total size 16 Objects exported from ERRPAR ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 Total size 12 Grand total memory imported: 149 Grand total memory exported: 12 ------------------------------------------------------------------------------- Subroutine Line: 140, File: l:\mps\gnx\gnx\gnxerr.for SUBROUTINE A06304(I12624,I12625,I12626,I00694) Arguments ETYPE ERRSCL Formal Input Argument INTEGER *2 ECLASS ERRSCL Formal Input Argument INTEGER *2 ESEVER ERRSCL Formal Input Argument INTEGER *2 S ERRSCL Formal Input Argument INTEGER *2 Shared Memory Interfaces for: ERRSCL ==================================== COMMON /PARCHR/ is shared Objects imported into ERRSCL ---------------------------- None Objects exported from ERRSCL ---------------------------- None COMMON /PARLOG/ is shared Objects imported into ERRSCL ---------------------------- Name Address Size ---- ------- ---- SCLERR 3 1 Total size 1 Objects exported from ERRSCL ---------------------------- None COMMON /PARNUM/ is shared Objects imported into ERRSCL ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 Total size 12 Objects exported from ERRSCL ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 Total size 12 Grand total memory imported: 13 Grand total memory exported: 12 ------------------------------------------------------------------------------- Subroutine SUBROUTINE EXIT Sub-program code not available ------------------------------------------------------------------------------- Program Line: 2, File: l:\mps\gnx\gnx\gnx.for PROGRAM A00738 Shared Memory Interfaces for: GNX ================================= Grand total memory imported: 0 Grand total memory exported: 0 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxend.for SUBROUTINE A00760 No arguments Shared Memory Interfaces for: GNXEND ==================================== COMMON /PARCHR/ is shared Objects imported into GNXEND ---------------------------- Name Address Size ---- ------- ---- REC 0 132 OUTFIL 320 60 HEDSYM 420 80 Total size 272 Objects exported from GNXEND ---------------------------- Name Address Size ---- ------- ---- OUTFC 320 60 Total size 60 COMMON /PARLOG/ is shared Objects imported into GNXEND ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 Total size 1 Objects exported from GNXEND ---------------------------- None COMMON /PARNUM/ is shared Objects imported into GNXEND ---------------------------- Name Address Size ---- ------- ---- PRSTAT 0 10 STIME 0 4 NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 STMT 18 2 TERM 40 2 LTERM 42 2 FILEX 62 2 IFORM 208 512 SFORM 208 256 FLX 720 256 SETFL 1564 28 ERCT 1596 8 LINE 1616 2 NFORCH 1658 4 NINTEX 1662 2 NIOCST 1664 2 NSCALE 1668 2 NMETHO 1670 2 NCONST 1672 2 NPARAM 1674 2 NREALS 1676 2 NTEXTS 1678 2 NFILES 1680 2 Total size 1114 Objects exported from GNXEND ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 TERM 40 2 LTERM 42 2 IFORM 208 512 SFORM 208 256 SETFL 1564 28 ERCT 1596 8 Total size 812 Grand total memory imported: 1387 Grand total memory exported: 872 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxini.for SUBROUTINE A00756 No arguments Shared Memory Interfaces for: GNXINI ==================================== COMMON /PARCHR/ is shared Objects imported into GNXINI ---------------------------- Name Address Size ---- ------- ---- REC 0 132 INFILE 260 60 INFC 260 60 OUTFIL 320 60 Total size 312 Objects exported from GNXINI ---------------------------- Name Address Size ---- ------- ---- REC 0 132 SREC 1 136 TITST 132 128 INFILE 260 60 INFC 260 60 OUTFIL 320 60 OUTFC 320 60 HEADST 420 80 HDFILE 440 60 Total size 776 COMMON /PARLOG/ is shared Objects imported into GNXINI ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 Total size 1 Objects exported from GNXINI ---------------------------- Name Address Size ---- ------- ---- DELF 0 1 LABF 1 1 SCLERR 3 1 OBSOLF 4 1 WARNGF 6 1 SCALEF 7 1 NUMBRF 8 1 IOCUSE 9 128 PARLCK 137 2000 Total size 2135 COMMON /PARNUM/ is shared Objects imported into GNXINI ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 IREC 10 2 ERCT 1596 8 LINE 1616 2 Total size 16 Objects exported from GNXINI ---------------------------- Name Address Size ---- ------- ---- STIME 0 4 NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 INF 14 2 STMT 18 2 SEARCH 24 2 PSIGN 28 2 NSIGN 30 2 KEYWD 32 2 DANAME 34 2 SYMC 36 2 RPCT 38 2 TERM 40 2 LTERM 42 2 IGNXDA 44 2 LPC 46 2 BRC 56 2 VMETHO 60 2 FILEX 62 2 SETFL 1564 28 ERCT 1596 8 LINE 1616 2 NEXTKW 1622 2 VNINTG 1624 2 NINTEX 1662 2 NIOCST 1664 2 NIODSP 1666 2 NSCALE 1668 2 NMETHO 1670 2 NCONST 1672 2 NPARAM 1674 2 NREALS 1676 2 NTEXTS 1678 2 NFILES 1680 2 LOCK 1684 2 RUNNXT 1686 2 INTNXT 1688 2 TXTPTR 201694 40008 TXTNXT 490910 28 Total size 40148 Grand total memory imported: 329 Grand total memory exported: 43059 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxpar.for SUBROUTINE A00754 No arguments Shared Memory Interfaces for: GNXPAR ==================================== COMMON /PARCHR/ is shared Objects imported into GNXPAR ---------------------------- Name Address Size ---- ------- ---- REC 0 132 SREC 1 136 CHKSTR 129 8 INFILE 260 60 INFC 260 60 SYM 380 40 SB 380 1 SYMB 380 40 STR 380 8 STR3 380 3 PARSTR 380 10 C 500 1 B 500 1 Total size 500 Objects exported from GNXPAR ---------------------------- Name Address Size ---- ------- ---- SREC 1 136 INFILE 260 60 INFC 260 60 SYM 380 40 SYMB 380 40 STR 380 8 PARSTR 380 10 C 500 1 B 500 1 FORTXT 501 1000000 LOCKST 1000501 12 PARTAB 1000513 20000 Total size 1020368 COMMON /PARLOG/ is shared Objects imported into GNXPAR ---------------------------- Name Address Size ---- ------- ---- DELF 0 1 LABF 1 1 OBSOLF 4 1 WARNGF 6 1 SCALEF 7 1 NUMBRF 8 1 IOCUSE 9 128 Total size 134 Objects exported from GNXPAR ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 PARLCK 137 2000 Total size 2001 COMMON /PARNUM/ is shared Objects imported into GNXPAR ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 INF 14 2 STMT 18 2 SEARCH 24 2 SYMDEX 26 2 PSIGN 28 2 NSIGN 30 2 KEYWD 32 2 DANAME 34 2 SYMC 36 2 RPCT 38 2 TERM 40 2 LTERM 42 2 IGNXDA 44 2 LPC 46 2 BRC 56 2 VMETHO 60 2 IFORM 208 512 FLX 720 256 KFL 976 332 ARPTEM 1308 32 ARPINP 1340 96 ARPOUT 1436 48 ARPSAV 1484 32 ARPDAT 1516 48 VBPTSE 1584 2 VAER 1586 2 ERCT 1596 8 APA 1604 14 LINE 1616 2 NEXTKW 1622 2 VNINTG 1624 2 GNXLIN 1626 16 GNXQAD 1642 16 NINTEX 1662 2 NIOCST 1664 2 NIODSP 1666 2 NSCALE 1668 2 NMETHO 1670 2 NCONST 1672 2 NPARAM 1674 2 NREALS 1676 2 NTEXTS 1678 2 NFILES 1680 2 LOCK 1684 2 RUNNXT 1686 2 INTNXT 1688 2 R4 1690 4 IODOPS 242902 8 CONPTR 326910 80000 TXTNXT 490910 28 Total size 81526 Objects exported from GNXPAR ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 STMT 18 2 SYMDEX 26 2 TERM 40 2 LTERM 42 2 IFORM 208 512 FLX 720 256 SETFL 1564 28 ERCT 1596 8 APA 1604 14 LINE 1616 2 NFORCH 1658 4 NINTEX 1662 2 NIOCST 1664 2 NSCALE 1668 2 NMETHO 1670 2 NCONST 1672 2 NPARAM 1674 2 NREALS 1676 2 NTEXTS 1678 2 NFILES 1680 2 R4 1690 4 CFFPTR 1694 200000 TXTPTR 201694 40008 IOCCCH 241702 1200 SCLPTR 242910 80000 METPTR 322910 4000 CONPTR 326910 80000 PARPTR 406910 4000 RELTAB 410910 80000 FILPTR 490938 4000 Total size 494070 Grand total memory imported: 82160 Grand total memory exported: 1516439 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxrea.for SUBROUTINE A00750 No arguments Shared Memory Interfaces for: GNXREA ==================================== COMMON /PARCHR/ is shared Objects imported into GNXREA ---------------------------- Name Address Size ---- ------- ---- REC 0 132 SYM 380 40 SYMB 380 40 Total size 212 Objects exported from GNXREA ---------------------------- None COMMON /PARLOG/ is shared Objects imported into GNXREA ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 Total size 1 Objects exported from GNXREA ---------------------------- None COMMON /PARNUM/ is shared Objects imported into GNXREA ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 IREC 10 2 CI 20 2 ERCT 1596 8 LINE 1616 2 R4 1690 4 Total size 22 Objects exported from GNXREA ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 R4 1690 4 Total size 16 Grand total memory imported: 235 Grand total memory exported: 16 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxrel.for SUBROUTINE A00748 No arguments Shared Memory Interfaces for: GNXREL ==================================== COMMON /PARCHR/ is shared Objects imported into GNXREL ---------------------------- Name Address Size ---- ------- ---- REC 0 132 OUTFIL 320 60 SYM 380 40 SB 380 1 SYMB 380 40 STR 380 8 RDATE 420 9 RTIME 430 8 HDFILE 440 60 C 500 1 B 500 1 FORTXT 501 1000000 PARTAB 1000513 20000 Total size 1020360 Objects exported from GNXREL ---------------------------- Name Address Size ---- ------- ---- OUTFC 320 60 SYM 380 40 SYMB 380 40 STR 380 8 PARSTR 380 10 C 500 1 B 500 1 Total size 160 COMMON /PARLOG/ is shared Objects imported into GNXREL ---------------------------- Name Address Size ---- ------- ---- SCLERR 3 1 WARNGF 6 1 Total size 2 Objects exported from GNXREL ---------------------------- None COMMON /PARNUM/ is shared Objects imported into GNXREL ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 SYMDEX 26 2 FILEX 62 2 FLX 720 256 ERCT 1596 8 LINE 1616 2 NINTEX 1662 2 NSCALE 1668 2 NCONST 1672 2 NPARAM 1674 2 CFFPTR 1694 200000 TXTPTR 201694 40008 SCLPTR 242910 80000 CONPTR 326910 80000 Total size 400294 Objects exported from GNXREL ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 SYMDEX 26 2 ERCT 1596 8 CONPTR 326910 80000 Total size 80014 Grand total memory imported: 1420656 Grand total memory exported: 80174 ------------------------------------------------------------------------------- Subroutine Line: 2, File: l:\mps\gnx\gnx\gnxsda.for SUBROUTINE A00746 No arguments Shared Memory Interfaces for: GNXSDA ==================================== COMMON /PARCHR/ is shared Objects imported into GNXSDA ---------------------------- Name Address Size ---- ------- ---- REC 0 132 OUTFIL 320 60 RDATE 420 9 RTIME 430 8 HDFILE 440 60 FORTXT 501 1000000 LOCKST 1000501 12 PARTAB 1000513 20000 Total size 1020281 Objects exported from GNXSDA ---------------------------- Name Address Size ---- ------- ---- OUTFC 320 60 Total size 60 COMMON /PARLOG/ is shared Objects imported into GNXSDA ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 PARLCK 137 2000 Total size 2001 Objects exported from GNXSDA ---------------------------- None COMMON /PARNUM/ is shared Objects imported into GNXSDA ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 NSYM 8 2 IREC 10 2 FILEX 62 2 ERCT 1596 8 LINE 1616 2 NIOCST 1664 2 NMETHO 1670 2 NPARAM 1674 2 NFILES 1680 2 R4 1690 4 TXTPTR 201694 40008 IOCCCH 241702 1200 METPTR 322910 4000 PARPTR 406910 4000 RELTAB 410910 80000 FILPTR 490938 4000 Total size 133240 Objects exported from GNXSDA ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 R4 1690 4 Total size 16 Grand total memory imported: 1155522 Grand total memory exported: 76 ------------------------------------------------------------------------------- Subroutine Line: 1125, File: l:\mps\gnx\gnx\gnxrel.for SUBROUTINE A06317(I05556,I06358) Arguments TXT GNXTXT Formal Input-Output Argument INTEGER *2 TXTEND GNXTXT Formal Input Argument INTEGER *4 Shared Memory Interfaces for: GNXTXT ==================================== COMMON /PARCHR/ is shared Objects imported into GNXTXT ---------------------------- Name Address Size ---- ------- ---- REC 0 132 FORTXT 501 1000000 Total size 1000132 Objects exported from GNXTXT ---------------------------- None COMMON /PARLOG/ is shared Objects imported into GNXTXT ---------------------------- Name Address Size ---- ------- ---- WARNGF 6 1 Total size 1 Objects exported from GNXTXT ---------------------------- None COMMON /PARNUM/ is shared Objects imported into GNXTXT ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 IREC 10 2 ERCT 1596 8 LINE 1616 2 TXTPTR 201694 40008 Total size 40024 Objects exported from GNXTXT ---------------------------- Name Address Size ---- ------- ---- NDIAG 4 2 WSEVER 6 2 ERCT 1596 8 Total size 12 COMMON /PRCOM/ is shared Objects imported into GNXTXT ---------------------------- Name Address Size ---- ------- ---- USER 0 4 Total size 4 Objects exported from GNXTXT ---------------------------- Name Address Size ---- ------- ---- USER 0 4 Total size 4 Grand total memory imported: 1040161 Grand total memory exported: 16 ------------------------------------------------------------------------------- Subroutine SUBROUTINE TIME Sub-program code not available -------------------------------------------------------------------------------
Copyright ©1995 to 2024 Software Validation Ltd. All rights reserved.