ACRFPAH ;IHS/OIRM/DSD/AEF - DISPLAY PATCH APPLICATION HISTORY [ 12/13/2006 2:49 PM ]
Source file <ACRFPAH.m>
| Package | Total | Call Graph | 
|---|---|---|
| Commitment Register | 3 | ($$CVER,$$PIEN,$$VIEN)^ACRFPAH ($$NOW,$$SLDATE,QUE)^ACRFUTL PAUSE^ACRFWARN | 
| Kernel | 2 | HOME^%ZIS ^%ZISC | 
| VA Fileman | 2 | ^DIC ^DIR | 
| IHS VA Utilities | 1 | ^XBKVAR | 
| Package | Total | Caller Graph | 
|---|---|---|
| Commitment Register | 2 | ACRFMENU ACRFPAH | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PKG(ACRPIEN) | ||
| EN | ;EP -- MAIN ENTRY POINT | |
| PRT(ACRPIEN,ACRVIEN) | ||
| HDR(ACRNAME,ACRVER,ACRPAGE,ACROUT) | ||
| LSTPAT | ;ONLY GET LAST PATCH #          ;NEW CODE ACR*2.1*22.10 IM23060 | |
| CUR(X) | ;----- DISPLAY PATCH APPLICATION HISTORY FOR CURRENT VERSION | |
| CVER(X) | ;----- GET CURRENT VERSION | |
| VIEN(X,ACRPKG) | ||
| CURRENT | ;EP -- DISPLAY PATCH APPLICATION HISTORY FOR CURRENT VERSION OF ARMS | |
| PIEN(X) | ;----- GET PACKAGE IEN | |
| VER(ACRPIEN,ACRVIEN) | ||
| TXT | ;----- PRINT OPTION DESCRIPTION | |
| DQ | ;EP -- QUEUED JOB STARTS HERE | |
| SELECT | ;EP -- SELECT WHICH PACKAGE AND VERSION FOR PAH DISPLAY | |
| DESC | ;----- ROUTINE DESCRIPTION | 
| 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 | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(9.4 - [#9.4] | PRT+4, PRT+5, PRT+14, PRT+15, LSTPAT+2, LSTPAT+3, CVER+6 | 
| ^VA(200 - [#200] | PRT+20 | 
| Name | Line Occurrences | 
|---|---|
| CUR | CURRENT+2 | 
| HDR | PRT+9, PRT+21 | 
| LSTPAT | CUR+17 | 
| PKG | SELECT+7 | 
| PRT | DQ+6 | 
| SELECT | EN+3 | 
| TXT | EN+2 | 
| VER | SELECT+10 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACRBY | PRT+2~, PRT+19*, PRT+20*, PRT+25 | 
| ACRCVER | CUR+4~, CUR+11*, CUR+13, CUR+18 | 
| ACRDATA | PRT+2~, PRT+15*, PRT+16, PRT+17, PRT+19, LSTPAT+3*, LSTPAT+4 | 
| ACRDATE | PRT+2~, PRT+17*, PRT+18*, PRT+24 | 
| >> ACRLPAT | CUR+16 | 
| ACRNAME | PRT+2~, PRT+5*, PRT+9, PRT+21, HDR~, HDR+9 | 
| ACROUT | PRT+2~, PRT+7*, PRT+9, PRT+10, PRT+12*, PRT+14, PRT+21, PRT+22, LSTPAT+2, HDR~ , HDR+5* | 
| ACRPAGE | PRT+2~, PRT+6*, PRT+9, PRT+21, HDR~, HDR+5, HDR+7*, HDR+11 | 
| ACRPCH | CUR+18, PRT+2~, PRT+16*, PRT+23, LSTPAT+4* | 
| ACRPIEN | SELECT+2~, SELECT+7, SELECT+8, SELECT+10, CUR+4~, CUR+9*, CUR+11, CUR+13, PKG~, PKG+8* , VER~, VER+4, DQ+6, PRT~, PRT+4, PRT+5, PRT+14, PRT+15, LSTPAT+2, LSTPAT+3 | 
| ACRPKG | CUR+4~, VIEN~, VIEN+7 | 
| ACRVER | PRT+2~, PRT+4*, PRT+9, PRT+21, HDR~, HDR+9 | 
| ACRVIEN | SELECT+2~, SELECT+10, SELECT+11, CUR+4~, CUR+13*, VER~, VER+9*, DQ+6, PRT~, PRT+4 , PRT+14, PRT+15, LSTPAT+2, LSTPAT+3 | 
| >> ACRZ | CUR+18* | 
| >> DA(1 | VER+4*, VER+5 | 
| DIC | PKG+3~, PKG+4*, VER+3~, VER+5*, PIEN+4~, PIEN+5*, VIEN+7* | 
| DIC(0 | PKG+5*, VER+6*, PIEN+6*, VIEN+8* | 
| DIR | HDR+3~, HDR+5! | 
| DIR(0 | HDR+5* | 
| >> DTOUT | PKG+7, VER+8 | 
| >> DUOUT | PKG+7, VER+8 | 
| I | HDR+16*, TXT+2~, TXT+3* | 
| IOF | HDR+8 | 
| IOM | HDR+16 | 
| IOSL | PRT+21 | 
| IOST | HDR+5 | 
| U | PRT+4, PRT+5, PRT+16, PRT+17, PRT+19, PRT+20, LSTPAT+4, CVER+6 | 
| X | CUR~, CUR+9, PKG+3~, VER+3~, PRT+2~, PRT+13*, PRT+14*, PRT+15, LSTPAT+1*, LSTPAT+2* , LSTPAT+3, HDR+3~, PIEN~, CVER~, CVER+6, VIEN~, TXT+2~, TXT+3* | 
| Y | PKG+3~, PKG+7*, PKG+8, VER+3~, VER+8*, VER+9, HDR+3~, HDR+5, PIEN+4~, PIEN+8 , CVER+4~, CVER+5*, CVER+6*, CVER+7, VIEN+6~, VIEN+10 | 
| ZTSAVE | SELECT+2~, SELECT+15, CUR+4~, CUR+24 | 
| ZTSAVE("ACRPIEN" | SELECT+13* | 
| ZTSAVE("ACRVIEN" | SELECT+14* | 
| ZTSAVE("PIEN" | CUR+21* | 
| ZTSAVE("VIEN" | CUR+22* | 
| Name | Field # of Occurrence | 
|---|---|
| $T(DESC+I | TXT+3 |