XPDDCS ;SFISC/RSD - Display Checksum for a package ;05/05/2008
Source file <XPDDCS.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ;Verify checksums in Transport Global
|
|
ASK() | ;Ask if want each routine listed
|
|
EN2 | ;print from build (system)
|
|
LST1(FILE) | ;Print group
|
|
PNT(XPDFIL) | ;print
|
|
SUM(XPDR,Z,XPD,XPDBS) | ;check checksum
|
|
BEFORE(RN,SUM) | ;Check a before Checksum
|
|
CHK(Y) | ;Y=excess lines, return 1 to exit
|
|
HDR |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|