SDWLIFT ;IOFO BAY PINES/OG - INTER-FACILITY TRANSFER: CONTROL RESPONSES;Compiled March 29, 2005 15:36:25 ; Compiled January 25, 2007 09:47:44 ; Compiled April 16, 2007 10:12:05
Source file <SDWLIFT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MSGSVR | ;xfer message server
|
|
| MSGSVRAR | ;Acknowledge request
|
|
| MSGSVRRA | ;Removal acknowledgement
|
|
| MSGSVRAC | ;Acceptance notification.
|
|
| MSGSVRRJ | ;Rejection notification.
|
|
| MSGSVRSC | ;Status changed
|
|
| COL80(SDWLX) | ;Stop lines going over 80 columns.
|
|
| RMSG | ;load message into local array
|
|
| ERR(SDWLX) | ;send error message to developer
|
|
| GETTN(SDWLINFO) | ;Get transfer id.
|
|
| EXMNU | ||
| ENMNU |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | FIND1^DIC, GET1^DIQ |
| ^SDWL(409.3 - [#409.3] | Classic Fileman Calls |
| ^SDWL(409.35 - [#409.35] | Classic Fileman Calls, GET1^DIQ, GETS^DIQ |
| ^SDWL(409.36 - [#409.36] | Classic Fileman Calls |
