SDEC07 ;ALB/SAT,PC,KML,MGD,LAB,TJB/BLB,TJB,JAS - ADD NEW APPOINTMENT ; NOV 22,2024
Source file <SDEC07.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| APPADD(SDECY,SDECSTART,SDECEND,DFN,SDECRES,SDECLEN,SDECNOTE,SDECATID,SDECCR,SDMRTC,SDDDT,SDREQBY,SDLAB,PROVIEN,SDID,SDAPTYP,SDSVCP,SDSVCPR,SDCL,SDEKG,SDXRAY,APPTYPE,EESTAT,OVB,SDPARENT,SDEL,EAS) | ;
|
|
| SDECADD(SDECSTART,SDECEND,DFN,SDECRESD,SDECATID,SDDDT,SDID,SDAPTYP,PROVIEN,SDCL,SDECNOTE,SAVESTRT,SDECRES,SDAPPTYP,EESTAT,SDF,SDECLEN,EAS) | ;
|
|
| CONSPIDCHECK(SDRIEN1,SDDDT) | ;
|
|
| SDECWP(SDECAPPTID,SDECNOTE) | ;
|
|
| ADDEVT(DFN,SDECSTART,SDECSC,SDCLA) | ;EP
|
|
| STRIP(SDECZ) | ;Replace control characters with spaces
|
|
| ERR(SDECI,SDECERR,DFN,LOCK) | ;Error processing
|
|
| ETRAP | ;EP Error trap entry
|
|
| ERROR | ;
|
|
| ERR1(SDECERR) | ;Error processing
|
| RPC Name | Call Tags |
|---|---|
| SDEC APPADD | APPADD |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^SD(403.5 - [#403.5] | GET1^DIQ |
| ^SD(403.54 - [#403.54] | GET1^DIQ |
| ^SDWL(409.3 - [#409.3] | GET1^DIQ |
| ^SDEC(409.831 - [#409.831] | GET1^DIQ |
| ^SDEC(409.84 - [#409.84] | WP^DIE |
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
| 409.871 | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
