在西门子808D中编程子程序，可以采用以下几种方法：
直接输入子程序名字
在程序中直接输入子程序的名称，如：
```
L2P2
```
这表示调用名为L2的子程序两次。
CALL子程序名字
使用CALL指令来调用子程序，如：
```
CALL A01
```
这表示调用名为A01的子程序。
外部调用EXCALL子程序名字
使用EXCALL指令来调用子程序，如：
```
EXCALL A01
```
这表示从外部调用名为A01的子程序。
注意事项：
子程序命名应遵循一定的规则，通常以L开头，例如L2、L02等。
如果子程序名不足4位，系统内部参数20734的位6应设置为0，否则前面不能用0来填补。例如，子程序命名为0123可能会导致报警，解决方法是将子程序名改为123或修改系统参数。
示例程序：
```
MAIN（）
T01 M6 D1
G54 G90 G0 X0 Y0 S1000 M3
A01 （或者 CALL A01 或者 EXCALL A01）
M30
END
```
在这个示例中，主程序调用名为A01的子程序。你可以根据需要选择直接输入子程序名字、CALL指令或EXCALL指令来调用子程序。