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 |