PSOHLSN ;BIR/RTR-Send order information to OERR from file 52.41 ;10/10/94
Source file <PSOHLSN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(PLACER,STAT,COMM,PSNOO) | ;
|
|
| INIT | ||
| PID | ||
| PV1 | ||
| ORC | ||
| RXE | ||
| ZRX | ;
|
|
| SEG | ||
| SEND | ||
| SEGPAR | ;Parse out fields for sending segments to OERR that can be >245
|
|
| ERROR | ;Builds error message from PSOHLNEW, usually means we can't find order
|
|
| RERROR | ;
|
|
| DCP | ;
|
|
| REN | ;Update previous Rx on Cancel/Discontinue
|
|
| DELP | ;Delete refill requests
|
|
| SEGPARX | ;
|
|
| SEGXX | ;
|
|
| CHKOLDRX | ; when dc a pending renewal - if prior Rx is expired, set piece 19 to 1 so will update CPRS from 'renewed' to 'expired' in PSOHLSN1
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^PS(52.41 - [#52.41] | Classic Fileman Calls |
