DG53688A ;ALB/SCK - Patch DG*5.3*688 Pre-Install Utility Routine ; 5 MAR 2007
Source file <DG53688A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ; Entry point for EVENT^IVMPLOG trigger clean-up
|
|
| FIND(DGXRF,DGFLD) | ; This procedure will determine the selected x-ref's number from the DD file
; and return the number to the calling procedure ; Input ; DGXRF - Name of the cross-reference ; DGFLD - DD Field the cross-reference is stored on ; Output ; DGNUM - The number of the cross-reference ; |
|
| REMOVE(DGXRF,DGFLD,DGXNUM) | ; The procedure will delete the cross-reference from the Data Dictionary
; Input ; DGXRF - Name of the cross-reference ; DGFLD - DD Field number the cross-reference is stored on ; DGXNUM - The cross-reference number ; |
|
| FILE | ; Data Dictionary containing the cross-references to be cleaned-up
|
|
| TEXT | ; Cross-reference ID;Field Number
|
