Name | Value | ||||
---|---|---|---|---|---|
NUMBER | 747 | ||||
IA # | 747 | ||||
DATE CREATED | 1993/08/09 | ||||
CUSTODIAL PACKAGE | SCHEDULING | ||||
CUSTODIAL ISC | Albany | ||||
USAGE | Private | ||||
TYPE | Routine | ||||
ROUTINE | SDKILL | ||||
NAME | DBIA261-B | ||||
ORIGINAL NUMBER | 261 | ||||
GENERAL DESCRIPTION | The option HBHC Appointment uses the MAS routine ^SDM as the Run Routine, and employs SDM^SDKILL in the exit action. The option HBHC Cancel Appointment uses ^SDCNP as the Run Routine, and the SDCNP^SDKILL in the Exit Action. Select OPTION to edit: HBHC APPOINTMENT Make Appointment NAME: HBHC APPOINTMENT// MENU TEXT: Make Appointment// PACKAGE: HOSPITAL BASED HOME CARE// DESCRIPTION: 1>This option utilizes the MAS Scheduling Option, Make Appointment [SDM], 2>for entry of appointment data. The Exit Action on this option runs a 3>routine that creates records in the HBHC Visit File (HBHC(632)) using 4>the appointment data entered. Only data for clinics contained in the 5>HBHC Clinic File (HBHC(631.6)) will be added to the HBHC Visit File. EDIT Option: TYPE: run routine// ENTRY ACTION: D:$T(HDLKILL^SDAMEVT)]"" HDLKILL^SDAMEVT EXIT ACTION: D SDM^SDKILL K ORACTION,ORVP,XQORQUIT W !!,"Adding entries to the visit file..." D WAIT^DICD,^HBHCAPPT D:$T(HDLKILL^SDAMEVT)]"" HDLKILL^SDAMEVT Replace ROUTINE: SDM// Select OPTION to edit: HBHC CANCEL APPOINTMENT Cancel Appointment NAME: HBHC CANCEL APPOINTMENT Replace MENU TEXT: Cancel Appointment// PACKAGE: HOSPITAL BASED HOME CARE DESCRIPTION: 1>This option utilizes the MAS Scheduling Option, Cancel Appointment 2>[SD CANCEL APPOINTMENT], for cancelling appointments. The Exit Action 3>on this option runs a routine that updates records in the HBHC Visit 4>File (HBHC(632)) using the cancellation data entered. EDIT Option: TYPE: run routine// ENTRY ACTION: D:$T(HDLKILL^SDAMEVT)]"" HDLKILL^SDAMEVT EXIT ACTION: D SDCNP^SDKILL W !!,"Updating entries in the visit file..." D WAIT^DICD,^HBHCCAN D:$T(HDLKILL^SDAMEVT)]"" HDLKILL^SDAMEVT Replace ROUTINE: SDCNP// |
||||
STATUS | Retired | ||||
DURATION | Till Otherwise Agreed | ||||
ID | SDKILL | ||||
COMPONENT/ENTRY POINT |
|
||||
SUBSCRIBING PACKAGE |
|