PSN513PO ;BIR/SJA-Post install routine for patch PSN*4*513 ; 19 Jan 2017 1:20 PM
Source file <PSN513PO.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| POST | ; -- post-install entry
 | 
|
| ADD | ; -- add new menu option and update order for PSNMGR & PSN PPS MENU
 | 
|
| MSG(ITEM,PSNA) | ; -- write message
 | 
|
| PPSN | ; -- add new entry in ^PS(57.23 if it doesn't exist
 | 
|
| SETWS | ;define UPDATE_STATUS web service
 | 
|
| SETWS2 | ;
 | 
|
| SETWSQT | ;
 | 
|
| LINE | ;
 | 
|
| PSSENABL | ;
 | 
|
| PSSENAB2 | ;
 | 
|
| FILESRVR(PSNSRVR,PSNADRS,PSNPORT) | ; File a new record in file #18.12 or edit existing
 ; Input: PSNSRVR - web server name ; PSNADRS - web server address ; PSNPORT - port number ; Output: ; Function Value - Returns IEN of record on success, 0 on failure  | 
|
| SERVICE(SVCS,SRVR,SVRIEN) | ; add web service to web server
 ; Input: SVCS - web service name ; SRVR - web server name ; SVRIEN - web server ien  | 
|
| DISPERR(PSNARR,PSSMXUA2) | ; display error message
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^XOB(18.02 - [#18.02] | Classic Fileman Calls, FIND1^DIC | 
| ^XOB(18.12 - [#18.12] | Classic Fileman Calls, FIND1^DIC | 
| 18.121 | GET1^DIQ | 
| ^PS(57.23 - [#57.23] | Classic Fileman Calls |