XU8P137 ;SF/CIOFO-JDS Post Init for XU*8*137 ;02/18/2000 10:18 [ 03/13/2003 1:26 PM ]
Source file <XU8P137.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | FILE^DIE ENALL^DIK | 
| Kernel | 1 | MES^XPDUTL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| P2 | ; | |
| P3 | ; | |
| EN | ||
| P4 | ; | |
| PATCH | ; ; Search Patch Application History in the PACKAGE file ; for entries that contain version number_"*"_patch number_ ; sequence number. The PAH field should only have ; patch number_sequence number for released patches. ; If a "*" is found it will be removed leaving patch and sequence ; numbers. | |
| STATE | ; ; This routine will remove the following corrupt DD nodes ; and Xref that reference Field #3 (COUNTY) of File #5 (STATE): | |
| P1 | ; | |
| MMXREF | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD(5 | P1+1, P1+4!, P2+1, P2+4!, P3+1, P3+4! | 
| ^DIC(5 - [#5] | P4+1, P4+4! | 
| ^DIC(9.4 - [#9.4] | PATCH+10, PATCH+12, PATCH+14, PATCH+15 | 
| Name | Line Occurrences | 
|---|---|
| MMXREF | EN+2 | 
| PATCH | EN | 
| STATE | EN+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DIK | MMXREF+1~, MMXREF+2* | 
| DIK(1 | MMXREF+2* | 
| PAHCOMM | PATCH+8~, PATCH+15*, PATCH+16, PATCH+17*, PATCH+19 | 
| PAHXX | PATCH+8~, PATCH+18!, PATCH+21! | 
| PAHXX( | PATCH+19* | 
| X | PATCH+8~, PATCH+10*, PATCH+12, PATCH+14, PATCH+15, PATCH+19, P1+3*, P2+3*, P3+3*, P4+3* , P4+5* | 
| Y | PATCH+8~, PATCH+12*, PATCH+14, PATCH+15, PATCH+19 | 
| Z | PATCH+8~, PATCH+14*, PATCH+15, PATCH+19 | 
| ZZS0 | STATE+9~, STATE+10*, P1+2*, P2+2*, P3+2*, P4+2*, P4+5, P4+6! |